r - 使用 geom_abline() 和 ggplot

Question

我是初学者ggplot2 ——从我开始尝试它到现在才 4 天。因此，如果这个问题听起来太基本，我深表歉意。我很感激任何指导——我一直在为这个问题苦苦挣扎大约一个小时。

我正在尝试使用 geom_abline()如下:

 p <- ggplot(mpg, aes(cty, hwy)) + geom_point()
 p + geom_abline() + facet_wrap(~cyl)

这是有效的，因为我可以在所有四个多面图中看到一条引用线，如下所示:



后来我在用另一个相关的数据集 mtcars看看会发生什么 geom_abline()

  p <- ggplot(mtcars, aes(wt, mpg)) + geom_point()
     p + geom_abline() + facet_wrap(~cyl)

但是，当我运行此命令时，我看不到 geom_abline().令人惊讶的是，我在帮助文件中发现了上述命令的类似版本，并显示“ geom_abline() 超出范围”

虽然我知道“超出范围”是什么意思，但我如何知道在特定数据集中， abline()会超出范围吗？我可以通过强制它使用特定的斜率和截距来覆盖它，但是我认为这有点黑客 - 即看到输出后修改代码。有什么方法可以让我知道 geom_abline() 在幕后发生了什么|

这是我得到的图表，没有任何 abline()秒


我很感激任何想法。我真的很困惑。

Answer 1

如果您不提供任何参数，geom_abline()使用默认值，intercept = 0和 slope = 1 .

ggplot(mpg, aes(cty, hwy)) + geom_point() + geom_abline() + lims(x = c(0,35), y = c(0,50))
ggplot(mtcars, aes(wt, mpg)) + geom_point() + geom_abline() + lims(x = c(0,6), y = c(0,35))