# Plug in taxon names directly
classification(c("Chironomus riparius", "aaa vva"), db = 'ncbi')
classification(c("Chironomus riparius", "aaa vva"), db = 'itis')
classification(c("Chironomus riparius", "aaa vva"), db = 'eol')
classification(c("Chironomus riparius", "aaa vva"), db = 'col')
classification(c("Chironomus riparius", "asdfasdfsfdfsd"), db = 'gbif')
classification(c("Poa annua", "aaa vva"), db = 'tropicos')
# Use methods for get_uid, get_tsn, get_eolid, get_colid, get_tpsid
classification(get_uid(c("Chironomus riparius", "Puma concolor")))
classification(get_uid(c("Chironomus riparius", "aaa vva")))
classification(get_tsn(c("Chironomus riparius", "aaa vva")))
classification(get_eolid(c("Chironomus riparius", "aaa vva")))
classification(get_colid(c("Chironomus riparius", "aaa vva")))
classification(get_tpsid(c("Poa annua", "aaa vva")))
# Pass many ids from class "ids"
out <- get_ids(names="Puma concolor", db = c('ncbi','gbif'))
cl <- classification(out)
# Bind width-wise from class classification_ids
cbind(cl)
# Bind length-wise
rbind(cl)
# Many names to get_ids
out <- get_ids(names=c("Puma concolor","Accipiter striatus"), db = c('ncbi','itis','col'))
cl <- classification(out)
rbind(cl)
cbind(cl)
# rbind and cbind on class classification (from a call to get_colid, get_tsn, etc.
# - other than get_ids)
cl_col <- classification(get_colid(c("Puma concolor","Accipiter striatus")))
cl_uid <- classification(get_uid(c("Puma concolor","Accipiter striatus")))
cl_tsn <- classification(get_tsn(c("Puma concolor","Accipiter striatus")))
rbind(cl_col)
rbind(cl_uid)
rbind(cl_tsn)
cbind(cl_col)
cbind(cl_uid)
cbind(cl_tsn)
tsns <- get_tsn(c("Puma concolor","Accipiter striatus"))
cl_tsns <- classification(tsns)
cbind(cl_tsns)
Run the code above in your browser using DataLab