Comment faire pour ajouter des valeurs sur la barre d'regroupées diagramme en barres à l'aide de mtext?

Comment ecrire des valeurs sur les barres à l'aide de mtext?

# Grouped Bar Plot
counts <- table(mtcars$vs, mtcars$gear)
barplot(counts, main="Car Distribution by Gears and VS",xlab="Number of Gears", col=c("darkblue","red"),legend = rownames(counts), beside=TRUE, horiz=TRUE)

mtext(counts )   # But position is not at each bar. 

Comment puis-je mettre les valeurs correspondantes de chaque barre de l'intrigue?

Merci il fonctionne très bien pour moi.

OriginalL'auteur Manish | 2012-08-11