使用R填充颜色和距离的矩形条形图(基础R或ggplot2或其他包)

Question

我有以下类型的数据，我想产生条形图。

Mark <- 1:10
Post <- c(0, 1, 4, 5, 6,
          8, 10,  11, 12,  13)
color <- c(1,0.5,1, 1, 0.6, 0.7, 1,1,1) # 9 intervals between ten points 

这里的十个标记应该在X轴上的Post中。而不是条形高度是恒定的，但是由颜色变量进行颜色编码。例如，1-2之间的间隔对应于1个颜色值，而2-3对应于颜色值0.5。因此，对于10 Mark，有9个颜色值。

​

怎样才能生成这样的图表？

编辑：

如果我可以添加颜色比例图例-颜色强度与数值，那就太好了

Answer 1

不是很完美，但应该能让你入门：

greens <- colorRampPalette(c("white","darkgreen"))
barplot(as.matrix(diff(Post)), horiz=T, col=greens(10)[10*color], axes=F, xlab="Mark")
axis(1, labels=Mark, at=Post)
axis(3, labels=Post, at=Post)

​

​