我开始探索这个rstanarm
包,并对这个包如何潜在地用于自适应试验场景感到好奇。小插图中给出的示例场景提供了 -0.622 的后验,可信区间为 -0.69 到 -0.56。
当我有来自自适应试验的额外数据时,如果我想将此后验用作下一个模型的先验,我的脚本会是什么样子?
# Code from vignette
t_prior <- student_t(df = 7, location = 0, scale = 2.5)
fit1 <- stan_glm(switch ~ dist100, data = wells,
family = binomial(link = "logit"),
prior = t_prior, prior_intercept = t_prior,
chains = 10, cores = 2, seed = 3245, iter = 100)