fix

easystats · Mar 16, 2024 · 25f2a16 · 25f2a16
1 parent 3d5844d
commit 25f2a16
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/R/check_overdispersion.R b/R/check_overdispersion.R
@@ -171,6 +171,18 @@ check_overdispersion.glm <- function(x, verbose = TRUE, ...) {
     return(check_overdispersion(simulate_residuals(x, ...), ...))
   }
 
+  # check if we have poisson - need this for models not supported by DHARMa
+  if (!info$is_count && !info$is_binomial) {
+    insight::format_error(
+      "Overdispersion checks can only be used for models from Poisson families or binomial families with trials > 1."
+    )
+  }
+
+  # check for Bernoulli
+  if (info$is_bernoulli) {
+    insight::format_error("Overdispersion checks cannot be used for Bernoulli models.")
+  }
+
   yhat <- stats::fitted(x)
 
   n <- stats::nobs(x)