diff frag4feature.R @ 9:c33b92eeb1fb draft

planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 20a48a1862267264f98b7c514287f9a5cba1143f
author computational-metabolomics
date Thu, 13 Jun 2024 11:37:41 +0000
parents 77706396e7bd
children
line wrap: on
line diff
--- a/frag4feature.R	Wed Jun 12 16:03:14 2024 +0000
+++ b/frag4feature.R	Thu Jun 13 11:37:41 2024 +0000
@@ -81,7 +81,11 @@
     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)
     }
 }
@@ -96,6 +100,7 @@
 print(pa@fileList)
 print(xset@filepaths)
 
+
 if (is.null(opt$intense)) {
     intense <- FALSE
 } else {