## Not run:
# #Yersinia pestis reference sequences
# ncbiSubmit("Yersinia pestis CO92[ORGN] AND refseq[FILTER]")
# # Ebola virus - no patents or references
# ebola<- ncbiSubmit("Ebolavirus[ORGN] NOT gbdiv_pat[PROP] NOT refseq[FILTER]")
# head(ebola)
# # a few early submissions may be missing
# subset(ebola, is.na(submitted))
# table(year(ebola$submit))
# ## End(Not run)
Run the code above in your browser using DataLab