snpLocationsUCSC(gen, chr, start, end, track)
http://bioconductor.org/packages/release/bioc/html/Gviz.html
snpLocationsUCSC
, structureBiomart
, COSMICTrack
,
CoreillCNVTrack
, ClinVarMainTrack
,
ClinVarCnvTrack
,
library("Gviz")
gen <- "hg19"
chr <- "chr7"
start <- 38290160
end <- 38303219
if(interactive()) {
snpUCSCtrack<-snpLocationsUCSC(gen,chr,start,end,"snp138")
plotTracks(snpUCSCtrack, from = start, to =end)
} else {
data(snpUCSCtrack)
plotTracks(snpUCSCtrack, from = start, to =end)
}
Run the code above in your browser using DataLab