# NOT RUN {
require(hgu133plus2.db)
data(marty)
## Probe list
probeList <- rownames(marty)[1:50]
## Hypergeometric test for KEGG pathway
res <- runHyperKEGG(probeList, htmlreport = FALSE, txtreport = FALSE,
tabResult = TRUE, pack.annot = "hgu133plus2.db")
# }
Run the code above in your browser using DataLab