5

我正在为不同的公司建模大量数据,并且对于每家公司,我需要快速识别那些最重要的模型参数。我想看到的是xtable()拟合模型的输出,该模型按 p 值的升序对所有系数进行排序(即最重要的参数在前)。

x <- data.frame(a=rnorm(100), b=runif(100), c=rnorm(100), e=rnorm(100))
fit <- glm(a ~ ., data=x)
xtable(fit)

我可以通过弄乱fit对象的结构来完成类似的事情。但我对结构不够熟悉,无法自信地改变任何东西。

建议?

4

1 回答 1

8

不一定是最优雅的解决方案,但这应该可以完成工作:

data(birthwt, package="MASS")
glm.res <- glm(low ~ ., data=birthwt[,-10])
idx <- order(coef(summary(glm.res))[,4])  # sort out the p-values
out <- coef(summary(glm.res))[idx,]       # reorder coef, SE, etc. by increasing p
library(xtable)
xtable(out)

在此处输入图像描述

于 2012-02-06T21:56:22.133 回答