Discussion :

[Matou06]

Bonjour,

Je suis en train de réaliser des histogrammes pour différentes données d'une colonne (colonne = Acte) contenues dans une table (table = RECUEIL).
Je souhaiterai écrire, pour chaque histogramme, une valeur du quantile de ces données filtrées par Acte, et ce toujours au même endroit sur le graphe (par exemple en haut à droite).
1/ comment écrire cette valeur sur mon histogramme
2/ comment faire pour que les coordonnées du texte écrit soit toujours au même endroit, mêmes si les valeurs de l'histogrammes varient (en x et en y) selon Acte.

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
# Boucle pour tous les actes
 
for (cet_acte in unique(RECUEIL$Acte)){
 
DFacte <- RECUEIL[RECUEIL$Acte==cet_acte,]
 
 
# Création de l’HISTOGRAMME:
 
ggplot(DFacte)  +  
aes(x=PDS_Total_corrigé_Gy.cm2) +
geom_histogram(alpha=0.7, fill="white", color="black", bins=30) +
ggtitle(chartr("_", " " ,cet_acte)) + xlab("Produit Dose Surface (Gy.cm²)") + ylab("Nombre de procédures") +
theme(plot.title = element_text(face="bold", colour = "blue", size = 12, hjust=0.5)) +
theme(axis.title.y = element_text(face="bold", colour = "black", size = 10)) +
theme(axis.title.x = element_text(face="bold", colour = "black", size = 10)) +
geom_vline(aes(xintercept=quantile(PDS_Total_corrigé_Gy.cm2, 0.75)), color="red", linetype="dashed", lwd=1) +
 
 
# Sauvegarde du Graphe:
 
# extraire la spécialité
Spe <- DFacte$Spécialité[1]
ggsave(paste(Spe,paste0(cet_acte,".jpg"), sep="_"), device="jpg")
 
# Effacer la DataFrame DFacte:
rm(DFacte)
 
}

Et voici un exemple de ce que cela me donne pour un Acte donné (ici l'acte l'appelle : Pace Maker 1 ou 2 sondes) :



Et voici ce que j'aimerai obtenir (j'ai rajouté le cadre voulu en haut à droit avec paint pour exemple) :



Merci pour vos idées.
Matou