Colocando um rug no gráfico
O gráfico que acabamos de fazer está bem bom, mas dá para ver um leve indício de bimodalidade entre as horas 10 e 15. Como estamos olhando apenas para o “bloco” de uma estimativa de densidade, é difícil saber quão confiantes estamos nesse formato.
Vamos aliviar isso fazendo duas coisas.
Primeiro, diminua o alpha no gráfico de densidade para que possamos localizar esses picos com mais precisão usando a grade de fundo.
Depois, adicione um rug plot abaixo do gráfico de densidade usando geom_rug(). Para mostrar qualquer sobreposição que possa ocorrer no rug plot, defina seu alpha como 0.5.
O data frame que você criou no exercício anterior: truck_speeding, já foi carregado para você.
Este exercício faz parte do curso
Boas práticas de visualização em R
Instruções do exercício
- Defina o alpha do gráfico de densidade como
0.7. - Adicione
geom_rug()ao gráfico. - Defina o alpha do rug plot como
0.5.
Exercício interativo prático
Experimente este exercício completando este código de exemplo.
ggplot(truck_speeding, aes(x = hour_of_day)) +
# Adjust opacity to see gridlines with alpha = 0.7
geom_density(bw = 1.5, fill = 'steelblue', ___) +
# add a rug plot using geom_rug to see individual data points, set alpha to 0.5.
___ +
labs(title = 'Citations by hour', subtitle = "Gaussian kernel SD = 1.5")