这可能很容易，但我找不到一个直截了当的答案。

可重现的例子

y1<-c(rnorm(5,10,5),rnorm(5,1,0.1),rnorm(5,1,0.1))
x1<-c(rep("a",5),rep("b",5), rep("c",5) )
set.seed(12)
datap<-data.frame(y1,x1)
mod1<-lm(y1 ~ x1, data = datap)
summary(mod1)

plot(y1~x1 ,data=datap)

da <- as.data.frame(summary(emmeans(mod1,spec="x1")))

我希望组“b”和“c”的置信区间远小于组“a”，但它们的大小都相同。为什么？是否可以表示更“现实”的差异？

对不起这个愚蠢的问题。