# NOT RUN {
# Result of call to works()
x <- works(orcid_id("0000-0001-8607-8025"))
# doi by default
identifiers(x)
# orcids
identifiers(x, "orcid")
# pmid
identifiers(x, "pmid")
# pmc
identifiers(x, "pmc")
# other_id
identifiers(x, "other_id")
# Result of call to orcid_id()
x <- orcid_id(orcid = "0000-0002-9341-7985")
identifiers(x, "doi")
identifiers(x, "eid")
# Result of call to orcid()
x <- orcid(query="carl+boettiger")
identifiers(x)
# Result of call to orcid_doi()
x <- orcid_doi(dois="10.1087/20120404", fuzzy=TRUE)
identifiers(x)
# }
Run the code above in your browser using DataLab