Mercurial > repos > lecorguille > xcms_group
comparison xcms_group.r @ 41:a031435293aa draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit a5136bfc124956893f4f0c91808d1c0d78c4ea01
| author | lecorguille |
|---|---|
| date | Mon, 29 Apr 2019 06:11:27 -0400 |
| parents | 87c082612887 |
| children | 9a9d91ddbe75 |
comparison
equal
deleted
inserted
replaced
| 40:87c082612887 | 41:a031435293aa |
|---|---|
| 102 xset <- getxcmsSetObject(xdata) | 102 xset <- getxcmsSetObject(xdata) |
| 103 print(xset) | 103 print(xset) |
| 104 cat("\n\n") | 104 cat("\n\n") |
| 105 | 105 |
| 106 #saving R data in .Rdata file to save the variables used in the present tool | 106 #saving R data in .Rdata file to save the variables used in the present tool |
| 107 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList", "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") | 107 objects2save = c("xdata","zipfile","singlefile","md5sumList","sampleNamesList") #, "chromTIC", "chromBPI", "chromTIC_adjusted", "chromBPI_adjusted") |
| 108 save(list=objects2save[objects2save %in% ls()], file="group.RData") | 108 save(list=objects2save[objects2save %in% ls()], file="group.RData") |
| 109 | 109 |
| 110 cat("\n\n") | 110 cat("\n\n") |
| 111 | 111 |
| 112 | 112 |