在线性回归后访问包含因变量名称的向量

Question

我对大约15个回归量进行了线性回归，我试图在我正在编写的脚本中控制输出。在控制台中，当我做

时

summary(lm1)$coefficients

我得到了每个回归量的一个很好的表，它的估计值，std。错误，t分数和p值。最终目标是以逗号分隔的方式打印此表，以便我可以在excel中打开它。

但是当我做的时候

summary(lm1)$coefficients[1,0]

试图抓住我得到的第一个回归者的名字

numeric(0)

然而，如果我这样做

summary(lm1)$coefficients[1:3,0]

然后我得到了前三个回归量的名称。我尝试通过

创建一个带有所有回归量名称的向量

mynames<-summary(lm1)$coefficients[,0]

果然，mynames在单独的一行中包含每个回归者的名字，但是当我试图打电话时

mynames[3]

例如，它返回NA。

正如我所说，最终目标是让我正在编写的脚本打印一个.csv文件，其中包含我需要的信息 - 每个回归器一行，每行的名称为col1，估计为col2，std。 col3中的错误，col4中的t-score和col5中的p值。

提前感谢所有人。

Answer 1

fit <- lm(Sepal.Length ~ Petal.Length, data = iris)
coefTable <- summary(fit)$coef
colnames(coefTable)
#[1] "Estimate"   "Std. Error" "t value"    "Pr(>|t|)" 
rownames(coefTable)
#[1] "(Intercept)"  "Petal.Length"

但是如果你想导出到Excel，你可以这样做：

write.csv(coefTable, "test.csv")