Corriger la position des étiquettes peu esthétiques
Les étiquettes se superposent encore un peu aux lignes du dot plot. Utilisez un attribut esthétique hjust conditionnel pour mieux les positionner, et modifiez leur apparence.
Cet exercice fait partie du cours
Communiquer avec les données dans le tidyverse
Instructions
- Donnez à l’esthétique
hjustdans l’appel àgeom_text()la valeur1.4si l’étiquette concerne l’année"2006", et-0.4sinon. Utilisez la fonctionifelse()pour cela. - Modifiez la taille, la famille et la couleur de la police à
3,"Bookman"et"gray25"respectivement, également dans l’appel àgeom_text(), mais en dehors de la fonctionaes()puisque ces valeurs ne dépendent pas des données.
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# 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