R/create_test_data.R

# create_test_data

ds_mt <-
  mtcars %>%
  dplyr::mutate(
    cyl = as.integer(cyl),
    am = factor(am, labels = c("auto", "manual")),
    vs = factor(vs, labels = c("V", "S"))
  )

readr::write_rds(ds_mt, here::here("inst", "testdata", "ds_mt.rds"))
Kidapt/keda documentation built on Nov. 23, 2019, 3:35 a.m.