I've got to build a plot of mean values and 99% confidence intervals (based on t-distribution) of data set cuckoos from package DAAG.
Here is my solution
ggplot(data=cuckoos, aes(x=species, y=length, colour=species)) +
stat_summary(geom='pointrange', fun.args = list(mult=1)) +
theme_dark() +
theme(legend.position="none",
axis.text = element_text(size=10),
axis.text.x = element_text (angle = 45, hjust = 1)) +
scale_colour_brewer(palette = "Pastel1") +
coord_cartesian(ylim=c(21,24))
The confidence intervals of the resulting plot do not match the right answer (see the images attached). What the problem might be?

