Defines functions acore

Documented in acore

acore <-  function(eset,cl,min.acore=0.5){

  atmp <- list(NULL)
  for (i in 1:dim(cl[[1]])[[1]]){
    index <- (cl[[3]]==i & (cl[[4]][,i] > min.acore)) # selection of genes
   atmp[[i]] <- data.frame(NAME=dimnames(exprs(eset))[[1]][index],MEM.SHIP=cl[[4]][index,i])


Try the Mfuzz package in your browser

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

Mfuzz documentation built on May 2, 2018, 3:18 a.m.