r - R图的阴影部分

Question

我正在尝试在R中绘制一个绘图，该绘图的一部分为灰色以强调此区域。与其他示例不同，我不想为绘图下的区域着色，而是要对绘图上从一个区域开始到图形末尾的区域着色。当我尝试使用rect()或polygon()时，它会模糊我要强调的图。

例如:

x_mean <- c(1, 2, 3, 4)
y_mean <- c(1, 1, 1, 1)

y_max <- c(4, 4, 4, 4)
y_min <- c(-4, -4, -4, -4)


x_shade <- c(2, 3, 4)

y_max_shade <- c(4, 4, 4)
y_min_shade <- c(-4, -4, -4)

plot(x=rep(x_mean, 3), y=c(y_mean, y_max, y_min), bty='n', type="n" )
arrows(x0=x_mean, y0=y_min, x1=x_mean, y1=y_max, length=0)
points( x=x_mean, y=y_mean, pch=16)

这将在图形上绘制4条线。如何在背景中从第二行到绘图的结尾绘制一个灰色框？

Answer 1

只是为了给您留下更多的评论，这里是一个可能的解决方案:

plot(x=rep(x_mean, 3), y=c(y_mean, y_max, y_min), bty='n', type="n" )
rect(2,-4,4,4,col = rgb(0.5,0.5,0.5,1/4))
arrows(x0=x_mean, y0=y_min, x1=x_mean, y1=y_max, length=0)
points( x=x_mean, y=y_mean, pch=16)

请注意，我还演示了如何在颜色规范中使用alpha混合(使用 rgb)。这对于此类事情也很有用。尝试将 rect行移动到末尾，并注意结果仍然不错，因为填充颜色是部分透明的。