From 570714b611155e7c92b6cfe76327ba182b3a9e51 Mon Sep 17 00:00:00 2001
From: dj44vuri <julian.sagebiel@idiv.de>
Date: Tue, 4 Jun 2024 09:21:51 +0000
Subject: [PATCH] Update quicktexregapollo.R. took away error message when
classes are not apollo maxLik and xxx
---
R/quicktexregapollo.R | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/R/quicktexregapollo.R b/R/quicktexregapollo.R
index eac46e9..1858576 100644
--- a/R/quicktexregapollo.R
+++ b/R/quicktexregapollo.R
@@ -17,9 +17,9 @@ quicktexregapollo <- function(model = model, wtpest = NULL, se="rob") {
stop("Invalid value for 'se'. Please use one of 'rob', 'normal', or 'bs'.")
}
- if (!all(c("apollo", "maxLik", "maxim") %in% class(model))) {
- stop("Invalid model class. The model must be of classes 'apollo', 'maxLik', and 'maxim'.")
- }
+ # if (!all(c("apollo", "maxLik", "maxim") %in% class(model))) {
+ # stop("Invalid model class. The model must be of classes 'apollo', 'maxLik', and 'maxim'.")
+ # }
if (se == "bs" && !"bootse" %in% names(model)) {
--
GitLab