Mercurial > repos > lecorguille > xcms_summary
comparison xcms_summary.r @ 39:1d2cc6c87acf draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit f0d42bca2f34c58c04b55e5990058d479c0ae639
author | lecorguille |
---|---|
date | Fri, 08 Feb 2019 10:04:57 -0500 |
parents | 12c802da5367 |
children | 5d59db39939a |
comparison
equal
deleted
inserted
replaced
38:3385de0c0908 | 39:1d2cc6c87acf |
---|---|
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") | |
19 | 18 |
20 pkgs <- c("CAMERA","batch") | 19 pkgs <- c("CAMERA","batch") |
21 loadAndDisplayPackages(pkgs) | 20 loadAndDisplayPackages(pkgs) |
22 cat("\n\n"); | 21 cat("\n\n"); |
23 | 22 |