Skip to content

Commit

Permalink
p_function() gets vcov-args
Browse files Browse the repository at this point in the history
  • Loading branch information
strengejacke committed Sep 15, 2024
1 parent 37509c2 commit 032e818
Show file tree
Hide file tree
Showing 2 changed files with 37 additions and 1 deletion.
7 changes: 6 additions & 1 deletion R/p_function.R
Original file line number Diff line number Diff line change
Expand Up @@ -18,6 +18,7 @@
#' @inheritParams model_parameters
#' @inheritParams model_parameters.default
#' @inheritParams model_parameters.glmmTMB
#' @inheritParams standard_error
#'
#' @note
#' Curently, `p_function()` computes intervals based on Wald t- or z-statistic.
Expand Down Expand Up @@ -223,6 +224,8 @@ p_function <- function(model,
exponentiate = FALSE,
effects = "fixed",
component = "all",
vcov = NULL,
vcov_args = NULL,
keep = NULL,
drop = NULL,
verbose = TRUE,
Expand All @@ -234,7 +237,9 @@ p_function <- function(model,
se <- standard_error(
model,
effects = effects,
component = component
component = component,
vcov = vcov,
vcov_args = vcov_args
)$SE

if (is.null(dof) || length(dof) == 0 || .is_chi2_model(model, dof)) {
Expand Down
31 changes: 31 additions & 0 deletions man/p_function.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

0 comments on commit 032e818

Please sign in to comment.