changeset 48:68da32dbc6e2 draft

planemo upload for repository https://github.com/statonlab/docker-GRReport/tree/master/my_tools/rmarkdown_collection_builder commit a7ad932a1725b4ef26d522040c5395ae0026fb35-dirty
author mingchen0919
date Tue, 26 Sep 2017 12:34:02 -0400
parents fb05ca474127
children 7a65e6827c25
files collection_list_paired.Rmd collection_list_paired_render.R collection_paired_render.R
diffstat 3 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/collection_list_paired.Rmd	Tue Sep 26 12:24:21 2017 -0400
+++ b/collection_list_paired.Rmd	Tue Sep 26 12:34:02 2017 -0400
@@ -67,4 +67,3 @@
 file.copy(paste0('./reverse_files_directory/', original_files),
           paste0('./files_directory/', new_files))
 ```
-
--- a/collection_list_paired_render.R	Tue Sep 26 12:24:21 2017 -0400
+++ b/collection_list_paired_render.R	Tue Sep 26 12:34:02 2017 -0400
@@ -82,4 +82,4 @@
 render('list_paired_collection.Rmd', output_file = opt$list_paired_collection_html)
 
 
-#-------4. manipulate outputs -----------------------------
+#-------4. manipulate outputs -----------------------------
\ No newline at end of file
--- a/collection_paired_render.R	Tue Sep 26 12:24:21 2017 -0400
+++ b/collection_paired_render.R	Tue Sep 26 12:34:02 2017 -0400
@@ -70,10 +70,10 @@
     gsub('FORWARD_INPUT', opt$forward_input, x)
   }) %>%
   (function(x) {
-    gsub('REVERSE_INPUT', opt$reverse_forward_input, x)
+    gsub('REVERSE_INPUT', opt$reverse_input, x)
   }) %>%
   (function(x) {
-    gsub('OUTPUT_DIR', opt$reverse_forward_input, x)
+    gsub('OUTPUT_DIR', opt$paired_collection_dir, x)
   }) %>%
   (function(x) {
     fileConn = file('paired_collection.Rmd')