Theme sombre ggdark

Testons le mode sombre

Prenons le jeu de données diamonds , et classons les diamants par prix (en dollars) et poids (carat) en fonction de la coupe .

Dés le début du code , on créé un *objet : p .

Cet objet ce créé simplement comme ceci p <- , qui nous permettra de contenir la définition de notre graphique .

library(ggplot2)
p <- ggplot(diamonds) + 
   geom_point(aes(carat, price, color = cut)) + 
   scale_y_continuous(label = scales::dollar) +
   guides(color = guide_legend(reverse = TRUE)) +
   labs(title = "Prix de 50 000 diamants taille ronde par carat et par taille",
        x = "Poid (carats)",
        y = "Prix en Dollars US",
        color = "Qualité de la coupe")
 
 p + theme_gray()

Librairie ggdark

Appliquons un theme sombre , c’est vraiment sympa.

library(ggdark)

p + dark_theme_gray()

## Inverted geom defaults of fill and color/colour.
## To change them back, use invert_geom_defaults().

Font ou police de caractère

p + dark_theme_gray(base_family = "Fira Sans Condensed Light", base_size = 12) + 
  theme(plot.title = element_text(family = "Fira Sans Condensed"),
        plot.background = element_rect(fill = "grey10"),
        panel.background = element_blank(),
        panel.grid.major = element_line(color = "grey30", size = 0.2),
        panel.grid.minor = element_line(color = "grey30", size = 0.2),
        legend.background = element_blank(),
        axis.ticks = element_blank(),
        legend.key = element_blank(),
        legend.position = c(0.815, 0.27))

## Warning: The `size` argument of `element_line()` is deprecated as of ggplot2 3.4.0.
## ℹ Please use the `linewidth` argument instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.

## Warning: A numeric `legend.position` argument in `theme()` was deprecated in ggplot2
## 3.5.0.
## ℹ Please use the `legend.position.inside` argument of `theme()` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.

Ce travail est sous licence Attribution-NonCommercial 4.0 International.