R语言ggplot2中如何正确绘制负斜率1:1比例参考线

geom_abline()的默认截距参数intercept为0，这是你绘制负斜率1:1线失败的核心原因：

• 正向1:1线对应公式为y = x，斜率为1、截距为0，在你设置的0-70坐标轴范围内刚好从(0,0)延伸到(70,70)，因此可以正常显示。
• 仅设置slope=-1时，实际绘制的是公式为y = -x的直线，在x取值0-70的区间内，对应的y值范围是-70到0，几乎完全落在你设置的y轴0-70显示区域外，自然无法看到完整的参考线。

斜率为-1的1:1参考线需要匹配对应截距才能落在绘图区域内。最常用的绘图区负对角线（从(0,70)到(70,0)的对角参考线）对应公式为y = -x + 70，只要在geom_abline()中补充设置intercept=70即可正常绘制。
完整代码如下：

x <- c(10,25,35,45,55)
y <- c(30,50,25,17,17)
dataA <- data.frame(x,y)
    
ggplot(data=dataA, aes(x=x, y=y)) +
  geom_point(col="Black", size=4) +
  scale_x_continuous(breaks= seq(0,70,10), limits = c(0,70)) +
  scale_y_continuous(breaks= seq(0,70,10), limits = c(0,70)) +
  geom_abline(slope=-1, intercept=70, linetype = "dashed", color="Red") +
  labs(x="x", y="y") +
  theme(axis.line = element_line(size = 0.5, colour = "black"))

如果需要绘制其他位置的斜率-1参考线，按照直线公式y = -x + b调整intercept的取值b即可：

• 若需要参考线经过指定坐标点(x0, y0)，直接计算截距b = x0 + y0填入参数即可。
• 优先使用geom_abline()而非手动构造端点用geom_line()绘制，前者会自动适配后续坐标轴范围的调整，无需反复修改连线端点坐标。

内容的提问来源于stack exchange，提问作者J.K Kim