Mercurial > repos > lecorguille > xcms_group
comparison xcms_group.r @ 22:6842c495da6d draft
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 8ed93601e09e1db2fbaef5af29d58464b639f2a8
author | lecorguille |
---|---|
date | Tue, 09 Apr 2019 12:20:23 -0400 |
parents | c8f8d598f562 |
children | 761913919c21 |
comparison
equal
deleted
inserted
replaced
21:2d94a873d649 | 22:6842c495da6d |
---|---|
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 |