У меня есть следующий фрейм данных:

test2 <- data.frame(groups = c(rep("group1",4), rep("group2",4)), 
    X2 = c(rnorm(4), rnorm(4)) , 
    label = c(rep(1,2),rep(2,2),rep(1,2),rep(2,2)))

и я строю гистограммы для каждой метки в группе, используя:

ggplot(test2, aes(label, X2, fill=as.factor(groups))) + 
    geom_bar(position="dodge", stat="identity")

Тем не менее, я не могу найтиstat="mean" так что я могу нанести средства на каждую гистограмму вместо идентификатора.

Спасибо за любую помощь.