comparison fastq_dump_pe_render.R @ 21:3c859d094074 draft default tip

planemo upload for repository https://github.com/statonlab/docker-GRReport/tree/master/aurora-tools/rmarkdown_fastq_dump commit ffa886b188215708786e3c49877fc08fea60659e
author mingchen0919
date Wed, 04 Apr 2018 10:10:26 -0400
parents 42e154ba2d35
children
comparison
equal deleted inserted replaced
20:2167f32cf379 21:3c859d094074
35 # possible values: logical, integer, double, complex, character. 35 # possible values: logical, integer, double, complex, character.
36 ##------- 1. input data --------------------- 36 ##------- 1. input data ---------------------
37 spec_list=list() 37 spec_list=list()
38 spec_list$SRA_ACCESSION = c('sra_accession', 'i', '1', 'character') 38 spec_list$SRA_ACCESSION = c('sra_accession', 'i', '1', 'character')
39 spec_list$FORMAT = c('format', 'f', '1', 'character') 39 spec_list$FORMAT = c('format', 'f', '1', 'character')
40 spec_list$ECHO = c('echo', 'e', '1', 'character')
41 ##--------2. output report and outputs -------------- 40 ##--------2. output report and outputs --------------
42 spec_list$REPORT_HTML = c('report_html', 'r', '1', 'character') 41 spec_list$REPORT_HTML = c('report_html', 'r', '1', 'character')
43 spec_list$OUTPUT_DIR = c('output_dir', 'd', '1', 'character') 42 spec_list$OUTPUT_DIR = c('output_dir', 'd', '1', 'character')
44 spec_list$SINK_OUTPUT = c('sink_message', 's', '1', 'character') 43 spec_list$SINK_OUTPUT = c('sink_message', 's', '1', 'character')
45 ##--------3. Rmd templates in the tool directory ---------- 44 ##--------3. Rmd templates in the tool directory ----------
69 }) %>% 68 }) %>%
70 (function(x) { 69 (function(x) {
71 gsub('FORMAT', opt$format, x) 70 gsub('FORMAT', opt$format, x)
72 }) %>% 71 }) %>%
73 (function(x) { 72 (function(x) {
74 gsub('ECHO', opt$echo, x)
75 }) %>%
76 (function(x) {
77 gsub('OUTPUT_DIR', opt$output_dir, x) 73 gsub('OUTPUT_DIR', opt$output_dir, x)
78 }) %>% 74 }) %>%
79 (function(x) { 75 (function(x) {
80 fileConn = file('fastq_dump_pe.Rmd') 76 fileConn = file('fastq_dump_pe.Rmd')
81 writeLines(x, con=fileConn) 77 writeLines(x, con=fileConn)