R/filter.NA.R

Defines functions filter.NA

Documented in filter.NA

filter.NA <- function(eset,thres=0.25){

index <- logical(dim(exprs(eset))[1])

  for (i in 1:dim(exprs(eset))[1]){
     index[i] <- (((sum(is.na(exprs(eset)[i,]))/dim(exprs(eset))[2])) > thres)  
  }
 cat(paste(sum(index),"genes excluded.\n"))

 eset[!index,]
}

  

Try the Mfuzz package in your browser

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

Mfuzz documentation built on Nov. 1, 2018, 5:03 a.m.