# NOT RUN {
library(parameters)
if (require("lme4")) {
data(mtcars)
model <- lmer(mpg ~ wt + (1 | gear), data = mtcars)
model_parameters(model)
}
# }
# NOT RUN {
if (require("glmmTMB")) {
data(Salamanders)
model <- glmmTMB(
count ~ spp + mined + (1 | site),
ziformula = ~mined,
family = poisson(),
data = Salamanders
)
model_parameters(model, details = TRUE)
# plot-method
if (require("see")) {
result <- model_parameters(model)
plot(result)
}
}
if (require("lme4")) {
model <- lmer(mpg ~ wt + (1 | gear), data = mtcars)
model_parameters(model, bootstrap = TRUE, iterations = 50)
}
# }
Run the code above in your browser using DataLab