r - 用 block 绘制

Question

我已经搜索了几个小时，但找不到执行此操作的函数。

如何生成像

这样的图

假设我有一个数组 x1 = c(2,13,4) 和 y2=c(5,23,43)。我想创建 3 个 block ，高度为 2-5,13-23...

我将如何解决这个问题？我希望我能指出正确的方向，了解要查看的内置函数？

Answer 1

我没有使用你的数据，因为你说你正在使用数组，但你给了我们两个向量。此外，您向我们展示的数据存在重叠。这意味着如果绘制三个条形图，您只会看到两个。

根据您提供的小图片，您可以为每个人或日期绘制三个范围。使用时间序列，我们通常会看到它绘制最小/最大值、标准差和当前数据。

诀窍是将系列绘制为图层。第一个系列是范围最大的系列(本例中为米色带)。在下面的示例中，我首先绘制了一个空图，然后添加了三层矩形，一层用于米色，一层用于灰色，一层用于红色。

#Create data.frame
n=100
df <-data.frame(1:n,runif(n)*10,60+runif(n)*10,25+runif(n)*10,40+runif(n)*10,35-runif(n)*10,35+runif(n)*10)
colnames(df) <-c("id","beige.min","beige.max","gray.min","gray.max","red.min","red.max")

#Create chart
plot(x=df$id,y=NULL,ylim=range(df[,-1]), type="n")  #blank chart, ylim is the range of the data
rect(df$id-0.5,df[,2],df$id+0.5,df[,3],col="beige", border=FALSE) #first layer
rect(df$id-0.5,df[,4],df$id+0.5,df[,5],col="gray", border=FALSE)  #second layer
rect(df$id-0.5,df[,6],df$id+0.5,df[,7],col="darkred", border=FALSE) #third layer