Mercurial > repos > lecorguille > xcms_retcor
comparison xcms_retcor.r @ 18:62171c2b2834 draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 8ed93601e09e1db2fbaef5af29d58464b639f2a8
| author | lecorguille |
|---|---|
| date | Tue, 09 Apr 2019 12:21:38 -0400 |
| parents | 950b97b679c6 |
| children | c914743e3f2f |
comparison
equal
deleted
inserted
replaced
| 17:0dcc9d0902cf | 18:62171c2b2834 |
|---|---|
| 90 xset <- getxcmsSetObject(xdata) | 90 xset <- getxcmsSetObject(xdata) |
| 91 print(xset) | 91 print(xset) |
| 92 cat("\n\n") | 92 cat("\n\n") |
| 93 | 93 |
| 94 #saving R data in .Rdata file to save the variables used in the present tool | 94 #saving R data in .Rdata file to save the variables used in the present tool |
| 95 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList", "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") | 95 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList") #, "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") |
| 96 save(list=objects2save[objects2save %in% ls()], file="retcor.RData") | 96 save(list=objects2save[objects2save %in% ls()], file="retcor.RData") |
| 97 | 97 |
| 98 cat("\n\n") | 98 cat("\n\n") |
| 99 | 99 |
| 100 | 100 |