powered by
buildPubMedAbst(xml)
pubmed
genbank
x <- pubmed("9695952","8325638","8422497") a <- xmlRoot(x) numAbst <- length(xmlChildren(a)) absts <- list() for (i in 1:numAbst) { absts[[i]] <- buildPubMedAbst(a[[i]]) }
Run the code above in your browser using DataLab