cytottest | R Documentation |
Performs a separate t-test on each cluster within a cfList. The output is added and can also be used by other functions
cytottest( cfList, group, adjustMethod = c("none", "holm", "hochberg", "hommel", "bonferroni", "BH", "BY", "fdr"), ... )
cfList |
a cfList object. It should contain at least data in the 'counts' slot. |
group |
one of:
|
adjustMethod |
character, correction method used in |
... |
further arguments passed on to |
Returns a cfList with a 'results' slot.
# Read Data dirFCS <- system.file("extdata", package="cytofast") cfData <- readCytosploreFCS(dir = dirFCS, colNames = "description") # relabeling of clusterID levels(cfData@expr[,"clusterID"]) <- gsub("[^0-9]", "", levels(cfData@expr[,"clusterID"])) # Add cell counts to cfList and add meta data cfData <- cellCounts(cfData, frequency = TRUE, scale = TRUE) meta <- spitzer[match(row.names(cfData@samples), spitzer$CSPLR_ST),] cfData@samples <- cbind(cfData@samples, meta) # Run t-test cfData@samples$effect <- gsub("_D\\d", "", spitzer$group) cfData <- cytottest(cfData, group = "effect", adjustMethod = "bonferroni") cfData@results
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.