Não consigo adicionar os labels em X

dúvidas atenção curso-r
1

Tenho o seguinte código:

data %>%
  mutate(data = ymd_hms(created_at), dia = day(data), new = 1) %>%
  group_by(dia) %>%
  summarise(total = sum(new)) %>%
  ggplot(aes(x = dia, y = total))+
  geom_line()+
  geom_label(aes(x = dia, y = total, label = total)) +
  labs(
    x = "",
    y = "Total de Tweets"
  ) +
  theme_minimal() +
  theme(axis.title.x = element_text(size = 12L, hjust = 0.5,
      margin = margin(t = 20, r = 0, b = 0, l = 0)))+
  scale_x_continuous(breaks = seq(7, 13, 1)) #+
  # scale_x_discrete(labels = c("07-Fev", "08-Fev", "09-Fev", "10-Fev",
  #                           "11-Fev", "12-Fev", "13-Fev"))

O que está comentado (# scale_x_discrete) não está gerando impacto no meu gráfico . Na verdade, está apagando os labels de X.

O gráfico atualmente está assim:

image
image1344×960 24.8 KB

Eu gostaria que os números parecessem data, por isso coloquei o scale_x_discrete. Mas daí todos os números estão sendo apagados.

Por favor, alguém sabe como solucionar?

2

Oi Kaique, tudo bem?
Para os valores do eixo X ficarem como data, é importante passar uma data para o gráfico.
Em vez de agrupar por dia, eu agruparia pela data, e deixaria a data do eixo x.
Aí será possível usar a função scale_x_date(). Eu testaria os argumentos date_breaks=“1 day”,
date_labels = “%d/%b”

1 curtida
3

Oi Beatriz! Massa, deu super certo! Muito obrigado

1 curtida