data-raw/pop_age_2019/pop_age_2019-dataprep.R

library(readr)

# load data ---------------------------------------------------------------------
raw_data <- read_csv(here::here("data-raw/pop_age_2019/pop_age_2019.csv"))

# cleaning ----------------------------------------------------------------------

# no cleaning required
pop_age_2019 <- raw_data

# save --------------------------------------------------------------------------

usethis::use_data(pop_age_2019, overwrite = TRUE)
OpenIntroStat/usdata documentation built on June 3, 2024, 3:46 p.m.