Сгруппированный график с ошибками

Question

Мне нужно воспроизвести этот сюжет в R с ggplot2

кто нибудь знает как это сделать? Спасибо.

Answer 1

Предполагая, что вы работаете со средними значениями и стандартными отклонениями для ваших панелей ошибок, вы можете сделать что-то вроде этого (я создал фрейм данных, который, как я думал, может выглядеть примерно так, как ваш):

library(tidyverse)
df <- data.frame(num = runif(160, min = 0, max = 1),
             class = c(rep(c(rep("t-logistic", 4), rep("NSC", 4), 
                             rep("Poisson", 4), rep("PCC", 4), rep("Sparse PCC", 4),
                             rep("Sup. PCC", 4), rep("Sparse PLS", 4), rep("SVM", 4)), 5)),
             cat = c(rep(c("A", "B", "C", "D"), 40)))


df1 <- df %>%
  group_by(class, cat) %>%
  summarize(mean = mean(num), sd = sd(num))


ggplot(df1, aes(class, mean, color = cat))+
  geom_point(position = position_dodge(width = 0.6))+
  geom_errorbar(aes(class, ymin = (mean - 2*sd), ymax = (mean + 2*sd)), 
                position = position_dodge(width = 0.6))+
  theme_bw()

это даст вам этот график: