GGPlot Galerie de Thèmes

GGPlot basique

Data: ToothGrowth

# Convertir la colonne `dose` en variable factorielle
data("ToothGrowth")
ToothGrowth$dose <- as.factor(ToothGrowth$dose)

# Créer un boxplot simple
library(ggplot2)
p <- ggplot(ToothGrowth, aes(x = dose, y = len)) + 
  geom_boxplot()

Changer de thème

p + theme_gray(base_size = 14) 

p + theme_bw()

p + theme_linedraw()

p + theme_light()

p + theme_dark() 

p + theme_minimal()

p + theme_classic()

p + theme_void()

install.packages("ggthemes") # Installer 

library(ggthemes) # Charger

# Diagramme de dispersion
sp <- ggplot(mtcars, aes(wt, mpg)) +
  geom_point() 
sp

# Boxblot
ToothGrowth$dose <- as.factor(ToothGrowth$dose)
bxp <- ggplot(ToothGrowth, aes(x = dose, y = len)) +
  geom_boxplot(aes(fill = dose))
bxp

library(ggthemes)
sp + geom_rangeframe() +  theme_tufte()

p <- ggplot(ToothGrowth, aes(factor(dose), len)) +
  theme_tufte(ticks = FALSE)

# Box plot 1
p + geom_tufteboxplot()

# Box plot 2
p + geom_tufteboxplot(median.type = "line", 
                      whisker.type = 'line',
                      hoffset = 0, width = 3)

bxp + theme_economist() + scale_fill_economist()

bxp + theme_stata() + scale_fill_stata()

bxp + theme_hc()+ scale_colour_hc()

Remplacer le thème actuel : theme_set

La fonction theme_set() peut être utilisée pour changer le thème de la session entière. Il retourne l’ancien thème, pour que nous puissions le restaurer plus tard.

p <- ggplot(ToothGrowth, aes(x = dose, y = len)) + 
  geom_boxplot()
# Utiliser theme_bw()
old.theme <- theme_set(theme_bw())
p

# Restaurer l'ancien thème
theme_set(old.theme)
p

Modifier base_size et base_family dans le thème ggplot

Notez que les fonctions thématiques peuvent prendre les deux arguments suivants :

• base_size : taille de la police de base (pour changer la taille de tous les éléments de texte du graphe)
• base_family : police de base

Par exemple, la taille de tous les éléments de texte du graphique peut être facilement modifiée en même temps, à l’aide de la commande:

p + theme_gray(base_size = 18, base_family = "Times")

Créer un thème personnalisé

La fonction theme() est utilisée pour contrôler l’apparence d’un graphique ggplot2, y compris

• Éléments de ligne : lignes des axes, lignes des grilles mineures et principales, bordure du panneau graphique, graduations des axes couleur de fond, etc.
• Eléments de texte : titre du graphique, titres des axes, titre et texte de la légende, textes des graduations des axes, etc.
• Eléments rectangulaires : arrière-plan du graphique, background du panneau graphique, fond de la légende, etc.

Il existe une fonction spécifique pour modifier chacun de ces trois éléments :

• element_line(color, size, linetype) pour modifier les éléments de ligne du thème
• element_text(face, color, size, hjust, vjust, angle) pour modifier les éléments de texte
• element_rect(fill, color, size, linetype) pour modifier les éléments du rectangle

La façon la plus simple de créer un thème personnalisé est, par exemple, d’extraire et de modifier le code R de la fonction theme_gray() ou toute autre fonction de thèmes [theme_bw(), theme_classic(), etc].

• Construisez votre thème à partir de rien en commençant par le code source de la fonction theme_gray():

theme_gray

function (base_size = 11, base_family = "") {
  
 half_line <- base_size/2
 
theme(
  ...
  axis.text = element_text(size = rel(0.8), colour = "grey30"),
  ...
  )

}

• Créez un nouveau thème appelé theme_bluewhite() by starting with the source code of the function theme_bw(). Nous ne remplacerons que quelques éléments de thème.

# Créer un nouveau thème
theme_bluewhite <- function (base_size = 11, base_family = "") {
    theme_bw() %+replace% 
    theme(
      panel.grid.major  = element_line(color = "white"),
      panel.background = element_rect(fill = "lightblue"),
      panel.border = element_rect(color = "lightblue", fill = NA),
      axis.line = element_line(color = "lightblue"),
      axis.ticks = element_line(color = "lightblue"),
      axis.text = element_text(color = "steelblue")
      )
}

# Utiliser notre nouveau thème
ggplot(ToothGrowth, aes(dose, len)) +
  geom_boxplot() +
  theme_bluewhite()

Conclusion

Nous présentons une liste de thèmes ggplot pour personnaliser facilement vos graphiques. Nous décrivons également comment créer un thème ggplot personnalisé.

Les points principaux sont les suivants.

• Créer un exemple de ggplot:

library(ggplot2)
p <- ggplot(ToothGrowth, aes(x = dose, y = len)) + 
  geom_boxplot()

• Modifiez le theme ggplot en utilisant l’un des thèmes professionnels suivants:
  • theme_bw(), theme_minimal(), theme_classic() et theme_dark()[dans le package ggplot2]
  • theme_tufte() et theme_economist() [dans ggthemes]

p + theme_minimal()