data-raw/create_variables_to_humanize.R

# This dataset contain the variables suitable to humanize and its data related

library(devtools)

original_wd <- getwd()

setwd("data-raw")

variables_to_humanize <- read.csv("variables_to_humanize.csv",
                                  fileEncoding = "UTF-8")

# use_data() create the file in /data
usethis::use_data(variables_to_humanize, overwrite = TRUE)

devtools::document()

setwd(original_wd)
rm(original_wd, variables_to_humanize)
Eucrow/sapmuebase documentation built on April 17, 2024, 10:29 a.m.