Mercurial > repos > mingchen0919 > one_command_liners
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() |