Les diagrammes en bâtons avec R

Un fichier de données

Travaillons sur une enquête de satisfactions dans un hôpital, récupéré lors d’un cours de FUN (France Unité Numérique). Les fichiers sont disponibles ici.

Par la suite, ces données seront stockées dans la variable satis .

Dans ces données comme souvent, les observations sont en lignes et les variables en colonnes.

Les couleurs

Pour ne pas rester sur le gris par défaut, voici la liste des couleurs de R.

Utiliser des tableaux récapitulatifs de données qualitatives

Commençons par préparer des variables qualitatives :

satis$sexe.b<-factor(satis$sexe,labels=c("H","F"))
satis$service.c<-factor(satis$service)

Comme la commande barplot prend en argument un tableau :

tab.sexe<-table(satis$sexe.b)
tab.sexe


H F
268 266

tab.service<-table(satis$service.c)
tab.service


1 2 3 4 5 6 7 8
65 59 70 69 71 64 67 69

Les diagrammes par défaut

Voici le graphique par défaut pour les sexes :

barplot(tab.sexe)

barplot_sexe_01.png

Voici le graphique par défaut pour les services :

barplot(tab.service)

barplot_service_01.png

Utilisation des options

Améliorons ce dernier graphique :

barplot(tab.service,main="Répartition des services", xlab="Numéro des services",ylab="Effectifs",ylim=c(0,100),col="brown")

barplot_service_02.png

Diagramme avec deux paramètres

tab.croise<-table(satis$sexe.b,satis$service.c,deparse.level=2)
tab.croise


satis$service.c
satis$sexe.b 1 2 3 4 5 6 7 8
H 23 32 34 57 32 17 48 25
F 42 27 36 12 39 47 19 44

Pour le diagramme par défaut :

barplot(tab.croise)

barplot_croise_01.png

En utilisant les options :

barplot(tab.croise,beside=TRUE,legend.text = TRUE,col=c("blue","pink"),ylim=c(0,100),main="Répartition des services selon le sexe",xlab="Numéro des services",ylab="Effectifs")

barplot_croise_02.png