library("Gviz")
gen <- "hg38"
chr <- "chr1"
start <- 1000000
end <- 20000000
if(interactive()){
miRNATargetRegionsBiomartTrack<-miRNATargetRegionsBiomart_ENSEMBL(gen,chr,start,end,
datasetEnsembl = "hsapiens_mirna_target_feature")
plotTracks(miRNATargetRegionsBiomartTrack, from = start, to = end)
} else {
data(miRNATargetRegionsBiomartTrack)
plotTracks(miRNATargetRegionsBiomartTrack, from = start, to = end)
}
Run the code above in your browser using DataLab