添加多个矩形的最佳方法

Question

下面的

geom_step（）用于显示线段。我想围绕每个线段使用geom_polygon或geom_rect添加多个矩形/多边形。

这是数据框和显示2段的图。在我的实际示例中，最多可以有50个细分。

data = data.frame(x=c(4,7,7,18), y=c(150,150, 342,342)  )
library(ggplot2)
g=ggplot(data, aes(x=x,y=y))+geom_step()

“ upper_and_lower”数据框具有矩形的上下边界。

upper_and_lower=data.frame(bin1 =c(300,280,130,100),bin2=c(400,380,300,280))

例如，upper_and_lower的第一行和第四行具有第一组矩形的上限和下限。

upper_and_lower[1,] #this is the upper bound
upper_and_lower[4,]  # this is the lower bound

现在应该使用这些边界添加更多矩形

两个水平区段的内部多边形的上下边界

upper_and_lower[2,] # upper bound for second set of rectangles
upper_and_lower[3,] #lower bound for second set of rectangles