颜色只是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)