# HG changeset patch
# User tomnl
# Date 1560870447 14400
# Node ID 13afc5f245bc33487564e37765286d3da473638d
# Parent  4b1812b0ff9fe8a6e13ee02c6b83a890e76b3b09
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 14eafbdb65f491713d1314d77c454defd137c392

diff -r 4b1812b0ff9f -r 13afc5f245bc createDatabase.R
--- a/createDatabase.R	Tue Jun 18 10:48:19 2019 -0400
+++ b/createDatabase.R	Tue Jun 18 11:07:27 2019 -0400
@@ -156,10 +156,10 @@
   }
 
   xset@peaks <- as.matrix(plyr::ddply(data.frame(xset@peaks), ~ sample, convert2Raw, xset=xset))
-
+  closeAllConnections()
   # Saves the EICS into the previously created database
   px <- msPurity::purityX(xset, saveEIC = TRUE,
-                           cores=2, sqlitePth=dbPth,
+                           cores=1, sqlitePth=dbPth,
                            rtrawColumns = TRUE)
 
 }