if (FALSE) {
library(RPPanalyzer)
data(dataI)
dataI_bgcorr <- correctBG(dataI,method="normexp")
dataI_median <- sample.median(dataI_bgcorr)
expr.set <- rppaList2ExpressionSet(dataI_median)
}
Run the code above in your browser using DataLab