# HG changeset patch
# User lecorguille
# Date 1541794818 18000
# Node ID 10f7b15482005dffc28841cc076c5692c95470d8
# Parent 942ffa3c38b8f5d0ad4b5907609110099ffbe7db
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 37b0a6a7686f701e4bf00db97ae2c1b82cd6e989
diff -r 942ffa3c38b8 -r 10f7b1548200 lib.r
--- a/lib.r Tue Oct 09 15:50:03 2018 -0400
+++ b/lib.r Fri Nov 09 15:20:18 2018 -0500
@@ -198,6 +198,9 @@
variableMetadata <- formatIonIdentifiers(variableMetadata, numDigitsRT=numDigitsRT, numDigitsMZ=numDigitsMZ)
dataMatrix <- naTOzeroDataMatrix(dataMatrix, naTOzero)
+ # FIX: issue when the vector at peakidx is too long and is written in a new line during the export
+ variableMetadata[,"peakidx"] <- vapply(variableMetadata[,"peakidx"], FUN = paste, FUN.VALUE = character(1), collapse = ",")
+
write.table(variableMetadata, file=variableMetadataOutput,sep="\t",quote=F,row.names=F)
write.table(dataMatrix, file=dataMatrixOutput,sep="\t",quote=F,row.names=F)
diff -r 942ffa3c38b8 -r 10f7b1548200 repository_dependencies.xml
--- a/repository_dependencies.xml Tue Oct 09 15:50:03 2018 -0400
+++ b/repository_dependencies.xml Fri Nov 09 15:20:18 2018 -0500
@@ -1,5 +1,5 @@
-
+
-
-
-
+
+
+
\ No newline at end of file