用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) 

Image of the 4 plots side-by-side

林有是我不知道如何添加whislt绘制他们这样的abline的问题！？ 一般情况下我只是用abline(fit1)但这产生了以下错误：

"abline" is not a graphical parameter 

任何建议，我怎么会解决这个问题？

Answer 1

我认为你需要调用绘图功能第一，那么你可以使用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是你的自变量。