Comment ajouter un nombre d'observations par groupe et utiliser la moyenne de groupe dans le boxplot ggplot2?

Je suis en train de faire une base de boîte à moustaches où y=age et x=Patient groups

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

J'espérais que vous pourriez m'aider avec quelques petites choses:

1) Est-il possible d'inclure un certain nombre d'observations par groupe au-dessus de chaque groupe de boîte à moustaches (mais PAS sur l'axe des X où mon groupe d'étiquettes) sans avoir à le faire dans la peinture :)?
J'ai essayé d'utiliser:

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

CON est le 1er groupe et y = 60 est ~ juste au-dessus de la boîte à moustaches de ce groupe. Toutefois, la commande n'a pas fonctionné. Je suppose qu'il a quelque chose à faire qu'il lit x en continu plutôt qu'une variable catégorielle.

2) Aussi bien que il ya beaucoup de questions à propos de l'utilisation de la moyenne plutôt que la médiane pour les boxplots, je n'ai toujours pas trouvé un code qui fonctionne pour moi?

3) Sur la même question est-il un moyen que vous pourriez inclure la moyenne du groupe de stat dans la boîte à moustaches? Peut-être en utilisant

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

qui, cependant, ne comprend d'un point de où la moyenne se situe. Ou encore à l'aide de

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

CON est le 1er groupe et y = 30 est ~ le groupe d'âge moyen.
Sachant souple et riche ggplot2 syntaxe est j'espérais qu'il y a une façon plus élégante de l'utilisation de la véritable sortie stats plutôt que annotate.

Des suggestions/liens serait bien apprécié!

Merci!!

source d'informationauteur user1442363