From ae26c441e33bd189b873bd540bc83dcf79e191bc Mon Sep 17 00:00:00 2001 From: Falk Benke Date: Thu, 5 Sep 2024 15:40:02 +0200 Subject: [PATCH] do not check for duplicates when reading in mif files --- inst/compareScenarios/cs_main.Rmd | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/inst/compareScenarios/cs_main.Rmd b/inst/compareScenarios/cs_main.Rmd index 08675c1..b67e1dd 100644 --- a/inst/compareScenarios/cs_main.Rmd +++ b/inst/compareScenarios/cs_main.Rmd @@ -128,7 +128,7 @@ if (!is.null(params$cfgScen)) { dataScenNested <- tibble(path = unname(params$mifScen)) %>% rowid_to_column("fileid") %>% - mutate(data = map(path, read.quitte)) %>% + mutate(data = map(path, read.quitte, check.duplicates = FALSE)) %>% unnest(data) %>% nest(data = -c(fileid, path, scenario)) @@ -184,7 +184,7 @@ bkgndColors <- vapply(scenarioColors, lightenColor, rgb(0, 0, 0), by = 0.5) ```{r read historical mif} dataHist <- params$mifHist %>% - read.quitte(factors = TRUE) + read.quitte(factors = TRUE, drop.na = TRUE, check.duplicates = FALSE) ```