突出显示 ggplot2 中感兴趣的区域

在普通绘图中，可以使用polygon调用panel.first论证plot突出显示背景区域。是否可以做同样的事情ggplot2？可以在保留网格线的同时完成吗？

eg:

# plot hp and wt for mtcars data, highlighting region where hp/wt ratio < 35
with(mtcars,plot(hp,wt,
     panel.first=polygon(c(0,0,max(wt)*35),c(0,max(wt),max(wt)),
     col="#d8161688",border=NA)))

是的，ggplot2 可以做到这一点。要保持网格线的可见性，您可以使用 Alpha 透明度。请注意，一般来说，几何图形和统计数据的应用顺序很重要。

tmp <- with(mtcars, data.frame(x=c(0, 0, max(wt)*35), y=c(0, max(wt), max(wt))))
ggplot(mtcars, aes(hp, wt)) + 
  geom_polygon(data=tmp, aes(x, y), fill="#d8161688") + 
  geom_point()