data-raw/avian_community.R

library(dplyr)

avian_community <- readr::read_csv("STRIPsBirdsAllObs.csv") %>%
  setNames(tolower(names(.))) %>%
  select(survey, tba, richness, simp.ind) %>%
  rename(abundance = tba,
         diversity = simp.ind)

devtools::use_data(avian_community, overwrite = TRUE)
ISU-STRIPS/STRIPSSchulte documentation built on May 7, 2019, 6:36 a.m.