data(PalateData)
reducedSet <- filterArray(PalateData, keep=c("MIR", "LET", "POSCON", "CALIB"),
frac=1.1, number=3, reps=4)
ndata.quantile <- normalizeBetweenArrays(reducedSet, method="quantile")
res <- MAplot(ndata.quantile)
print(res)
Run the code above in your browser using DataLab