###################################################
### chunk number 1: loadLibs
###################################################
#line 129 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
library("annotate")
library("hgu95av2.db")
library("GO.db")


###################################################
### chunk number 2: getGO
###################################################
#line 171 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
temp <- as.list(hgu95av2GO)
temp[5]


###################################################
### chunk number 3: showmget
###################################################
#line 182 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
mget(c("738_at", "40840_at", "41668_r_at"), hgu95av2GENENAME)


###################################################
### chunk number 4: moremget
###################################################
#line 189 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
temp <- mget(c("41561_s_at", "40840_at", "41668_r_at"), hgu95av2GO)


###################################################
### chunk number 5: gettingGO
###################################################
#line 200 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
temp <- get("738_at", hgu95av2GO)
names(temp)
temp[["GO:0008253"]][["Evidence"]]
temp[["GO:0008253"]][["Ontology"]]


###################################################
### chunk number 6: 
###################################################
#line 227 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
mget(names(get("738_at", hgu95av2GO)), GOTERM)


###################################################
### chunk number 7: 
###################################################
#line 238 "vignettes/annotate/inst/doc/useDataPkgs.Rnw"
sessionInfo()