Mercurial > repos > lecorguille > xcms_merge
diff xcms_merge.r @ 24:bf452dc6e4b0 draft
planemo upload for repository https://github.com/workflow4metabolomics/tools-metabolomics/ commit eca29d4347fe2f4802091c4a06715232a6fd9253
author | workflow4metabolomics |
---|---|
date | Mon, 15 Jul 2024 15:53:20 +0000 |
parents | 2eb424218159 |
children | 7e2770b86a0e |
line wrap: on
line diff
--- a/xcms_merge.r Wed Apr 07 10:30:24 2021 +0000 +++ b/xcms_merge.r Mon Jul 15 15:53:20 2024 +0000 @@ -2,13 +2,15 @@ #Import the different functions source_local <- function(fname) { - argv <- commandArgs(trailingOnly = FALSE); base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)); source(paste(base_dir, fname, sep = "/")) + argv <- commandArgs(trailingOnly = FALSE) + base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)) + source(paste(base_dir, fname, sep = "/")) } source_local("lib.r") pkgs <- c("xcms", "batch") loadAndDisplayPackages(pkgs) -cat("\n\n"); +cat("\n\n") args <- parseCommandArgs(evaluate = FALSE) #interpretation of arguments given in command line as an R list of objects