powered by
esummary
ds <- esummary("470338", "protein") ds["//Slen/node()"] require("XML") as.numeric(xmlValue(ds[["//Slen"]]))
Run the code above in your browser using DataLab