powered by
esummary
"["(x, i) "[["(x, i)
## Not run: # ds <- esummary("470338", "protein") # ds["//Slen/node()"] # # library("XML") # as.numeric(xmlValue(ds[["//Slen"]])) # ## End(Not run)
Run the code above in your browser using DataLab