view tool_template_render.R @ 3:6da0541944de draft

initial tool
author mingchen0919
date Thu, 22 Feb 2018 23:49:26 -0500
parents f1f549e6d0bc
children
line wrap: on
line source

zz = file("warnings_and_errors.txt")
sink(zz)
sink(zz, type = "message")

## get command line inputs into R
short_flags = extract_short_flags(xml_file_name = 'extract_fields.xml')
opt = getopt_specification_matrix(short_flags)
opt
rmarkdown::render('tool_template.Rmd', output_file = opt$report_html)

sink()