# NOT RUN {
# }
# NOT RUN {
read.GB("AY059961")
#Download the sequences making data(anoteropsis) from Genbank
nums <- 59961:59993
seqs <- paste("AY0", nums, sep="")
dat <- read.GB(seqs)
attr(dat, "species")
attr(dat, "gene")
attr(dat, "accession_num")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab