annotate tool_template_render.R @ 3:6da0541944de draft

initial tool
author mingchen0919
date Thu, 22 Feb 2018 23:49:26 -0500
parents f1f549e6d0bc
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
1 zz = file("warnings_and_errors.txt")
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
2 sink(zz)
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
3 sink(zz, type = "message")
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
4
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
5 ## get command line inputs into R
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
6 short_flags = extract_short_flags(xml_file_name = 'extract_fields.xml')
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
7 opt = getopt_specification_matrix(short_flags)
3
6da0541944de initial tool
mingchen0919
parents: 2
diff changeset
8 opt
6da0541944de initial tool
mingchen0919
parents: 2
diff changeset
9 rmarkdown::render('tool_template.Rmd', output_file = opt$report_html)
2
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
10
f1f549e6d0bc initial tool
mingchen0919
parents:
diff changeset
11 sink()