从svyglm创建一个函数

Question

我使用调查包符合以下glm模型：

design <- svydesign(ids=training.data$name, design=design,family=quasibinomial(), data=training.data)
significant.model <- svyglm(Win~x+ y + start+ speed+ vx0 + vy0 + ay + az + length+ rate+ height+ hand+ zone+ count, design=design, family=quasibinomial, data=training.data)

我有一组测试数据，我从模型拟合过程中排除，这样我就能看到模型如何预测测试数据的结果并检查差异。

通常，我会在马赛克包中使用makeFun，但这不支持svyglm类型的对象。是否有其他功能或方法可用于为模型创建功能？

有很多具有多个级别的分类变量，因此在这种情况下编写用户定义的函数并不理想。

Answer 1

我不确定您遇到的困难，因为您的示例无法重现。但由于svyglm对象是 glm个对象，makeFun()将围绕predict()创建一个包装器，就像它对任何{{1}一样对象。这尚未经过广泛测试，但它似乎适用于以下示例：

glm