fix minor bug in showLinePlots

fbenke-pik · Feb 15, 2024 · 5404e29 · 5404e29
1 parent 2b42a9b
commit 5404e29
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/showLinePlots.R b/R/showLinePlots.R
@@ -28,7 +28,8 @@ showLinePlots <- function(
     mainReg = getOption("mip.mainReg")
 ) {
 
-  data <- as.quitte(data)
+  data <- as.quitte(data) %>%
+    filter(!is.na(.data$value))
 
   # Validate function arguments.
   stopifnot(is.character(vars) || is.null(vars))