comparison tool_template_render.R @ 12:9cf29b2374a6 draft

1.1.0
author mingchen0919
date Sat, 24 Feb 2018 11:42:37 -0500
parents 670e1591cc65
children
comparison
equal deleted inserted replaced
11:670e1591cc65 12:9cf29b2374a6
21 # build command: awk '{print $1,$2}' > output.txt and run 21 # build command: awk '{print $1,$2}' > output.txt and run
22 X_A = paste0(paste0('$', trimws(strsplit(opt$X_A, ',')[[1]])), collapse = ',') 22 X_A = paste0(paste0('$', trimws(strsplit(opt$X_A, ',')[[1]])), collapse = ',')
23 extract_field_command = paste0("awk '{print ", X_A, " }' ", opt$X_B, " > ", opt$X_O) 23 extract_field_command = paste0("awk '{print ", X_A, " }' ", opt$X_B, " > ", opt$X_O)
24 system(command = extract_field_command) 24 system(command = extract_field_command)
25 25
26 26 rmarkdown::render(input = opt$X_t, output_file = opt$X_r)
27 sink() 27 sink()