R/project_log.R

In patelm9/projectloggeR: This package creates the tools needed to log data input for provenance.

#' Universal project log function that instantiates, updates, and refreshes PROJECT_LOG object
#' @import readr
#' @export
project_log <-
        function() {
                unveil_project_log()

                if (!(file.exists("PROJECT_LOG.RData"))) {
                        if (!(file.exists("PROJECT_LOG.csv"))) {
                                unveil_project_log()
                        }
                } else {
                        PROJECT_LOG <<- readr::read_rds("PROJECT_LOG.RData")
                        add_new_csv_data_to_log()
                }
        }