ComeçarComece de graça

Corrigir posições de rótulos ruins

Os rótulos ainda acabam se sobrepondo às linhas no dot plot. Use uma estética hjust condicional para posicioná-los melhor e mude a sua aparência.

Este exercício faz parte do curso

Comunicando com Dados no Tidyverse

Ver curso

Instruções do exercício

  • No geom_text(), defina a estética hjust como 1.4 quando for o rótulo do ano "2006", e como -0.4 caso contrário. Use a função ifelse() para isso.
  • Também no geom_text(), altere o tamanho, a família e a cor da fonte para 3, "Bookman" e "gray25", respectivamente, mas fora da função aes(), já que esses valores não são orientados por dados.

Exercício interativo prático

Experimente este exercício completando este código de exemplo.

# 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
Editar e executar o código