Hi Biostars, I used topGO to do GO enrichment analysis for my list of interesting genes. After the run, I used the following script to retrieve significant genes for each GO ID. Can anyone help me to automate this process in such a way that I will get a table with all enriched GO IDs with corresponding significant genes? Thank you
# retrieving the gene list related to a GO ID
# retrieve genes2GO list from the "expanded" annotation in GOdata
allGO <- genesInTerm(topGOobject)
#Getting all annotated genes for a GO ID
allGO["GO:123456"]
RetrivedGenes <- lapply(allGO,function(x) x[x %in% INT.GENES$V1] ) # where INT.GENES$V1 is my list of interesting genes
# Your significant genes for GO:123456
RetrivedGenes[["GO:123456"]]
Hi EagleEye, I checked GeneSCF , but we have been using topGO in our pipeline for long and repeating all the analysis using GeneSCF is not feasible at this point of time. It will be great if you can suggest any modification in the above script. Thank you