diff --git a/R/format_parameters.R b/R/format_parameters.R index 24510135a..b425adc1b 100644 --- a/R/format_parameters.R +++ b/R/format_parameters.R @@ -85,7 +85,7 @@ format_parameters.parameters_model <- function(model, ...) { # quick fix, for multivariate response models, we use # info from first model only - if (insight::is_multivariate(model) && !"is_zero_inflated" %in% names(info) && !inhertis(model, c("vgam", "vglm"))) { + if (insight::is_multivariate(model) && !"is_zero_inflated" %in% names(info) && !inherits(model, c("vgam", "vglm"))) { info <- info[[1]] } diff --git a/R/utils_model_parameters.R b/R/utils_model_parameters.R index ac26ec75d..68832056e 100644 --- a/R/utils_model_parameters.R +++ b/R/utils_model_parameters.R @@ -27,7 +27,7 @@ # for simplicity, we just use the model information from the first formula # when we have multivariate response models... - if (insight::is_multivariate(model) && !"is_zero_inflated" %in% names(info) && !inhertis(model, c("vgam", "vglm"))) { + if (insight::is_multivariate(model) && !"is_zero_inflated" %in% names(info) && !inherits(model, c("vgam", "vglm"))) { info <- info[[1]] }