comparison tool_template_render.R @ 3:6da0541944de draft

initial tool
author mingchen0919
date Thu, 22 Feb 2018 23:49:26 -0500
parents f1f549e6d0bc
children
comparison
equal deleted inserted replaced
2:f1f549e6d0bc 3:6da0541944de
3 sink(zz, type = "message") 3 sink(zz, type = "message")
4 4
5 ## get command line inputs into R 5 ## get command line inputs into R
6 short_flags = extract_short_flags(xml_file_name = 'extract_fields.xml') 6 short_flags = extract_short_flags(xml_file_name = 'extract_fields.xml')
7 opt = getopt_specification_matrix(short_flags) 7 opt = getopt_specification_matrix(short_flags)
8 opt
9 rmarkdown::render('tool_template.Rmd', output_file = opt$report_html)
8 10
9 sink() 11 sink()