Mercurial > repos > lecorguille > xcms_summary
comparison xcms_summary.r @ 36:12c802da5367 draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit e131bacd37bfaf2c4132fd214c81db9b8a9df513
| author | lecorguille |
|---|---|
| date | Mon, 17 Sep 2018 08:47:17 -0400 |
| parents | 3d4339594010 |
| children | 1d2cc6c87acf |
comparison
equal
deleted
inserted
replaced
| 35:79fe34cedc56 | 36:12c802da5367 |
|---|---|
| 13 cat("\tSESSION INFO\n") | 13 cat("\tSESSION INFO\n") |
| 14 | 14 |
| 15 #Import the different functions | 15 #Import the different functions |
| 16 source_local <- function(fname){ argv <- commandArgs(trailingOnly=FALSE); base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)); source(paste(base_dir, fname, sep="/")) } | 16 source_local <- function(fname){ argv <- commandArgs(trailingOnly=FALSE); base_dir <- dirname(substring(argv[grep("--file=", argv)], 8)); source(paste(base_dir, fname, sep="/")) } |
| 17 source_local("lib.r") | 17 source_local("lib.r") |
| 18 source_local("lib-xcms3.x.x.r") | |
| 18 | 19 |
| 19 pkgs <- c("CAMERA","batch") | 20 pkgs <- c("CAMERA","batch") |
| 20 loadAndDisplayPackages(pkgs) | 21 loadAndDisplayPackages(pkgs) |
| 21 cat("\n\n"); | 22 cat("\n\n"); |
| 22 | 23 |
