R/standardise2.R

In Mfuzz: Soft clustering of time series gene expression data

Defines functions standardise2

Documented in standardise2

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

Try the Mfuzz package in your browser