R 中的截距函数和斜率函数

Question

R中是否有像Excel中那样的截距和斜率函数？我知道您可以使用函数“lm”来运行线性回归，但就我的目的而言，像在 Excel 中使用截距和斜率一样，将输出简单地作为数字来获取会更实用。

Answer 1

创建模型后，您可以从coefficients模型内的矩阵中提取截距和斜率值。可以使用coefficients()/coef()函数（这些是同一函数的别名）来提取，也可以使用 直接提取系数$coefficient。最好使用该coefficients()函数，因为它也可以在 以外的模型上使用lm，所以这是一个好习惯。

x <- rnorm(100)
y <- 0.5*x + rnorm(100)

mod <- lm(y ~ x)
cf <- coef(mod)

cf(Intercept)现在将包含一个带有和x（又名斜率）的向量。然后您可以使用任一数字提取这些：

Intercept <- cf[1]
Slope <- cf[2]

或按他们的名字：

Intercept <- cf["(Intercept)"]
Slope <- cf["x"]

如果您正在做多变量，那么建议使用名称，因为输出的顺序可能是意外的（同样，这是一个好习惯）