inst/extexamples/qdrg-coda.R

# Use a stored example having a posterior sample
# Model is based on the data in lme4::cbpp
post <- readRDS(system.file("extdata", "cbpplist", package = "emmeans"))$post.beta

rg2 <- qdrg(~ size + period, data = lme4::cbpp, mcmc = post, link = "logit")

summary(rg2, type = "response")
rvlenth/emmeans documentation built on May 5, 2024, 3:07 a.m.