R 中的plot() - 如何对两条垂直线之间的区域进行着色？

Question

如何对图中标有两条红色垂直线的区域进行着色？（阴影区域不得受曲线限制）

plot(1980:2019,y,type="l")
abline(v=1990,col="red")
abline(v=2001,col="red")

提前致谢。

Answer 1

rect如图所示使用。较低的 alpha 值提供更高的透明度。

y <- 1980:2019
plot(y, y)

rect(xleft = 1999, xright = 2001, ybottom = par("usr")[3], ytop = par("usr")[4], 
  border = NA, col = adjustcolor("blue", alpha = 0.3))