Mercurial > repos > mmonsoor > probmetab

changeset 9:fe21deb6b625 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit 4119e0f73e028bf420e5bdec2d95a4621ebbbcaf
author lecorguille
date Fri, 07 Apr 2017 07:56:16 -0400
parents 66fe5a2237f3
children 2964f7864315
files lib.r
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lib.r	Fri Apr 07 06:55:52 2017 -0400
+++ b/lib.r	Fri Apr 07 07:56:16 2017 -0400
@@ -148,10 +148,10 @@
         write.table(variableM, sep="\t", quote=FALSE, row.names=FALSE, file="variableMetadata.tsv")
     } else if (listArguments[["mode_acquisition"]]=="two") {
         #Retrocompatibility with previous annotateDiffreport variableMetadata dataframe (must replace mzmed column by mz, and rtmed by rt)
-        names(variableMetadataP)[names(variableMetadata)=="mzmed"] <- "mz"
-        names(variableMetadataP)[names(variableMetadata)=="rtmed"] <- "rt"
-        names(variableMetadataN)[names(variableMetadata)=="mzmed"] <- "mz"
-        names(variableMetadataN)[names(variableMetadata)=="rtmed"] <- "rt"
+        names(variableMetadataP)[names(variableMetadataP)=="mzmed"] <- "mz"
+        names(variableMetadataP)[names(variableMetadataP)=="rtmed"] <- "rt"
+        names(variableMetadataN)[names(variableMetadataN)=="mzmed"] <- "mz"
+        names(variableMetadataN)[names(variableMetadataN)=="rtmed"] <- "rt"
         variableMP=merge_probmetab(variableMetadataP, ansConn)
         write.table(variableMP, sep="\t", quote=FALSE, row.names=FALSE, file="variableMetadata_Positive.tsv")
         variableMN=merge_probmetab(variableMetadataN, ansConn)