Mercurial > repos > computational-metabolomics > mspurity_frag4feature
diff purityX.R @ 9:174a523cb1da draft
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 20a48a1862267264f98b7c514287f9a5cba1143f
author | computational-metabolomics |
---|---|
date | Thu, 13 Jun 2024 11:42:28 +0000 |
parents | cb4aeec93d49 |
children | da7ae20b5838 |
line wrap: on
line diff
--- a/purityX.R Wed Jun 12 16:08:23 2024 +0000 +++ b/purityX.R Thu Jun 13 11:42:28 2024 +0000 @@ -74,14 +74,18 @@ getxcmsSetObject <- function(xobject) { # XCMS 1.x - if (class(xobject) == "xcmsSet") { + if (class(xobject) == "xcmsSet"){ return(xobject) } # XCMS 3.x if (class(xobject) == "XCMSnExp") { # Get the legacy xcmsSet object suppressWarnings(xset <- as(xobject, "xcmsSet")) - sampclass(xset) <- xset@phenoData$sample_group + if (!is.null(xset@phenoData$sample_group)){ + xcms::sampclass(xset) <- xset@phenoData$sample_group + }else{ + xcms::sampclass(xset) <- "." + } return(xset) } }