changeset 4:9ccde1867fbb draft

Replaces Rscript by R CMD BATCH
author crs4
date Mon, 11 Jun 2018 09:32:44 -0400
parents 88b89f435f6a
children a0a30c52978a
files exomedepth.R
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/exomedepth.R	Tue Jun 05 18:58:08 2018 -0400
+++ b/exomedepth.R	Mon Jun 11 09:32:44 2018 -0400
@@ -3,7 +3,8 @@
 
 # Import parameters from xml wrapper (args_file)
 args  <- commandArgs(trailingOnly=TRUE)
-param <- read.table(args[1],sep="=", as.is=TRUE)
+eval(parse(text=args[[1]]))
+param <- read.table(mypars,sep="=", as.is=TRUE)
 
 # Set common parameters
 target      <- param[match("target",param[,1]),2]