Mercurial > repos > lecorguille > xcms_merge

comparison xcms_merge.r @ 16:40791ab6c06b draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit e131bacd37bfaf2c4132fd214c81db9b8a9df513
author lecorguille
date Mon, 17 Sep 2018 08:44:25 -0400
parents 2d27c70635eb
children 068243731881
comparison
equal deleted inserted replaced
15:2c7d3db37974 16:40791ab6c06b
1 #!/usr/bin/env Rscript 1 #!/usr/bin/env Rscript
2 2
3 #Import the different functions 3 #Import the different functions
4 source_local <- function(fname){ argv <- commandArgs(trailingOnly=FALSE); base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)); source(paste(base_dir, fname, sep="/")) } 4 source_local <- function(fname){ argv <- commandArgs(trailingOnly=FALSE); base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)); source(paste(base_dir, fname, sep="/")) }
5 source_local("lib.r") 5 source_local("lib.r")
6 source_local("lib-xcms3.x.x.r")
6 7
7 pkgs <- c("xcms","batch") 8 pkgs <- c("xcms","batch")
8 loadAndDisplayPackages(pkgs) 9 loadAndDisplayPackages(pkgs)
9 cat("\n\n"); 10 cat("\n\n");
10 11