Mercurial > repos > melpetera > idchoice

comparison IDchoice/IDchoice_wrap.R @ 1:bb19b1d15732 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author melpetera
date Thu, 19 Dec 2019 05:29:57 -0500
parents b7a6a88f518a
children
comparison
equal deleted inserted replaced
0:b7a6a88f518a 1:bb19b1d15732
5 # # 5 # #
6 # Author: Melanie PETERA # 6 # Author: Melanie PETERA #
7 # User: Galaxy # 7 # User: Galaxy #
8 # Original data: used with IDchoice_script.R # 8 # Original data: used with IDchoice_script.R #
9 # Starting date: 01-06-2017 # 9 # Starting date: 01-06-2017 #
10 # V-1: Firt version of wrapper # 10 # V-1: First version of wrapper #
11 # V-2: Additional information in stdout #
11 # # 12 # #
12 # # 13 # #
13 # Input files: dataMatrix ; Metadata file # 14 # Input files: dataMatrix ; Metadata file #
14 # Output files: dataMatrix ; Metadata file # 15 # Output files: dataMatrix ; Metadata file #
15 # # 16 # #
29 30
30 31
31 if(length(args) < 7){ stop("NOT enough argument !!!") } 32 if(length(args) < 7){ stop("NOT enough argument !!!") }
32 33
33 34
35 cat('\nJob starting time:\n',format(Sys.time(), "%a %d %b %Y %X"),
36 '\n\n--------------------------------------------------------------------',
37 '\nParameters used in "ID choice":\n\n')
38 print(args)
39 cat('--------------------------------------------------------------------\n\n')
40
41
34 id.choice(args$dataMatrix_in, args$Metadata_in, args$metatype, args$col_name, args$makeunique, args$DM_out, args$meta_out) 42 id.choice(args$dataMatrix_in, args$Metadata_in, args$metatype, args$col_name, args$makeunique, args$DM_out, args$meta_out)
43
44
45 cat('\n--------------------------------------------------------------------',
46 '\nInformation about R (version, Operating System, attached or loaded packages):\n\n')
47 sessionInfo()
48 cat('--------------------------------------------------------------------\n',
49 '\nJob ending time:\n',format(Sys.time(), "%a %d %b %Y %X"))
35 50
36 51
37 #delete the parameters to avoid the passage to the next tool in .RData image 52 #delete the parameters to avoid the passage to the next tool in .RData image
38 rm(args) 53 rm(args)