Commit 97af5d4d authored by Jefferson F. Paril's avatar Jefferson F. Paril 😁

making the R analysis scripts more generic

parent 3c7178ad
......@@ -25,11 +25,11 @@ library(glmnet)
library(lme4)
library(ROCR)
SRC_DIR = dirname(sub("--file=", "", args[grep("--file=", args)]))
if (SRC_DIR == ""){
tryCatch({
source("quantitative_resistance.r")
} else {
}, error=function(e) {
paste0(SRC_DIR, "/quantitative_resistance.r")
}
})
########################################################################
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment