Моя проблема связана с geom_bar и geom_errorbar ggplot. Я установил обе их позиции в position_dodge () и ожидаю, что позиция geom_errorbar будет унаследована от geom_bar, но ничего не происходит.
Мой фрейм данных выглядит так:
year <- c(rep(c('1998', '2008', '2018'),2))
JZ <- c(3.04, 3.4, 3.08, 2.81, 2.93, 2.83)
SD <- c(0.79, 0.98, 1.05, 1.1, 1.47, 1.57)
type <- c(rep('JZa', 3), rep('JZm', 3))
mydata <- data.frame(year, JZ, SD)
Мой код выглядит так:
ggplot(mydata, aes(x=year, y=JZ, ymin=JZ-SD, ymax=JZ+SD))+
geom_bar(stat = "identity", aes(fill = type), position = position_dodge(), width=6)+
scale_fill_grey() + theme_bw() +
labs(title="", x='', y="Mean number of nestlings \u00B1 SD") +
geom_errorbar(position=position_dodge(), width=1.5) +
scale_x_continuous(breaks=seq(1998, 2018, 10))
.. и я получаю такой сюжет:
Я пробовал много разных вещей.
Любая помощь приветствуется!