data-raw/1_use_data.R

rm(list = ls())
devtools::load_all()

list.files("data-raw", "rda$", full.names = TRUE) %>%
lapply(load, globalenv())

ls() %>%
{paste0(
  "usethis::use_data(",
  paste(., collapse = ", "),
  ")"
)} %>%
parse(text = .) %>%
eval(.)
paulhibbing/TwoRegression documentation built on July 9, 2023, 2:57 a.m.