update names

easystats · Sep 30, 2024 · b025fdb · b025fdb
1 parent c4acec0
commit b025fdb
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/check_model_diagnostics.R b/R/check_model_diagnostics.R
@@ -460,7 +460,7 @@
   if (!is.na(match(faminfo$family, c("binomial", "poisson", "truncated_poisson")))) {
     return(1)
   }
-  betad <- model$fit$par["betad"]
+  betad <- model$fit$par["betadisp"]
   switch(faminfo$family,
     gaussian = exp(0.5 * betad),
     Gamma = exp(-0.5 * betad),

diff --git a/tests/testthat/test-check_singularity.R b/tests/testthat/test-check_singularity.R
@@ -29,7 +29,7 @@ test_that("check_singularity", {
     newparam = list(
       beta = 0,
       theta = rep(0, 21),
-      betad = 0
+      betadisp = 0
     )
   )[[1]]
   expect_warning(expect_warning({