## Not run: # Need internet connection
# choosebank("emblTP")
# mylist <- query("mylist", "sp=felis catus et t=cds et o=mitochondrion")
# stopifnot(is.SeqAcnucWeb(mylist$req[[1]]))
# closebank()
# ## End(Not run)
Run the code above in your browser using DataLab