2017-03-01 9 views

Antwort

1

Sie Unter der Annahme, mit Mitteln und Standardabweichungen für die Fehlerbalken arbeiten Sie können so etwas tun (Ich habe einen Datenrahmen, die ich dachte, könnte so etwas wie Ihr aussehen):

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() 

, die Ihnen dieser Graph: enter image description here

Verwandte Themen