在 R 中绘制具有多元回归的 abline

Question

我正在对 4 个预测变量执行多元回归，并排显示它们......但我只是想不出如何在将它们并排放置的同时绘制 abline。为了清楚起见，这是我的代码：

fit1 <- lm(bband ~ ProfHH + Employed + TwoCars + HEQual, data = County)
layout(matrix(c(1,2,3,4), 2, 2, byrow = TRUE))  ## display 4 plots side by side
plot(bband ~ ProfHH +  Employed + TwoCars + HEQual, data = County)

并排的 4 个图的图像

我遇到的问题是我不知道如何添加以这种方式绘制它们的 abline whislt！？通常我只会使用abline(fit1)但这会产生以下错误：

"abline" is not a graphical parameter

关于我如何解决这个问题的任何建议？

Answer 1

我认为您需要先调用plot函数，然后可以使用如下所示abline：

par(mfrow=c(2,2))
plot(mtcars$mpg,mtcars$wt)
abline(lm(wt ~ mpg, mtcars))
plot(mtcars$disp,mtcars$wt)
abline(lm(wt ~ disp, mtcars))

这个想法是查看因变量和自变量之间的关系，因此首先绘制它们，然后使用回归公式调用 abline。此外，图中的顺序很重要，您将提供 x 作为第一个参数，y 作为第二个参数，在 abline 的 lm 函数中，公式应该按 y ~ x 的顺序排列。在这种情况下，y 是你的因变量，x 是你的自变量。