delete_all_data.R

# This script will delete all data and targets generated by the data set creation process. Use if you wish to do a hard reset for a fresh rerun.

targets::tar_destroy(ask = FALSE)



delete <- c("files/",
            "temp/",
            "analysis/",
            "output/",
            "temp_tesseract",
            list.files(pattern = "\\.tiff"))



unlink(delete, recursive = TRUE)