从R中的回归中提取系数

我在R中进行了一次基本线性回归，得出了以下系数：

model$coefficients
(Intercept) log(TraLea$Length..mm.cat.) 
  -7.487426                    2.967886 

---

我已经用这些值制作了一个矩阵

coeff包
broom
非常适合处理模型结果。
mtcars
数据集示例：

library(broom)
data(mtcars)
test <- lm(mpg ~ wt, mtcars)
results <- tidy(test)

results

         term  estimate std.error statistic      p.value
1 (Intercept) 37.285126  1.877627 19.857575 8.241799e-19
2          wt -5.344472  0.559101 -9.559044 1.293959e-10

库（扫帚）
数据（mtcars）
测试您可以使用名称（）

坡度：

summary(fit)$coefficients[2,1]

coef（fit）
提供对系数的直接访问。不需要
摘要
。
a <- results$estimate[1]
b <- results$estimate[2]

data(mtcars)
fit <- lm(mpg ~ wt, mtcars)

names(summary(fit))

names(summary(fit))
 [1] "call"          "terms"         "residuals"     "coefficients"  "aliased"       "sigma"         "df"            "r.squared"    
 [9] "adj.r.squared" "fstatistic"    "cov.unscaled" 

summary(fit)$coefficients[1,1]

summary(fit)$coefficients[2,1]