## Not run:
# as.tdmurl("http://downloads.hindawi.com/journals/bmri/2014/201717.xml", "xml")
# as.tdmurl("http://downloads.hindawi.com/journals/bmri/2014/201717.pdf", "pdf")
# out <- as.tdmurl("http://downloads.hindawi.com/journals/bmri/2014/201717.pdf",
# "pdf", "10.1155/2014/201717")
# attributes(out)
# ## End(Not run)
Run the code above in your browser using DataLab