.extract_model_data(): Offsets bug

[fweber144]

Doesn't line

brms/R/projpred.R

Line 197 in 8cb2d4b

offset <- as.vector(sdata[[paste0("offset", usc_resp)]])

have to read offset <- as.vector(sdata[[paste0("offsets", usc_resp)]]), i.e. with "offsets" instead of "offset"? Otherwise, the offsets are not written to the projpred "refmodel":

library(brms)
set.seed(5687)
epilepsy$offs_col <- rnorm(nrow(epilepsy))
fit <- brm(count ~ zAge + zBase * Trt + offset(offs_col),
           data = epilepsy, family = poisson(),
           chains = 2, iter = 500, seed = 802)
ref <- get_refmodel(fit)
all(ref$offset == 0)

gives TRUE.

[paul-buerkner]

Thanks. Should now be fixed.