Оказывается, что объекты "biglm" и "bigglm" очень похожи на объекты "lm" и "glm", с незначительными изменениями в их структуре. Таким образом, кажется, что все, что нам нужно сделать, - это обмануть emmeans
, думая, что это один из них. Вот утилита для этой цели:
as.glm = function(mod) {
mod$coefficients = coef(mod)
mod$df.residual = mod$df.resid
class(mod) = c(class(mod), "glm", "lm")
mod
}
Теперь мы получаем:
> emmeans(as.glm(b), "f")
f emmean SE df asymp.LCL asymp.UCL
A 3.288124 0.1337527 Inf 3.025974 3.550275
B 3.256313 0.1381392 Inf 2.985565 3.527061
Confidence level used: 0.95