绘制并报告线性回归的 X 截距 - R

Question

我在 r 中使用lm 进行线性回归。我想绘制并报告 x 截距。我知道我可以使用代数并通过设置 y = 0 来求解 x，但是有没有办法让 r 向我报告呢？另外，我如何“告诉” r 绘制 x 截距？这是否只需要扩展 x 轴范围以包含它？谢谢。

# example r code
plot(y~x)
fit <- lm(y~x)
abline(fit)

Answer 1

如果要绘制 x 截距，请按您所说的扩展绘图。您可能需要在 x 和 y 维度上扩展它（使用 xlim=c(0,100) 和 ylim=c(0,100) 或其他），并且您应该注意 R 不会为轴绘制线。我想您可以根据需要使用hline 和vline 手动添加它们。

要得到 x 截距的数值，你必须做代数。

> coef(fit)
(Intercept)           x 
  0.8671534   0.4095524 

给出 y 轴截距和斜率，您可以从那里轻松找到 x 轴截距。