Я делаю основной бокс, гдеy=age а такжеx=Patient groups

age <- ggplot(data, aes(factor(group2), age))  + ylim(15, 80) 
age + geom_boxplot(fill = "grey80", colour = "#3366FF")

Я надеялся, что вы поможете мне с несколькими вещами:

1) Можно ли включить количество наблюдений на группу над каждым групповым блок-графиком (но НЕ на оси X, где находятся метки моей группы) без необходимости делать это в рисовании :)? Я пытался с помощью:

age + annotate("text", x = "CON", y = 60, label = "25")

гдеCON 1-я группа иy = 60 ~ прямо над рамкой для этой группы. Однако команда не сработала. Я предполагаю, что у этого есть что-то, что это читаетx как непрерывная, а не категориальная переменная.

2) Кроме того, хотя есть много вопросов об использовании среднего значения, а не медианы для коробочных графиков, я все еще не нашел код, который работает для меня?

3) По тому же вопросу, есть ли способ включить среднюю статистику группы в поле? Возможно, используя

age + stat_summary(fun.y=mean, colour="red", geom="point")

который, однако, включает только точку, где лежит среднее. Или снова с помощью

age + annotate("text", x = "CON", y = 30, label = "30")

гдеCON 1-я группа иy = 30 это средний возраст группы. Зная, как гибкий и богатыйggplot2 Синтаксис я надеялся, что есть более элегантный способ использования вывода реальной статистики, а неannotate.

Любые предложения / ссылки будут высоко ценится!

Спасибо!!