У меня есть набор данных, для которого я хочу вычислить среднее геометрическое и начальный доверительный интервал.Данные имеют «статус» и «индекс» в диапазоне от 0 до 1.
Я хочу знать: (a) Есть ли вариант, в котором fun.y = mean может быть заменен определенной геометрической средней функцией вggplot2?
(b) Как построить соответствующие доверительные интервалы с учетом этого среднего значения, используя ggplot?
Вот код, который я пытался вычислить.
status <- c("low","low","low","low","high","high","high","high")
index <- c(0.6,0.1,0.6,0.1,0.35,0.35,0.35, 0.35)
df <- data.frame(status, index)
pd <- position_dodge(0.82)
ggplot(df, aes(x=status, y=index, color = status)) + ylim(0,1) + theme_bw() + geom_point(position = pd, size = 1.5)+ stat_summary(aes(color = status),geom="errorbar", fun.data=mean_cl_boot, width = 0.2, size = 0.8, position = pd)+
stat_summary(aes(group = status),fun.y=mean, position = pd, geom = "point", size = 4 )