maffy.subset(data,subset.size=5000,maxit=100, subset.delta=max(round(subset.size/100),25),verbose=FALSE)
subset
maffy.normalize
if (require(affydata)) { #data(Dilution) #x <- log2(pm(Dilution)[,1:3]) #Index <- maffy.subset(x,subset.size=100)$subset #mva.pairs(x[Index,]) }
Run the code above in your browser using DataLab