# HG changeset patch # User lecorguille # Date 1491566176 14400 # Node ID fe21deb6b625cafe31135cd46a4ae3e4100b976a # Parent 66fe5a2237f34b1bc7f832f168b340ff9120269e planemo upload commit 4119e0f73e028bf420e5bdec2d95a4621ebbbcaf diff -r 66fe5a2237f3 -r fe21deb6b625 lib.r --- 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)