# HG changeset patch
# User tomnl
# Date 1522165309 14400
# Node ID b83bcc259b76e270b063c66c1c979e3ac555cd7b
# Parent  c64891642e413e2d961aa1a969a73708ae52ddce
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 2e847122cf605951c334858455fc1d3ebdb189e9-dirty

diff -r c64891642e41 -r b83bcc259b76 anticipated_purity_dims.R
--- a/anticipated_purity_dims.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/anticipated_purity_dims.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("--mzML_file"), type="character"),
diff -r c64891642e41 -r b83bcc259b76 anticipated_purity_lcms.R
--- a/anticipated_purity_lcms.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/anticipated_purity_lcms.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("--xset_path"), type="character"),
diff -r c64891642e41 -r b83bcc259b76 assess_purity_msms.R
--- a/assess_purity_msms.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/assess_purity_msms.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("-o", "--out_dir"), type="character"),
diff -r c64891642e41 -r b83bcc259b76 create_sqlite_db.R
--- a/create_sqlite_db.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/create_sqlite_db.R	Tue Mar 27 11:41:49 2018 -0400
@@ -2,6 +2,7 @@
 library(optparse)
 library(xcms)
 library(CAMERA)
+print(sessionInfo())
 print('CREATING DATABASE')
 
 
diff -r c64891642e41 -r b83bcc259b76 frag4feature.R
--- a/frag4feature.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/frag4feature.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,6 +1,7 @@
 library(optparse)
 library(msPurity)
 library(xcms)
+print(sessionInfo())
 
 xset_pa_filename_fix <- function(opt, pa, xset){
 
diff -r c64891642e41 -r b83bcc259b76 spectral_matching.R
--- a/spectral_matching.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/spectral_matching.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,5 +1,7 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
+
 
 option_list <- list(
   make_option(c("-o", "--out_dir"), type="character"),
@@ -92,4 +94,4 @@
 print(cmd)
 scan_hits <- DBI::dbGetQuery(con, cmd)
 
-write.table(scan_hits, file.path(opt$out_dir, 'scan_hits.tsv'), row.names=FALSE, sep='\t')
\ No newline at end of file
+write.table(scan_hits, file.path(opt$out_dir, 'scan_hits.tsv'), row.names=FALSE, sep='\t')
diff -r c64891642e41 -r b83bcc259b76 track_rt_raw.R
--- a/track_rt_raw.R	Tue Mar 27 05:32:57 2018 -0400
+++ b/track_rt_raw.R	Tue Mar 27 11:41:49 2018 -0400
@@ -1,5 +1,7 @@
 library(optparse)
 library(xcms)
+print(sessionInfo())
+
 option_list <- list(
   make_option(c("--xset_path"), type="character"),
   make_option(c("-o", "--out_dir"), type="character")