Mercurial > repos > lecorguille > xcms_fillpeaks

comparison xcms_fillpeaks.r @ 23:3bc94c3abb28 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit dec989d87d183bd3b79a61838eb5088a194ef29d
author lecorguille
date Mon, 03 Jun 2019 07:17:01 -0400
parents 05d322d6facb
children 999f9db0ca2c
comparison
equal deleted inserted replaced
22:6824468351ca 23:3bc94c3abb28
79 fillChromPeaksParam <- do.call(paste0(method,"Param"), args) 79 fillChromPeaksParam <- do.call(paste0(method,"Param"), args)
80 print(fillChromPeaksParam) 80 print(fillChromPeaksParam)
81 81
82 # back compatibility between xcms-3.0.0 and xcms-3.5.2 82 # back compatibility between xcms-3.0.0 and xcms-3.5.2
83 xdata <- updateObject(xdata) 83 xdata <- updateObject(xdata)
84 84 register(SerialParam())
85 xdata <- fillChromPeaks(xdata, param=fillChromPeaksParam) 85 xdata <- fillChromPeaks(xdata, param=fillChromPeaksParam)
86 86
87 if (exists("intval")) { 87 if (exists("intval")) {
88 getPeaklistW4M(xdata, intval, convertRTMinute, numDigitsMZ, numDigitsRT, naTOzero, "variableMetadata.tsv", "dataMatrix.tsv") 88 getPeaklistW4M(xdata, intval, convertRTMinute, numDigitsMZ, numDigitsRT, naTOzero, "variableMetadata.tsv", "dataMatrix.tsv")
89 } 89 }