Mercurial > repos > lecorguille > xcms_fillpeaks
comparison xcms.r @ 17:98d0d4b62503 draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 717c02f887ce343ca55f862c8020aaf49f5581d8
| author | lecorguille | 
|---|---|
| date | Tue, 07 Feb 2017 05:27:53 -0500 | 
| parents | 5f61570177e2 | 
| children | 65dc5e8b53f7 | 
   comparison
  equal
  deleted
  inserted
  replaced
| 16:5f61570177e2 | 17:98d0d4b62503 | 
|---|---|
| 250 cat("\t\tGET TIC GRAPH\n") | 250 cat("\t\tGET TIC GRAPH\n") | 
| 251 getTICs(xcmsSet=xset, pdfname=ticspdf,rt="corrected") | 251 getTICs(xcmsSet=xset, pdfname=ticspdf,rt="corrected") | 
| 252 getBPCs(xcmsSet=xset,rt="corrected",pdfname=bicspdf) | 252 getBPCs(xcmsSet=xset,rt="corrected",pdfname=bicspdf) | 
| 253 } | 253 } | 
| 254 | 254 | 
| 255 if (thefunction == "fillPeaks") { | 255 if (thefunction == "fillPeaks" && exists("intval")) { | 
| 256 cat("\t\tGET THE PEAK LIST\n") | |
| 257 getPeaklistW4M(xset,intval,convertRTMinute,numDigitsMZ,numDigitsRT,variableMetadataOutput,dataMatrixOutput) | 256 getPeaklistW4M(xset,intval,convertRTMinute,numDigitsMZ,numDigitsRT,variableMetadataOutput,dataMatrixOutput) | 
| 258 } | 257 } | 
| 259 | 258 | 
| 260 | 259 | 
| 261 cat("\n\n") | 260 cat("\n\n") | 
