Полосы ошибок в ggpubr / ggbarplot внезапно слились (без изменения кода), как я могу их снова разделить?

У меня такой код:

ggbarplot(Text1, x = "Page", y = "IA_REGRESSION_OUT_COUNT", 
          color = "Modified", add = "mean_se", fill = "Modified", 
          width = .6, position = position_dodge(0.8)) +  
  stat_compare_means(method = "t.test", aes(group = Modified), 
                     label = "p.signif", label.y = 0.3, na.rm = TRUE) + 
  labs(x = "Page number", y = "Avg Regression Count", 
       caption = "* = p value < 0.5; **** = p value < 0.0001") + 
  scale_color_manual(values=c("black", "black")) + 
  scale_fill_manual(values=c("#CCCCCC","#FFFFFF")) + 
  theme_minimal()

который произвел этот сюжет

До

Однако с сегодняшнего дня это то, что выходит, может быть, из-за каких-то обновлений?

После

Есть идеи, как это исправить и вернуть обратно с полосами ошибок для каждого столбца?


r ggplot2 ggpubr
person Grig    schedule 12.09.2018    source источник
comment
Следуя этой ветке, вам может потребоваться обновить свою версию ggpubr (похоже, новая версия появилась на CRAN пару недель назад).   -  person aosmith    schedule 13.09.2018

Ответы (2)


arrow_upward
1
arrow_downward

Сейчас это исправлено. Установите последнюю версию для разработки на GitHub (https://github.com/kassambara/ggpubr/issues/109) и попробуйте следующее:

library(ggpubr)
ggbarplot(ToothGrowth, x = "dose", y = "len", 
   add = "mean_se", 
   color = "supp", palette = "jco",
   position = position_dodge(0.8)
)

Сгенерированный график должен выглядеть так:

введите описание изображения здесь

person A. Kassambara    schedule 17.09.2018

arrow_upward
1
arrow_downward

Я нашел решение. просто добавьте следующий код.

add.params = list(group = "type"), position = position_dodge(0.8)
person Jongheon Kim    schedule 01.11.2018