## Not run:
# # Look up names like mammalia
# name_lookup(query='mammalia', limit = 20)
#
# # Paging
# name_lookup(query='mammalia', limit=1)
# name_lookup(query='mammalia', limit=1, start=2)
#
# # large requests, use start parameter
# first <- name_lookup(query='mammalia', limit=1000)
# second <- name_lookup(query='mammalia', limit=1000, start=1000)
# tail(first$data)
# head(second$data)
# first$meta
# second$meta
#
# # Get all data and parse it, removing descriptions which can be quite long
# out <- name_lookup('Helianthus annuus', rank="species", verbose=TRUE)
# lapply(out$data, function(x) x[!names(x) %in% c("descriptions","descriptionsSerialized")])
#
# # Search for a genus, returning just data
# name_lookup(query='Cnaemidophorus', rank="genus", return="data")
#
# # Just metadata
# name_lookup(query='Cnaemidophorus', rank="genus", return="meta")
#
# # Just hierarchies
# name_lookup(query='Cnaemidophorus', rank="genus", return="hierarchy")
#
# # Just vernacular (common) names
# name_lookup(query='Cnaemidophorus', rank="genus", return="names")
#
# # Fuzzy searching
# name_lookup(query='Cnaemidophor', rank="genus")
#
# # Limit records to certain number
# name_lookup('Helianthus annuus', rank="species", limit=2)
#
# # Query by habitat
# name_lookup(habitat = "terrestrial", limit=2)
# name_lookup(habitat = "marine", limit=2)
# name_lookup(habitat = "freshwater", limit=2)
#
# # Using faceting
# name_lookup(facet='status', limit=0, facetMincount='70000')
# name_lookup(facet=c('status','higherTaxonKey'), limit=0, facetMincount='700000')
#
# name_lookup(facet='nameType', limit=0)
# name_lookup(facet='habitat', limit=0)
# name_lookup(facet='datasetKey', limit=0)
# name_lookup(facet='rank', limit=0)
# name_lookup(facet='isExtinct', limit=0)
#
# name_lookup(isExtinct=TRUE, limit=0)
#
# # text highlighting
# ## turn on highlighting
# res <- name_lookup(query='canada', hl=TRUE, limit=5)
# res$data
# name_lookup(query='canada', hl=TRUE, limit=45, return='data')
# ## and you can pass the output to gbif_names() function
# res <- name_lookup(query='canada', hl=TRUE, limit=5)
# gbif_names(res)
#
# # Lookup by datasetKey
# name_lookup(datasetKey='3f8a1297-3259-4700-91fc-acc4170b27ce')
#
# # Pass on httr options
# library('httr')
# name_lookup(query='Cnaemidophorus', rank="genus", config=verbose())
# ## End(Not run)
Run the code above in your browser using DataLab