sx_mean = sx %>%
group_by(modulename) %>%
summarise(mean = mean(pr), SE = sd(pr)/sqrt(length(pr)))
ggplot(data = sx_mean ) +
geom_point( aes(x = module, y = mean, fill = Value), size = 2.5, color = "seagreen") +
geom_errorbar(aes(ymin=mean-SE, ymax=mean+SE))
Ошибка в data.frame (list (ymin = c (2.05161888719508, 1.8746390713981,
1.28228295778586,: аргументы подразумевают различное количество строк: 10, 31