data-raw/prius_mpg/prius_mpg-dataprep.R

# load packages ----------------------------------------------------------------
library(tidyverse)
library(lubridate)

# load data --------------------------------------------------------------------
prius_mpg_raw <- read_csv(here::here("data-raw/prius_mpg", "prius_mpg.csv"))

# fix dates --------------------------------------------------------------------
prius_mpg <- prius_mpg_raw %>%
  mutate(last_updated = mdy(last_updated))

# save -------------------------------------------------------------------------
use_data(prius_mpg, overwrite = TRUE)
OpenIntroStat/openintro-r-package documentation built on Nov. 19, 2023, 4:58 p.m.