La consommation des véhicules aux Etats Unis se compte en Miles per Galon , comme si nous , nous disions Kilometre par Litre.
library(ggplot2)
ggplot(mpg, aes(displ, hwy)) +
geom_point(aes(colour = class)) +
geom_smooth(se = TRUE) +
labs(title = "L'efficaciité décroit avec la taille du moteur",
subtitle = "Sauf les 2 places du fait du poid",
caption = "Données du fueleconomy.gov",
x = "Volume du moteur (L)",
y = "Consommation sur autoroute (mpg)",
colour = "Type de véhicule"
) +
theme(
plot.title = element_text(color = "#9E0142", size = 12,
face = "bold", hjust = 0.5),
plot.subtitle = element_text(color = "#3288BD", hjust = 0.5),
plot.caption = element_text(color = "#66C2A5", face = "italic")
)## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
Theme dark
Testons le ggdark theme avec mon graphique…
library(ggplot2)
library(ggdark)
ggplot(mpg, aes(displ, hwy)) +
geom_point(aes(colour = class)) +
geom_smooth(se = TRUE) +
labs(title = "L'efficaciité décroit avec la taille du moteur",
subtitle = "Sauf les 2 places du fait du poid",
caption = "Données du fueleconomy.gov",
x = "Volume du moteur (L)",
y = "Consommation sur autoroute (mpg)",
colour = "Type de véhicule"
) +
theme(
plot.title = element_text(color = "#9E0142", size = 12,
face = "bold", hjust = 0.5),
plot.subtitle = element_text(color = "#3288BD", hjust = 0.5),
plot.caption = element_text(color = "#66C2A5", face = "italic")
) +
dark_theme_gray()## Inverted geom defaults of fill and color/colour.
## To change them back, use invert_geom_defaults().## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
Super classe !!! Mais j’ai perdu la coloration du texte ..
Cependant il y a assez de couleur.
Ce travail est sous licence Attribution-NonCommercial 4.0
International.
