R/standardise.R

In Mfuzz: Soft clustering of time series gene expression data

Defines functions standardise

Documented in standardise

standardise <- function(eset){
  data <- exprs(eset)
  for (i in 1:dim(data)[[1]]){
    data[i,] <- (data[i,] - mean(data[i,],na.rm=TRUE))/sd(data[i,],na.rm=TRUE) 
  }
exprs(eset) <- data
  eset
}

Try the Mfuzz package in your browser