## Not run:
# if (require(minfiData)) {
# Mset.swan <- preprocessSWAN(RGsetEx, MsetEx)
# par(mfrow=c(1,2))
# plotBetasByType(MsetEx[,1], main="Raw")
# plotBetasByType(Mset.swan[,1], main="SWAN")
# }
# ## End(Not run)
Run the code above in your browser using DataLab