comparison frag4feature.R @ 9:ac284b969836 draft default tip

planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 20a48a1862267264f98b7c514287f9a5cba1143f

8:e98ae5c1f4e7

    }
    # XCMS 3.x
    if (class(xobject) == "XCMSnExp") {
        # Get the legacy xcmsSet object
        suppressWarnings(xset <- as(xobject, "xcmsSet"))
        sampclass(xset) <- xset@phenoData$sample_group
        return(xset)
    }
}

# Requires

pa@cores <- opt$cores

print(pa@fileList)
print(xset@filepaths)

if (is.null(opt$intense)) {
    intense <- FALSE
} else {
    intense <- TRUE

9:ac284b969836

    }
    # XCMS 3.x
    if (class(xobject) == "XCMSnExp") {
        # Get the legacy xcmsSet object
        suppressWarnings(xset <- as(xobject, "xcmsSet"))
        if (!is.null(xset@phenoData$sample_group)) {
            xcms::sampclass(xset) <- xset@phenoData$sample_group
        } else {
            xcms::sampclass(xset) <- "."
        }
        return(xset)
    }
}

# Requires

pa@cores <- opt$cores

print(pa@fileList)
print(xset@filepaths)


if (is.null(opt$intense)) {
    intense <- FALSE
} else {
    intense <- TRUE