Corriger les positions d'étiquettes peu esthétiques
Les étiquettes se superposent encore un peu aux lignes du nuage de points. Utilisez un attribut esthétique hjust conditionnel pour mieux les placer et ajustez leur apparence.
Cette activité fait partie du cours
Communiquer avec des données dans le tidyverse
Instructions de l’exercice
- Donnez à l'attribut esthétique
hjustdans l'appel àgeom_text()la valeur1.4s'il s'agit de l'étiquette pour l'année"2006", et-0.4sinon. Utilisez pour cela la fonctionifelse(). - Modifiez la taille, la famille et la couleur de la police à
3,"Bookman"et"gray25"respectivement, toujours dans l'appel àgeom_text(), mais à l'extérieur de la fonctionaes()puisque ces valeurs ne dépendent pas des données.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# Save plot into an object for reuse
ilo_dot_plot <- ggplot(ilo_data) +
geom_path(aes(x = working_hours, y = country),
arrow = arrow(length = unit(1.5, "mm"), type = "closed")) +
# Specify the hjust aesthetic with a conditional value
geom_text(
aes(x = working_hours,
y = country,
label = round(working_hours, 1),
hjust = ifelse(___)
),
# Change the appearance of the text
___ = ___,
___ = "___",
___ = "___"
)
ilo_dot_plot