Graphiques R: Ajouter des étiquettes au graphique à barres empilées

Question

Je cherche un moyen d'ajouter des étiquettes, c'est-à-dire des valeurs absolues, dans un graphique à barres empilées à l'aide des fonctions de base de R. Les étiquettes doivent figurer à l'intérieur des barres empilées.

Merci!

Answer 1

barplot retournera la position médiane de x des barres, pour que vous puissiez faire

mydata <- matrix(c(10, 21, 22, 33, 45, 23, 22, 43, 33), nrow=3) 

# b will contain the x midpoints of the bars 
b <- barplot(mydata) 

# This will write labels in the middle of the bars, horizontally and vertically 
text(b, colMeans(mydata), c("Label1", "Label2", "Label3")) 

# This will write labels in the middle of the middle block 
text(b, mydata[1,]+mydata[2,]/2, c("LabelA", "LabelB", "LabelC")) 

EDIT: relisant votre question, je pense que c'est ce que vous voulez (ou peut-être pas, mais je vais l'écrire de toute façon: D)

# Find the top y position of each block 
ypos <- apply(mydata, 2, cumsum) 
# Move it downwards half the size of each block 
ypos <- ypos - mydata/2 
ypos <- t(ypos) 

text(b, ypos, mydata) 

texte

Answer 2

Que diriez-vous de la fonction simple text()?

Vous pouvez simplement ajouter une chaîne où vous voulez, par exemple:

text (x = ..., y = ..., labels = c("foo bar 1000")) 

Answer 3

Peut-être que vous pouvez utiliser ou inspecter le Barp fonction du package plotrix