## Not run:
# gbif_oai_identify()
#
# today <- format(Sys.Date(), "%Y-%m-%d")
# gbif_oai_list_identifiers(from = today)
# gbif_oai_list_identifiers(set = "country:NL")
#
# gbif_oai_list_records(from = today)
# gbif_oai_list_records(set = "country:NL")
#
# gbif_oai_list_metadataformats()
# gbif_oai_list_metadataformats(id = "9c4e36c1-d3f9-49ce-8ec1-8c434fa9e6eb")
#
# gbif_oai_list_sets()
# gbif_oai_list_sets(as = "list")
#
# gbif_oai_get_records("9c4e36c1-d3f9-49ce-8ec1-8c434fa9e6eb")
# ids <- c("9c4e36c1-d3f9-49ce-8ec1-8c434fa9e6eb",
# "e0f1bb8a-2d81-4b2a-9194-d92848d3b82e")
# gbif_oai_get_records(ids)
# ## End(Not run)
Run the code above in your browser using DataLab