## Not run:
# library(biovizBase)
# p.ideo <- Ideogram(genome = "hg19")
# p.ideo
# library(GenomicRanges)
# p.ideo + xlim(GRanges("chr2", IRanges(1e8, 1e8+10000)))
# Ideogram(genome = "hg19", xlabel = TRUE)
# ## End(Not run)
Run the code above in your browser using DataCamp Workspace