# 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())
# }
Run the code above in your browser using DataLab