library(tidyverse)
# eBird taxonomy
# source: http://help.ebird.org/customer/en/portal/articles/1006825-the-ebird-taxonomy
# typically updated annually in the late summer
ebird_taxonomy <- read_csv("data-raw/eBird_Taxonomy_v2016.csv") %>%
select(category = CATEGORY, species_code = SPECIES_CODE,
name_common = PRIMARY_COM_NAME, name_scientific = SCI_NAME,
order = ORDER, family = FAMILY) %>%
as.data.frame()
write_csv(ebird_taxonomy, "data-raw/ebird-taxonomy.csv")
devtools::use_data(ebird_taxonomy, overwrite = TRUE, compress = 'xz')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.