r - 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"]

如果你在做多变量，那么建议使用名称，因为输出的顺序可能出乎意料(同样，这是一个好习惯)