From 1a8df412954ac7052a05ab217507a013f11a6eee Mon Sep 17 00:00:00 2001
From: Steffen Ehrmann <steffen.ehrmann@posteo.de>
Date: Mon, 16 Sep 2024 15:38:26 +0200
Subject: [PATCH] filter NA obsNames

---
 R/helpers.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/helpers.R b/R/helpers.R
index b772944..6610508 100644
--- a/R/helpers.R
+++ b/R/helpers.R
@@ -407,6 +407,7 @@
       if(varName == "listed"){
 
         obsNames <- unique(outObs$listed$key)
+        obsNames <- obsNames[!is.na(obsNames)]
         idNames <- names(ids)
 
         equalID <- map(.x = seq_along(outIDs), .f = function(ix){