## Not run:
# out <- works(orcid_id("0000-0002-9341-7985"))
# out
# out$data
#
# #works( orcid_id("0000-0003-1620-1408") )
# works( orcid_id("0000-0002-1642-628X") )
# works( orcid_id("0000-0003-1444-9135") )
# works( orcid_id("0000-0003-1419-2405") )
#
# out <- orcid(query="keyword:ecology")
# works(orcid_id(out$`orcid-identifier.path`[7]))
# works(orcid_id(out$`orcid-identifier.path`[8]))
# works(orcid_id(out$`orcid-identifier.path`[9]))
# works(orcid_id(out$`orcid-identifier.path`[10]))
#
# works(as.orcid("0000-0002-1642-628X"))
# ## End(Not run)
Run the code above in your browser using DataLab