transcriptENSEMBL(gen, chr, start, end,showId = FALSE)
http://genome-euro.ucsc.edu/cgi-bin/hgTrackUi?hgsid=202839739_2hYQ1BAOuBMAR620GjrtdrFAy6dn&c=chr6&g=ensGene
ISCATrack
, GWASTrack
, knownGenesUCSC
,
genesNameENSEMBL
, GeneReviewsTrack
, GADTrack
, genesENSEMBL
, xenorefGenesUCSC
,
library("Gviz")
gen <- "hg19"
chr <- "chr7"
start <- 38290160
end <- 38303219
if(interactive()){
transENSMBLtrack<-transcriptENSEMBL(gen,chr,start,end,showId=TRUE)
plotTracks(transENSMBLtrack, from=start, to=end)
} else {
data(transENSMBLtrack)
plotTracks(transENSMBLtrack, from=start, to=end)
}
Run the code above in your browser using DataLab