data-raw/italian.R

In stannir98/bigfuntest: What the Package Does (One Line, Title Case)

## code to prepare `italian` dataset goes here
library(janitor)
library(tidyverse)
italian <- readr::read_csv("http://gattonweb.uky.edu/sheather/book/docs/datasets/nyc.csv")
italian <- italian %>%
  clean_names()
italian <- italian %>%
  select(-case)
italian <- italian %>%
  mutate(east = factor(east, labels = c("West", "East")))
usethis::use_data(italian, overwrite = TRUE)