View source: R/AnnotationFuncs.R
pickGO | R Documentation |
Cleans up result from org.Xx.egGO and returns GO identifier for either
biological process (BP), cellular component (CC), or molecular function (MF).
Can be used on list of GOs from translate
, or a single list of GOs from an annotation package.
May reduce list, if the (sub)list does not contain the chosen class!
pickGO(l, evidence = NA, category = NA)
l |
Character vector, or list of GO identifiers. |
evidence |
Character vector, filters on which kind of evidence to return; for a larger list see |
category |
Character vector, filters on which ontology to return: biological process (BP), cellular component (CC), or molecular function (MF). \*
Leave as |
List with only the picked elements.
Stefan McKinnon Edwards stefan.hoj-edwards@agrsci.dk
pickRefSeq
, getEvidenceCodes
, translate
library(org.Bt.eg.db)
genes <- c(280705, 280706, 100327208)
translate(genes, org.Bt.egSYMBOL)
symbols <- c("SERPINA1","KERA","CD5")
refseq <- translate(symbols, from=org.Bt.egSYMBOL2EG, to=org.Bt.egREFSEQ)
# Pick the proteins:
pickRefSeq(refseq, priorities=c('NP','XP'), reduce='all')
# If you wanted do do some further mapping on the result from
# translate, simply use lapply.
library(GO.db)
GO <- translate(genes, org.Bt.egGO)
# Get all biological processes:
## Not run:
pickGO(GO, category='BP')
# $`280705`
# [1] "GO:0006826" "GO:0006879"
# $`280706`
# [1] "GO:0006590" "GO:0007165" "GO:0042446"
# Get all ontologies with experimental evidence:
pickGO(GO, evidence=c('IMP','IGI','IPI','ISS','IDA','IEP','IEA'))
# $`280705`
# [1] "GO:0006826" "GO:0006879" "GO:0005615" "GO:0008199"
# $`280706`
# [1] "GO:0006590" "GO:0007165" "GO:0042446" "GO:0005615" "GO:0005179" "GO:0042393"
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.