Одиночная ошибка на линейном графике ggplot
Я безуспешно пытался нарисовать график с накоплением столбцов с одной полосой ошибок в верхней части каждой отдельной панели, а не для каждой секции в барах. Мне удалось нарисовать все панели ошибок для каждого раздела, но я не нашел решения для рисования одной панели ошибок.
Вот кадр данных DF
Sp Type Or Rate se
1 H Dis Bottom 14.5454545 8.0403025
2 H Dis Top 2.7272727 1.9403407
3 H Dis WP 0.9090909 0.9090909
4 H He Bottom 5.4545455 1.4845392
5 H He Top 15.4545455 5.0797135
6 H He WP 0.0000000 0.0000000
7 H HeDis Bottom 9.0909091 3.8330638
8 H HeDis Top 8.1818182 4.1659779
9 H HeDis WP 3.6363636 2.0100756
10 N Dis Bottom 19.0909091 8.9329715
11 N Dis Top 0.0000000 0.0000000
12 N Dis WP 0.0000000 0.0000000
13 N He Bottom 22.7272727 7.0743137
14 N He Top 0.0000000 0.0000000
15 N He WP 3.6363636 2.7773186
16 N HeDis Bottom 14.5454545 5.2835139
17 N HeDis Top 10.0000000 4.3808583
18 N HeDis WP 0.0000000 0.0000000
Вот мой сценарий для рисования столбчатой диаграммы в виде столбцов с барами ошибок для каждого сечения в барах (положение каждой панели ошибок неверно, но это не имеет значения, поскольку это не то, что я хочу):
dodge<- position_dodge(width = 0.65)
cols <- c(Top="darkgrey",Bottom="lightgrey", Well_plate="white")
Stacked_plot_bis<-ggplot(df,
aes(x=factor(Type),y=Rate,fill=factor(Or))) +
geom_bar(aes(width=.65), stat="identity",colour="black")+
geom_errorbar(aes(ymin=Rate-se,ymax=Rate+se), position="dodge",colour="black",
width=.65)+
scale_fill_manual(values = cols)+
facet_grid(. ~ Sp)
Это рисует панели ошибок всех секций внутри каждой панели. Как нарисовать одну общую панель ошибок поверх каждой отдельной панели, которая не учитывает секции, а только общее значение для каждого Типа?
Любая помощь будет очень высоко ценится!