# NOT RUN {
# + + + + + + + + + + + + + + + + + + #
# A) Extract from Genome
# + + + + + + + + + + + + + + + + + + #
ensfile<-system.file("extdata",
"hs.ensembl.62.small.RData", package="refGenome")
ens<-loadGenome(ensfile)
ddx<-extractByGeneId(ens,"ENSG00000223972")
ddx
# + + + + + + + + + + + + + + + + + + #
# B) Extract from splice junctions
# + + + + + + + + + + + + + + + + + + #
junc<-getSpliceTable(ens)
ddx<-extractByGeneId(junc,"ENSG00000223972")
ddx
# }
Run the code above in your browser using DataLab