Discussion :

[Lilie01]

Bonjour,

Je souhaiterai afficher le 1er et 3ème quartile ainsi que le 1er et le 9ème décile sur un histogramme dans R.

Voici le code (en vert ce qui fonctionne) :

# Analyse de l'histogramme
g <- ggplot(df[with(df, df$utile == 1),]) +
aes(x = cible) +
geom_histogram(bins = 30L, fill = "#112446") +
theme_minimal()
g
# ajout des valeurs de position
g <- g + geom_vline(aes(xintercept = median(cible)), linewidth = 1,
color = "firebrick", linetype = "dashed") +
geom_vline(aes(xintercept = mean(cible)), linewidth = 1,
color = "grey")

+
#geom_vline(aes(xintercept = quantile(cible,probs=c(.1)), linewidth = 1,
# color = "green")


La partie rouge c'est le morceau que je souhaite ajouter pour les quartiles et déciles mais qui ne fonctionnent pas...
je sui archi débutante sur R et donc votre aide sera la bienvenue!
Merci d'avance!

Aurélie

[Lilie01]

C'est bon j'ai trouvé pourquoi cela ne fonctionnait pas. Parenthèse oubliée!!
Donc j'obtiens bien un histogramme avec 1 ligne pointillée tracée pour la moyenne et des lignes vertes pour le 1er et 3eme quartile (cf le code surligné en rouge)
Quand j'essaie de tout réunir en 1 ligne, cela ne fonctionne plus.
En écrivant çà par exemple à la place de ce qui est en rouge :
geom_vline(aes(xintercept = quantile(cible,probs=c(0.25 , 0.75))), linewidth = 1,
color = "green")+

Est ce possible de tout réunir en 1 ligne de code ?

# Analyse de l'histogramme
g <- ggplot(df[with(df, df$utile == 1),]) +
aes(x = cible) +
geom_histogram(bins = 30L, fill = "#112446") +
theme_minimal()
g
# ajout des valeurs de position
g <- g + geom_vline(aes(xintercept = median(cible)), linewidth = 1,
color = "firebrick", linetype = "dashed") +
geom_vline(aes(xintercept = mean(cible)), linewidth = 1,
color = "grey") +
geom_vline(aes(xintercept = quantile(cible,probs=c(0.75))), linewidth = 1,
color = "green")+
geom_vline(aes(xintercept = quantile(cible,probs=c(0.25))), linewidth = 1,
color = "green")