tax_rank(query = "Helianthus annuus", db = "itis")
tax_rank(query = "Helianthus annuus", db = "ncbi")
tax_rank(query = "Helianthus", db = "itis")
tax_rank(query = "Baetis rhodani", db = "itis")
# query both
tax_rank(query=c("Helianthus annuus", 'Baetis rhodani'), db="both")
# An alternative way would be to use \link{classification} and sapply over
the list
x <- 'Baetis'
classi <- classification(get_uid(x))
sapply(classi, function(x) x[nrow(x), 'Rank'])
Run the code above in your browser using DataLab