Prérequis

Charger les packages requis et définir la fonction thème theme_bw() comme thème par défaut:

library(ggplot2) 
theme_set(theme_bw())

Préparation des données

Les données dérivées du jeu de données “ToothGrowth” sont utilisées. ToothGrowth décrit l’effet de la vitamine C sur la croissance des dents chez les cobayes. On utilise trois doses de vitamine C (0,5, 1 et 2 mg) avec chacune des deux méthodes d’administration [jus d’orange (JO) ou acide ascorbique (VC)] :

df <- data.frame(
  supp = rep(c("VC", "OJ"), each = 3),
  dose = rep(c("D0.5", "D1", "D2"), 2),
  len = c(6.8, 15, 33, 4.2, 10, 29.5)
  )

head(df)

##   supp dose  len
## 1   VC D0.5  6.8
## 2   VC   D1 15.0
## 3   VC   D2 33.0
## 4   OJ D0.5  4.2
## 5   OJ   D1 10.0
## 6   OJ   D2 29.5

• len : Longueur des dents
• dose : Dose en milligrammes (0,5, 1, 2)
• supp : type de supplément (VC ou OJ)

Créer un graphique de l’ensemble des données

ggplot(df, aes(x = dose, y = len))+
  geom_col(aes(fill = supp), width = 0.7) +
  scale_fill_viridis_d()

Subset du jeu de données

ggplot(subset(df, dose %in% c("D0.5", "D1")), aes(x = dose, y = len))+
  geom_col(aes(fill = supp), width = 0.7) +
  scale_fill_viridis_d()