From 388cc7f592f31678c510d5af79e54d88dd728d8e Mon Sep 17 00:00:00 2001 From: markus1bauer Date: Fri, 19 Apr 2024 14:40:25 +0200 Subject: [PATCH] Update CI_2_Generate_warnings.R --- R/CI_2_Generate_warnings.R | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/R/CI_2_Generate_warnings.R b/R/CI_2_Generate_warnings.R index 058552e..1a2dc6a 100644 --- a/R/CI_2_Generate_warnings.R +++ b/R/CI_2_Generate_warnings.R @@ -20,15 +20,15 @@ rm(list = ls()) #### Load files #### -path <- file.path(here("testthat", "warnings_file.csv")) -if(file.exists(path)) warning_file <- read.csv(path) +path <- file.path(here("testthat", "warnings_different_total_cover.csv")) +if(file.exists(path)) + warning_file <- read.csv(path) # write warning messages #### warning_messages <- c( - "unhealthy_but_wrong_status" = "There are living trees that are unhealthy but status is not AU.", - "wounded_level_but_wrong_status_or_FAD" = "There are trees with wounded level but no W in FAD." + "warnings_different_total_cover" = "Total cover estimated and accumulated cover do not match" )