if (FALSE) {
library("Biobase")
data("Westbc", package = "TH.data")
westbc <- new("ExpressionSet",
phenoData = new("AnnotatedDataFrame", data = Westbc$pheno),
assayData = assayDataNew(exprs = Westbc$assay))
}
Run the code above in your browser using DataLab