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:
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
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)
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
Partager