data-raw/build-templates.R

template_file <- './data-raw/test-template.txt'
test_template <- readChar(template_file, file.info(template_file)$size)

# Save to R/Sysdata.rda
usethis::use_data(test_template, internal = TRUE, overwrite = TRUE)



## Define Euler's number
e <- exp(1)
usethis::use_data(e, internal = FALSE)
adamleerich/alrtools documentation built on March 12, 2024, 11:38 p.m.