Diagramme en bâtons à barres horizontales avec 2 axes

Les barres horizontales se tracent facilement avec la fonction barplot sous R. Il est plus délicat d'ajouter un 2ème axe.

Exemple : un diagramme en barres à barres horizontales présentant sur un axe le nombre d'habitants et sur l'autre, les pourcentages correspondants

Diagramme à barres horizontales

Barres horizontales à deux axes - logiciel R
  1. Entrer les données : nombre d'habitants par catégorie
ages = c("<39","40-49","50-59","60-74","75-84","85-99","100-")
total = c(14,20,76,428,1717,3453,29)

2. Tracer le diagramme en barres

barplot(total[3:7],horiz=T,names=ages[3:7],las=1,col="#2D69B3")
mtext(side=1, "nombre d'habitants",line=2.5)
             # side = 1 ; indique qu'il faut tracer l'axe du bas
             # line : indique la distance entre le titre de l'axe et l'axe

3. Calculer les pourcentages correspondants aux données tracées

somme = sum(total[3:7])
total_s = c(14,20,76,428,1717,3453,29)/somme*100 ; total_s

4. Ajouter la légende

par(new=TRUE)
barplot(total_s[3:7],axes=F,horiz=T,plot=T,col="#FE642E")
axis(3,pretty(total_s,10),col="#F5821F")
mtext(side=3, "%",line=2.5)