ggpubr -> график ggline: невозможно воспроизвести примеры с несколькими факторами

У меня такое ощущение, что R не работает должным образом в моей системе.

Я хочу использовать график взаимодействия, чтобы представить результаты двухфакторного дисперсионного анализа. Поэтому я использовал пакет ggpubr и строю график с помощью ggline, используя пример с несколькими факторами. Он не отображал полосы погрешностей должным образом, вместо того, чтобы показывать их для каждого фактора, он группировал факторы, и полосы также отображались черными (см. рисунки ниже).

Поэтому я протестировал его на том же примере, что и в описании пакета (http://www.sthda.com/english/articles/24-ggpubr-publication-ready-plots/79-plot-meansmedians-and-error-bars):

library(ggpubr)    
ggline(ToothGrowth, x = "dose", y = "len", 
           add = c("mean_se", "jitter"),
           color = "supp", palette = "jco")

Что ДОЛЖНО дать мне этот график:

График из рабочего примера

Однако в моей системе я получаю следующее:

График в моей системе

Я уже:

  • обновлен пакет ggpubr и все остальные пакеты
  • полностью переустановил R с нуля
  • спросил разработчик пакета, похоже, это не ошибка пакета, потому что он работает для него

Может кто воспроизвести ту же проблему? Я действительно не знаю, как это решить, и у меня также есть ощущение, что R может испортить и другие графики.

Большое спасибо.


r plot ggpubr errorbar
person Induriel    schedule 08.11.2018    source источник
comment
То же самое. Я вижу ту же проблему с R 3.5.1 (2018-07-02) и ggpubr 0.1.8 (2018-08-30). Значение mean_se не было должным образом сгруппировано.   -  person Bing    schedule 08.11.2018
comment
Это было исправлено в разрабатываемой версии, как указано в этой ошибке GitHub. Это означает, что в версии CRAN все еще есть ошибка, а в самой последней версии GitHub — нет. Вы можете установить с GitHub через devtools::install_github("kassambara/ggpubr"). Я только что обновился до этого, и действительно, проблема, кажется, исправлена.   -  person aosmith    schedule 08.11.2018
comment
@aosmith версия для разработчиков действительно исправила ошибку. Спасибо.   -  person Bing    schedule 08.11.2018
comment
Да, я могу подтвердить, что обновленная версия отображает правильный график. Большое спасибо за эту быструю поддержку по этому вопросу. Потрясающий :-)   -  person Induriel    schedule 10.11.2018

Ответы (1)


arrow_upward
0
arrow_downward

Попробуй это :

ggline(ToothGrowth, x = "dose", y = "len", 
       add = c("mean_se", "jitter"),
       color = "supp", add.params = list(group="supp"), palette = "jco")
person Philhoo    schedule 21.01.2019