From d3819b786ed50a5857351a2796f0160d2fd45aec Mon Sep 17 00:00:00 2001
From: Andreas Gammelgaard Damsbo <andreas@gdamsbo.dk>
Date: Sat, 10 May 2025 13:01:48 +0200
Subject: [PATCH] omit missing

---
 R/plot_euler.R | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/R/plot_euler.R b/R/plot_euler.R
index 4dff9de..10156b7 100644
--- a/R/plot_euler.R
+++ b/R/plot_euler.R
@@ -87,10 +87,11 @@ plot_euler <- function(data, pri, sec, ter = NULL, seed = 2103) {
   out <- lapply(ds, \(.x){
     .x[c(pri, sec)] |>
       as.data.frame() |>
+      na.omit() |>
       plot_euler_single()
   })
 
-# names(out)
+  # names(out)
   wrap_plot_list(out)
   # patchwork::wrap_plots(out, guides = "collect")
 }