Mercurial > repos > lecorguille > xcms_fillpeaks
comparison xcms_fillpeaks.r @ 21:05d322d6facb draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 8ed93601e09e1db2fbaef5af29d58464b639f2a8
author | lecorguille |
---|---|
date | Tue, 09 Apr 2019 12:23:16 -0400 |
parents | 27fbe73c4279 |
children | 3bc94c3abb28 |
comparison
equal
deleted
inserted
replaced
20:c0e7d2fae9ee | 21:05d322d6facb |
---|---|
101 xset <- getxcmsSetObject(xdata) | 101 xset <- getxcmsSetObject(xdata) |
102 print(xset) | 102 print(xset) |
103 cat("\n\n") | 103 cat("\n\n") |
104 | 104 |
105 #saving R data in .Rdata file to save the variables used in the present tool | 105 #saving R data in .Rdata file to save the variables used in the present tool |
106 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList", "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") | 106 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList") #, "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") |
107 save(list=objects2save[objects2save %in% ls()], file="fillpeaks.RData") | 107 save(list=objects2save[objects2save %in% ls()], file="fillpeaks.RData") |
108 | 108 |
109 cat("\n\n") | 109 cat("\n\n") |
110 | 110 |
111 | 111 |