if (FALSE) {
# Plug in taxonomic IDs
children(161994, db = "itis")
children(8028, db = "ncbi")
## works with numeric if as character as well
children(161994, db = "itis")
children(88899, db = "bold")
children(as.boldid(88899))
# Plug in taxon names
children("Salmo", db = 'itis')
children("Salmo", db = 'ncbi')
children("Salmo", db = 'worms')
children("Salmo", db = 'bold')
# Plug in IDs
(id <- get_wormsid("Gadus"))
children(id)
# Many taxa
sp <- c("Tragia", "Schistocarpha", "Encalypta")
children(sp, db = 'itis')
# Two data sources
(ids <- get_ids("Apis", db = c('ncbi','itis')))
children(ids)
## same result
children(get_ids("Apis", db = c('ncbi','itis')))
# Use the rows parameter
children("Poa", db = 'itis')
children("Poa", db = 'itis', rows=1)
# use curl options
res <- children("Poa", db = 'itis', rows=1, verbose = TRUE)
}
Run the code above in your browser using DataLab