r - 在回归输出中添加列
问题描述
我想在我的回归输出中添加一个带有 X²(卡方)的列以及一个带有 Exp(B) 的列。有没有关于如何做到这一点的想法?提前谢谢了。现在我已经为每个模型和变量手动计算了这个,这非常耗时。
model_simple <- as.formula("completion_yesno ~ ac + ov + UCRate + FirstWeek + LastWeek + DayofWeekSu + DayofWeekMo + DayofWeekTu + DayofWeekWe + DayofWeekTh + DayofWeekFr + MonthofYearJan + MonthofYearFeb + MonthofYearMar + MonthofYearApr +MonthofYearMay+ MonthofYearJun + MonthofYearJul + MonthofYearAug + MonthofYearSep + MonthofYearOct + MonthofYearNov")
clog_simple1 = glm(model_simple,data=cllw,family = binomial(link = cloglog))
summary(clog_simple1)
解决方案
也许您可以详细说明卡方和 exp(B) 的含义。您可以执行以下操作:
da <- MASS::Pima.tr
model <- glm(type ~ .,data=da,family = binomial(link = cloglog))
results <- data.frame(coefficients(summary(model)),check.names=FALSE)
# some random values
results$chisq = rchisq(nrow(results),1)
results$expB = exp(results$Estimate)
或者您可以使用扫帚中的 tidy:
library(broom)
results = tidy(model)
results$expB = exp(results$Estimate)
推荐阅读
- javascript - Mac 上 Safari 中的 JS window.location 问题
- php - 使用 codeigniter 中的 PayPal 集成,成功页面没有向我返回任何内容
- python - 如何将公交车进/出站记录汇总到行程中以提供唯一ID,并删除时间差小的重复记录?
- javascript - 当我添加引导 CDN 样式表时,我的网站页面上的元素会受到影响。*全屏运行代码*
- python - 擦除 IDLE shell 中的代码行以便在命令提示符下运行 .py 文件
- java - 从3d矩阵java中删除一个元素
- ios - 行删除后自定义剖面视图未更新
- ajax - Laravel 在 ajax 调用时出错。意外回归
- javascript - 如何用一张图片制作幻灯片
- javascript - 为什么我的反应应用程序和快速服务器之间的获取请求不起作用?