Comment créer un barplot empilé dans R (avec exemples)

Un barplot empilé est un type de graphique qui affiche les quantités de différentes variables, empilées par une autre variable.

Ce tutoriel explique comment créer des barplots empilés dans R à l’aide de la bibliothèque de visualisation de données ggplot2 .

Barplot empilé dans ggplot2

Supposons que nous disposions du bloc de données suivant qui affiche la moyenne des points marqués par match pour neuf joueurs de basket-ball :

#create data frame
df <- data.frame(team=rep(c('A', 'B', 'C'), each=3),
                 position=rep(c('Guard', 'Forward', 'Center'), times=3),
                 points=c(14, 8, 8, 16, 3, 7, 17, 22, 26))

#view data frame
df

  team position points
1    A    Guard     14
2    A  Forward      8
3    A   Center      8
4    B    Guard     16
5    B  Forward      3
6    B   Center      7
7    C    Guard     17
8    C  Forward     22
9    C   Center     26

Nous pouvons utiliser le code suivant pour créer un barplot empilé qui affiche les points marqués par chaque joueur, empilés par équipe et position :

library(ggplot2)

ggplot(df, aes(fill=position, y=points, x=team)) + 
  geom_bar(position='stack', stat='identity')

Personnalisation d’un barplot empilé

Nous pouvons également personnaliser le titre, les étiquettes des axes, le thème et les couleurs du barplot empilé pour lui donner l’apparence que nous souhaitons :

library(ggplot2)

ggplot(df, aes(fill=position, y=points, x=team)) + 
  geom_bar(position='stack', stat='identity') +
  theme_minimal() + 
  labs(x='Team', y='Points', title='Avg. Points Scored by Position & Team') +
  theme(plot.title = element_text(hjust=0.5, size=20, face='bold')) +
  scale_fill_manual('Position', values=c('coral2', 'steelblue', 'pink'))

Nous pouvons également personnaliser davantage l’apparence en utilisant l’un des thèmes prédéfinis dans la bibliothèque ggthemes . Par exemple, nous pourrions utiliser le thème du Wall Street Journal de cette bibliothèque :

install.packages('ggthemes')

library(ggplot2)
library(ggthemes)

ggplot(df, aes(fill=position, y=points, x=team)) + 
  geom_bar(position='stack', stat='identity') +
  theme_wsj()

Reportez-vous à notre guide complet des meilleurs thèmes ggplot2 pour encore plus de thèmes.

Ressources additionnelles

Le guide complet des titres ggplot2
Comment créer un boxplot groupé dans R à l’aide de ggplot2
Comment créer des tracés côte à côte dans ggplot2