diff CorrTable/Corr_wrap.r @ 2:f47f08b4b35c draft default tip

Uploaded

--- a/CorrTable/Corr_wrap.r	Thu Aug 01 11:17:35 2019 -0400
+++ b/CorrTable/Corr_wrap.r	Wed Oct 16 04:07:34 2019 -0400
@@ -33,7 +33,8 @@
 if(length(args) < 10){ stop("NOT enough argument !!!") }
 
 
-cat('\n--------------------------------------------------------------------', 
+cat('\nJob starting time:\n',format(Sys.time(), "%a %d %b %Y %X"),
+'\n\n--------------------------------------------------------------------', 
 '\nParameters used in "Between-table Correlation":\n\n')
 print(args)
 cat('--------------------------------------------------------------------\n\n')
@@ -76,7 +77,8 @@
 cat('\n--------------------------------------------------------------------',
 '\nInformation about R (version, Operating System, attached or loaded packages):\n\n')
 sessionInfo()
-cat('--------------------------------------------------------------------\n\n')
+cat('--------------------------------------------------------------------\n',
+'\nJob ending time:\n',format(Sys.time(), "%a %d %b %Y %X"))
 
 
 #delete the parameters to avoid the passage to the next tool in .RData image