if (require(GO.db) && require(org.Mm.eg.db)){
pathExampleData <- system.file("exampleFiles", "expressionSetGcrma.rda", package = "MLP")
pathExamplePValues <- system.file("exampleFiles", "examplePValues.rda", package = "MLP")
load(pathExampleData)
load(pathExamplePValues)
geneSet <- getGeneSets(species = "Mouse", geneSetSource = "GOBP", entrezIdentifiers = names(examplePValues)[1:2000])
head(geneSet)
}
Run the code above in your browser using DataLab