# \donttest{
# Create temporary directory for example
temp_dir <- tempfile()
dir.create(temp_dir)
# Initialise and import
boilerplate_init(data_path = temp_dir, create_dirs = TRUE, confirm = FALSE, quiet = TRUE)
db <- boilerplate_import(data_path = temp_dir, quiet = TRUE)
# Validate references
validation <- boilerplate_validate_references(db)
if (length(validation$missing) > 0) {
warning("Missing references: ", paste(validation$missing, collapse = ", "))
}
# Clean up
unlink(temp_dir, recursive = TRUE)
# }
Run the code above in your browser using DataLab