Defines functions csApply

Documented in csApply

csApply <- function(X, FUN, ..., simplify = TRUE)
  if (!is(X, "cytoSet"))
    stop("'X' must be of class cytoSet")
  sapply(X@phenoData$name, function(i){
         Y <- exprs(X[[i]])
         attr(Y, "well") <- X[[i]]@well
         FUN(Y, ...)}, simplify=simplify)

Try the prada package in your browser

Any scripts or data that you put into this service are public.

prada documentation built on April 28, 2020, 7:52 p.m.