Mercurial > repos > lecorguille > xcms_fillpeaks
comparison xcms_fillpeaks.r @ 35:e67cbb96d9e9 draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 5e066c50d2e4ac6d5796b53331cbd3198ab8c4f9-dirty
| author | lecorguille |
|---|---|
| date | Thu, 05 Apr 2018 18:10:27 -0400 |
| parents | d8bac1291473 |
| children | a3e80894efd3 |
comparison
equal
deleted
inserted
replaced
| 34:d8bac1291473 | 35:e67cbb96d9e9 |
|---|---|
| 97 xset <- getxcmsSetObject(xdata) | 97 xset <- getxcmsSetObject(xdata) |
| 98 print(xset) | 98 print(xset) |
| 99 cat("\n\n") | 99 cat("\n\n") |
| 100 | 100 |
| 101 #saving R data in .Rdata file to save the variables used in the present tool | 101 #saving R data in .Rdata file to save the variables used in the present tool |
| 102 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList") | 102 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList", "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") |
| 103 save(list=objects2save[objects2save %in% ls()], file="fillpeaks.RData") | 103 save(list=objects2save[objects2save %in% ls()], file="fillpeaks.RData") |
| 104 | 104 |
| 105 cat("\n\n") | 105 cat("\n\n") |
| 106 | 106 |
| 107 | 107 |