data-raw/inatQC.R

## code to prepare `inatQC` dataset goes here

# read from elsewhere, perhaps later best to get from API directly
inatQC <- readr::read_csv("../../BDQC-shiny-inat-time-series/iNatQC/iNatQC.csv")

library(tidyverse)

glimpse(inatQC)

inatQC <- inatQC %>% 
  select(-X1) 

usethis::use_data(inatQC, overwrite = TRUE)



# add regions -------------------------------------------------------------

data_with_region <- tableauchangementstemporels::get_data()



usethis::use_data(data_with_region, overwrite = TRUE)
ReseauBiodiversiteQuebec/tableauchangementstemporels documentation built on April 29, 2022, 4:02 p.m.