Вручную добавить доверительные интервалы на барплоты

Question

Для каждого среднего значения видов "x" и "y" необходимо следовать следующему фрейму данных с доверительными интервалами "ci_min" и ci_max. Как вручную добавить доверительные интервалы на столбцах?

data <- data.frame("sp" = c("x","y"), count = c(-4.011, 2.45), "ci_min" = c(-4.2,1.68), "ci_max" = c(-4.01, 3.28))

library(ggplot2)
ggplot(data, aes(x = sp, y = counts, fill = sp)) +
    stat_summary(geom="bar", fun.y=mean, position = "dodge") 

Answer 1

Вы можете добавить строки ошибок с geom_errobar, указав ymin и ymax в главном вызове ggplot2.

ggplot(data, aes(sp, count, ymin = ci_min, ymax = ci_max, fill = sp)) + 
    geom_bar(stat = "identity") +
    geom_errorbar()