Entering edit mode
Shawn Westaway
▴
70
@shawn-westaway-2143
Last seen 10.2 years ago
Using Lumi on Illumina Mouse-Ref6 chip microarray data. I tried to use
GOstats to generate a nice table like the one shown in lumi.pdf using
the following script
> if (require(GOstats) & require(lumiMouseV1)) {
sigLL <- unique(unlist(mget(sigGene, env=lumiMouseV1ENTREZID,
ifnotfound=NA)))
sigLL <- as.character(sigLL[!is.na(sigLL)])
params <- new("GOHyperGParams",
geneIds= sigLL,
annotation="lumiMouseV1",
ontology="BP",
pvalueCutoff= 0.01,
conditional=FALSE,
testDirection="over")
hgOver <- hyperGTest(params)
gGhyp.pv <- pvalues(hgOver)
sigGO.ID <- names(gGhyp.pv[gGhyp.pv < 0.001])
sigGO.Term <- getGOTermsigGO.ID)[["BP"]]
}
The script does not seem to output anything. Is there a command
missing
to generate the data?
Thanks,
Shawn