Kom igångKom igång gratis

Rätta till fula etikettpositioner

Etiketterna överlappar fortfarande något med linjerna i punktdiagrammet. Använd ett villkorsstyrt hjust-estetiskt värde för att placera dem bättre, och ändra deras utseende.

Den här övningen är en del av kursen

Kommunicera med data i Tidyverse

Visa kurs

Övningsinstruktioner

  • Ge hjust-estetiken i anropet till geom_text() värdet 1.4 om det gäller etiketten för året "2006", och -0.4 annars. Använd funktionen ifelse() för detta.
  • Ändra teckenstorlek, teckensnittsfamilj och färg till 3, "Bookman" respektive "gray25", också i anropet till geom_text(), men utanför funktionen aes() eftersom dessa värden inte är datadrivna.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# 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
Redigera och kör kod