r - 颜色只是 geom_bar 的顶部边框

Question

例如，带有很多条形图的图表看起来非常压扁 -

ggplot(data.frame(x = 1:1000, y = (rnorm(1000)), fill = sample(c('a','b','c'), 1000, replace = T)), aes(x, y, fill = fill)) +  geom_bar(stat = 'identity')

我有一个类似数据集的图表，我觉得只要给条形图的顶部边框上色，我就能更清楚地理解它。我无法做到这一点。我能做的最接近的是合并 geom_step 但这也会在 y 值发生变化的地方添加垂直线，这会使图表更加拥挤。 geom_point 大小不一定与 x 轴上的分隔同步，因此对于较小的 x 值，它们会溢出到一侧。我能想到的唯一可靠的解决方案是实际操作数据，以便我能够绘制 geom_segment 来为我完成工作。还有其他办法吗

PS:出于某些原因，我需要坚持使用这种格式。

Answer 1

您可以使用 geom_errorbar() 并将 ymin= 和 ymax= 设置为您的 y 值。然后您可以使用 width= 和 size= 来获得您需要的外观。

ggplot(data.frame(x = 1:1000, y = (rnorm(1000)), fill = sample(c('a','b','c'), 1000, replace = T))) +  
      geom_errorbar(aes(x=x,ymin=y,ymax=y,color=fill),size=0.5,width=3)