if (FALSE) {
canidae_quat <- pbdb_occurrences(
limit = "all", base_name = "Canidae", interval = "Quaternary",
show = c("coords", "classext", "ident"), vocab = "pbdb"
)
pbdb_subtaxa(canidae_quat)
}
Run the code above in your browser using DataLab