data-raw/mum.R

# Load the data

mum <- readxl::read_excel("data-raw/MUM.xlsx")

## Mutate the data. Taken from 36-202 Lab 7 Spring 2018

mum <- dplyr::mutate(mum, Visibility = as.factor(Visibility), 
              TestResult = as.factor(TestResult))

# Save the data

## readr::write_csv(mum, "data-raw/mum.csv")
usethis::use_data(mum, overwrite = TRUE)
frank113/cmu202 documentation built on July 17, 2020, 9:31 p.m.