# NOT RUN {
# Select number of countries to facet on
count_facet(by='country', countries=3, removezeros = TRUE)
# Or, pass in country names
count_facet(by='country', countries='AR', removezeros = TRUE)
spplist <- c('Geothlypis trichas','Tiaris olivacea','Pterodroma axillaris',
'Calidris ferruginea','Pterodroma macroptera',
'Gallirallus australis',
'Falco cenchroides','Telespiza cantans','Oreomystis bairdi',
'Cistothorus palustris')
keys <- sapply(spplist,
function(x) name_backbone(x, rank="species")$usageKey)
count_facet(keys, by='country', countries=3, removezeros = TRUE)
count_facet(keys, by='country', countries=3, removezeros = FALSE)
count_facet(by='country', countries=20, removezeros = TRUE)
# Pass in country names instead
countries <- isocodes$code[1:10]
count_facet(by='country', countries=countries, removezeros = TRUE)
# get occurrences by georeferenced state
## across all records
count_facet(by='georeferenced')
## by keys
count_facet(keys, by='georeferenced')
# by basisOfRecord
count_facet(by="basisOfRecord")
# }
Run the code above in your browser using DataLab