条形图有两个因子，R中有渐变色

Question

我有一个这样的数据框：

df = data.frame(time = rep(0.5:9.5, each = 10), roi = rep(1:10, 10), area = runif(100, 5.0, 7.5))

我想绘制一个包含10个{10}值time和roi的条形图。在这种情况下，x轴将为roi，y轴将为time，area的值将以渐变颜色显示在条形图中（最高=白色，最低=黑色）。 y轴从0.5顶部反转到9.5底部，条形宽度为2。

预期的数字看起来像 this image

我期待回复，感谢您的帮助。

Answer 1

这是你的想法吗？

df=data.frame(time=as.factor(rep(0.5:9.5,each=10)),roi=rep(1:10,10),area=runif(100, 5.0, 7.5))

df$time <- factor(df$time, levels=rev(levels(df$time)))

ggplot(data=df, aes(y=factor(roi), x=time, fill = area)) +
  theme_minimal()  + coord_flip() +
  geom_tile(colour = "white", width = .9, height = 1) + 
  scale_fill_gradient(low="blue",high="red")