From 38eca0da138332bacb47ce0e3a8cc48f257bd0c8 Mon Sep 17 00:00:00 2001
From: Johannes Ranke <jranke@uni-bremen.de>
Date: Tue, 1 Nov 2022 11:10:03 +0100
Subject: Fix a bug, couldn't set class attribute on NULL

---
 R/illparms.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'R/illparms.R')

diff --git a/R/illparms.R b/R/illparms.R
index b2d510dc..4f5f8b00 100644
--- a/R/illparms.R
+++ b/R/illparms.R
@@ -97,7 +97,7 @@ illparms.saem.mmkin <- function(object, conf.level = 0.95, random = TRUE, errmod
     failed <- NA
   } else {
     ints <- intervals(object, conf.level = conf.level)
-    failed <- NULL
+    failed <- character(0)
     if (random) {
       failed_random <- ints$random[, "lower"] < 0
       failed <- c(failed, names(which(failed_random)))
-- 
cgit v1.2.1