# This is UCSC Genome browser
setDasServer(server="http://genome.ucsc.edu/cgi-bin/das")
# Note that id now changes, we can retrieve it from getDasDsn()
source <- "sacCer3"
range <- GRanges(c("I"), IRanges(start=1, end=2500))
type <- c("sgdGene")
# We want the official genes from 'sdgGene' in the range I:1-2500
features <- getDasFeature(source, range, type)
print(features)
plotFeatures(features)
Run the code above in your browser using DataLab