data-raw/wrangle-scripts/04-episodes-wrangle.R

episodes <- readr::read_csv(here::here("data-raw", "episodes.csv"),
                         col_types = cols(series = col_factor(levels = NULL),
                                          episode = col_factor(levels = NULL),
                                          technical = col_integer()))

# end of exports
usethis::use_data(episodes, overwrite = TRUE)
apreshill/bakeoff documentation built on Nov. 2, 2022, 11:09 p.m.