## Not run:
# resolve(query=c("Helianthus annuus", "Homo sapiens"))
# resolve(query="Quercus keloggii", db='gnr')
# resolve(query=c("Helianthus annuus", "Homo sapiens"), db='tnrs')
# resolve(query=c("Helianthus annuus", "Homo sapiens"), db=c('iplant', 'gnr'))
# resolve(query="Quercus keloggii", db=c('iplant', 'gnr'))
# resolve(query="Quercus keloggii", db=c('iplant', 'gnr', 'tnrs'))
#
# # pass in options specific to each source
# resolve("Helianthus annuus", db = 'gnr', preferred_data_sources = c(3, 4))
# resolve("Helianthus annuus", db = 'iplant', retrieve = 'best')
# identical(
# resolve("Helianthus annuus", db = 'iplant', retrieve = 'best')$iplant,
# iplant_resolve("Helianthus annuus", retrieve = 'best')
# )
# mynames <- c("Helianthus annuus", "Pinus contorta", "Poa annua",
# "Abies magnifica", "Rosa california")
# resolve(mynames, db = 'tnrs', source = "NCBI")
# resolve(mynames, db = 'tnrs', source = "iPlant_TNRS")
# identical(
# resolve(mynames, db = 'tnrs', source = "iPlant_TNRS")$tnrs,
# tnrs(mynames, source = "iPlant_TNRS")
# )
#
# # pass in curl options
# library("httr")
# resolve(query="Qercuss", db = "iplant", config=verbose())
# res <- resolve(query=c("Helianthus annuus", "Homo sapiens"), config=progress())
# ## End(Not run)
Run the code above in your browser using DataLab