Chapitre 31 Ajouter un encodage (aesthetics)
.small[
]
—
## Ajouter une 2ème géométrie
.small[
ggplot(iris,
aes(x=Sepal.Length,
y=Sepal.Width,
color = Species)) +
geom_point() +
geom_smooth() #<<## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
]
31.1 Ajouter une facette
.small[
ggplot(iris,
aes(x=Sepal.Length,
y=Sepal.Width,
color = Species)) +
geom_point() +
geom_smooth(method='lm', se=FALSE) +
facet_grid(~Species) #<<
]
—
## Régler le thème
.small[
ggplot(iris,
aes(x=Sepal.Length,
y=Sepal.Width,
color = Species)) +
geom_point() +
geom_smooth(method='lm', se=FALSE) +
facet_grid(~Species) +
theme_minimal() #<<
]
31.2 Ajuster la légende
.small[
ggplot(iris,
aes(x=Sepal.Length,
y=Sepal.Width,
color = Species)) +
geom_point()+
theme_minimal() +
labs(title = "Sépales des iris",
subtitle = "Longueur et largeur des sépales* en fonction de l'espèce",
x= "Longueur",
y = "Largeur",
caption = "* Chacune des pièces du calice de la fleur. / source: Iris dataset"
) +
guides(color = guide_legend(title = "Espèce")) #<<
]
—
## Paufiner le thème
.small[
ggplot(iris,
aes(x=Sepal.Length,
y=Sepal.Width,
color = Species)) +
geom_point()+
theme_minimal() +
labs(title = "Sépales des iris",
subtitle = "Longueur et largeur des sépales* en fonction de l'espèce",
x= "Longueur",
y = "Largeur",
caption = "* Chacune des pièces du calice de la fleur. / source: Iris dataset"
) +
guides(color = guide_legend(title = "Espèce")) +
theme(panel.grid.minor = element_blank(), #<<
legend.position = "bottom") #<<
]
—
# A l’aide !!!