library(tidyverse)
shipping_errors <- readr::read_csv(here::here("data-raw", "shipping_errors.csv"))
shipping_errors <- shipping_errors %>% mutate(across(where(is_character), as_factor))
usethis::use_data(shipping_errors, overwrite = TRUE)
usethis::use_r("shipping_errors")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.