# HG changeset patch
# User tomnl
# Date 1560870029 14400
# Node ID b726e3311eb30f7c581619157f09c702b5d71eb2
# Parent  bce727b1f8e3b6bb1ef69c0a552be8496c20685e
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 14eafbdb65f491713d1314d77c454defd137c392

diff -r bce727b1f8e3 -r b726e3311eb3 createDatabase.R
--- a/createDatabase.R	Tue Jun 18 10:41:10 2019 -0400
+++ b/createDatabase.R	Tue Jun 18 11:00:29 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)
 
 }