为分组数据绘制置信区间和连接均值

Question

我现在已经尝试在 ggplot2 中绘制这个情节很长时间了（几天）。我很快就放弃了。请帮忙。我只想为我的 3 个组 A、B 和 C 绘制一个简单的图。这是我的数据简化：

> mydata 
   A01 A02 A03 B01 B02 B03 C01 C02 C03
id0001    1    2    3    6    7    8    11    12    13

我想创建一个看起来像like this one 的情节。 A01、A02 和 A03 应该构成 A 的置信区间等。我怎样才能在 x 轴上绘制 3 个组的非常简单的图。最终，我想制作一个包含多个 ID 的图表，所以它看起来像 like this one，但像第一个一样带有错误栏或 CI。

如果有人可以帮助我或给我一些建议，我将不胜感激！

谢谢。

Answer 1

set.seed(42)
df <- data.frame(group=rep(c("a","b","c"),each=10),value=c(rnorm(10,mean=1,sd=0.1),rnorm(10,mean=1.5,sd=0.3),rnorm(10,mean=3,sd=0.2)))

library(ggplot2)
library(Hmisc)
p1 <- ggplot(df,aes(x=group,y=value)) 
p1 + 
  stat_summary(fun.data = "mean_cl_boot", colour = "red", geom = "errorbar") +  #errorbar with bootstrapped 95 % confidence interval
  stat_summary(fun.data = "mean_cl_normal", colour = "blue", geom = "errorbar") + #errorbar with normal 95 % confidence interval
  stat_summary(fun.y = "mean", colour = "black", geom = "point") + #means
  stat_summary(fun.y= "mean", colour="black", geom="line", aes(group = 1)) #lines connecting means

如果你真的想把小组联系起来，请仔细考虑，因为这没有多大意义。