减少 ggplot2 中误差条的大小

如何解决减少 ggplot2 中误差条的大小

我正在尝试使用以下代码绘制图形：

p<-ggplot(averagedf,aes(x=Time,y=average,col=Strain)) + 
        geom_line() +
        geom_point()+
        geom_errorbar(aes(ymin=average-sem,ymax=average+sem))+
        theme_classic()+
        theme(legend.position = "none")

图形看起来像这样 - 一切都很好，只是误差线的大写（？）太宽了：First plot

为了减少大写的宽度，我将宽度设置为 2，但现在大写不以误差条的垂直线为中心。有没有人知道如何改变大写的大小而不弄乱它的位置？

p<-ggplot(averagedf,ymax=average+sem,width=2))+
        theme_classic()+
        theme(legend.position = "none")

Second plot

解决方法

我想知道这是否只是图形渲染分辨率的人工制品。如果没有您的确切数据，就很难重现您的确切情节，但使用包含的 R 数据集的类似示例，我没有这个问题。

library(tidyverse)

ChickWeight %>%
  ggplot(aes(x = Time,y = weight,color = factor(Diet))) +
  stat_summary(fun = mean,geom = "line") +
  stat_summary(fun = mean,geom = "point") +
  stat_summary(fun.data = mean_se,geom = "errorbar",width = 0.5) +
  theme_classic() +
  theme(legend.position = "none")

^{由 reprex package (v1.0.0) 于 2021 年 3 月 15 日创建}