Bonjour à tous,

Je souhaite faire apparaître sur mon graphique empilé les étiquettes de données (comme pour Excel).

J'ai réussi à le faire sur un graphique simple mais je bloque sur un graphique empilé...

J'ai passé plus d'une journée à chercher en vain, idem sur le forum
Pouvez-vous m'aider svp ?

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
 
q1Ord = ordered(fichier$Q1, levels=c("immediat", "apres 2 a 3 tentatives", "apres 3 a 5 tentatives", "apres plus de 5 tentatives"))
> a = table(q1Ord, fichier$ORGANISATION)
> b = addmargins(a,2)
> b = prop.table(b,2)
> colnames(b) = c(colnames(a), "TOTAL")
> b = round(b*100,0)
> 
> par(xpd=TRUE, mar=c(4,4,4,14))
> graphe3 = barplot(b, col = c("green", "purple", "blue", "red"))
> title(main=paste("Q1","\n",sep=""),cex.main=2)
> legend(5.5, 100, col = "black", fill = c("red", "blue","purple", "green"), legend = c("apres plus de 5 tentatives", "apres 3 a 5 tentatives", "apres 2 a 3 tentatives", "immediat"))
> 
> mat = matrix(b, nrow=4)
> text(graphe3, mat)
sachant que ce sont ces valeurs ci-dessous qui devraient s'afficher:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
> mat
     [,1] [,2] [,3] [,4]
[1,]   68   70   70   70
[2,]   20   20   20   20
[3,]    6    5    5    5
[4,]    5    4    4    5


Je reste à votre disposition si besoin d'expliquer mon code ou de plus d'informations sur ma demande.

Troncon