Repository 'xcms_export_samplemetadata'
hg clone https://toolshed.g2.bx.psu.edu/repos/lecorguille/xcms_export_samplemetadata

Changeset 1:008aceb33627 (2018-10-09)
Previous changeset 0:e3c06320f884 (2018-10-09) Next changeset 2:942ffa3c38b8 (2018-10-09)
Commit message:
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 67da3bb19bde72d5e78397e5627c176896234f86-dirty
modified:
xcms_export_samplemetadata.r
b
diff -r e3c06320f884 -r 008aceb33627 xcms_export_samplemetadata.r
--- a/xcms_export_samplemetadata.r Tue Oct 09 12:50:47 2018 -0400
+++ b/xcms_export_samplemetadata.r Tue Oct 09 12:57:14 2018 -0400
b
@@ -21,7 +21,7 @@
         sampleMetadata <- rbind(sampleMetadata,xdata@phenoData@data)
 }
 colnames(sampleMetadata) <- c("sample_name","class")
-sampleMetadata$sample_name <- make.names(sampleNamesOrigin)
+sampleMetadata$sample_name <- make.names(sampleMetadata$sample_name)
 
 # Create a sampleMetada file
 write.table(sampleMetadata,file="sampleMetadata.tsv", sep="\t", row.names=FALSE, quote=FALSE)