comparison dynamic_tool_render.R @ 2:a9579c344a90 draft default tip

planemo upload commit 8f84e3911c6ff4103c0ad5fb8dd774f80d9b2559
author mingchen0919
date Fri, 23 Mar 2018 21:50:16 -0400
parents d79569f269c7
children
comparison
equal deleted inserted replaced
1:ddc3c3527f49 2:a9579c344a90
6 sink(zz, type = 'message') 6 sink(zz, type = 'message')
7 7
8 #------------import libraries-------------------- 8 #------------import libraries--------------------
9 options(stringsAsFactors = FALSE) 9 options(stringsAsFactors = FALSE)
10 10
11 library(getopt)
12 library(rmarkdown) 11 library(rmarkdown)
13 #------------------------------------------------ 12 #------------------------------------------------
14 13
15 #------------------------------------------------ 14 #------------------------------------------------
16 options_and_arguments = read.table(paste0(Sys.getenv('REPORT_FILES_PATH'), '/options_and_arguments.txt'), 15 options_and_arguments = read.table(paste0(Sys.getenv('REPORT_FILES_PATH'), '/options_and_arguments.txt'),
17 sep = '|', header = TRUE) 16 sep = '|', header = TRUE)
18 17
19 18
20 #-----------------render Rmd-------------- 19 #-----------------render Rmd--------------
21 render(paste0(Sys.getenv('TOOL_INSTALL_DIR'), '/dynamic_tool.Rmd'), 20 render(paste0(Sys.getenv('TOOL_INSTALL_DIR'), '/dynamic_tool.Rmd'),
22 output_file = Sys.getenv('REPORT')) 21 output_file = paste0(Sys.getenv('REPORT_FILES_PATH'), '/report.html'))
22
23 # for some unknow reason, directly using REPORT as the input value for output_file parameter
24 # in the render function can cause empty report file when the tool runs in batch mode.
25 # the solution is to render the rmarkdown to a explicitly specified file and then copy the
26 # file to ${REPORT}
27 system(command = 'cp ${REPORT_FILES_PATH}/report.html ${REPORT}')
23 #------------------------------------------ 28 #------------------------------------------
24 29
25 30
26 ##--------end of code rendering .Rmd templates---------------- 31 ##--------end of code rendering .Rmd templates----------------
27 sink() 32 sink()