# NOT RUN {
# Plug in taxonomic IDs
children(161994, db = "itis")
children(8028, db = "ncbi")
children("578cbfd2674a9b589f19af71a33b89b6", db = "col")
## works with numeric if as character as well
children("161994", db = "itis")
# Plug in taxon names
children("Salmo", db = 'col')
children("Salmo", db = 'itis')
children("Salmo", db = 'ncbi')
children("Salmo", db = 'worms')
# Plug in IDs
(id <- get_colid("Apis"))
children(id)
(id <- get_wormsid("Platanista"))
children(id)
## Equivalently, plug in the call to get the id via e.g., get_colid
## into children
(id <- get_colid("Apis"))
children(id)
children(get_colid("Apis"))
# Many taxa
sp <- c("Tragia", "Schistocarpha", "Encalypta")
children(sp, db = 'col')
children(sp, db = 'itis')
# Two data sources
(ids <- get_ids("Apis", db = c('col','itis')))
children(ids)
## same result
children(get_ids("Apis", db = c('col','itis')))
# Use the rows parameter
children("Poa", db = 'col')
children("Poa", db = 'col', rows=1)
# use curl options
res <- children("Poa", db = 'col', rows=1, verbose = TRUE)
# }
Run the code above in your browser using DataLab