Fazendo chover (pontos de dados)

O aumento de bimodalidade que vemos no início da semana pode ser interessante, mas é melhor desenhar pontos individuais abaixo das densidades para entender como o KDE está interpolando antes de encerrar.

Ao código dos exercícios anteriores foi adicionada uma geometria de pontos para fazer isso. Você vai notar que o resultado não fica muito bom. Para melhorar, vamos fazer algumas coisas…

Primeiro, reduzir um pouco os alphas dos pontos para visualizar a sobreposição. Segundo, trocar o formato do ponto para as linhas verticais no estilo geom_rug() ('|').

Neste ponto, se você executar o código, verá que os pontos cortam de forma estranha as formas de densidade. Precisamos "empurrar" as marcas um pouquinho para baixo no eixo y. Para isso, podemos usar o argumento position e a função auxiliar position_nudge().

Este exercício faz parte do curso

Boas práticas de visualização em R

Ver curso

Instruções do exercício

Reduza o alpha dos pontos para 0.2 para mostrar a sobreposição.
Altere o shape da linha para '|' para usar o espaço de forma mais eficiente.
Desloque os pontos para baixo para não sobrepor a densidade com position = position_nudge(y = -0.05).

Exercício interativo prático

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

md_speeding %>% 
    mutate(day_of_week = factor(day_of_week, levels = c("Mon","Tues","Wed","Thu","Fri","Sat","Sun") )) %>% 
    ggplot(aes( x = percentage_over_limit, y = day_of_week)) + 
    geom_point(
        # make semi-transparent with alpha = 0.2
        # turn points to vertical lines with shape = '|'
        # nudge the points downward by 0.05
    ) +
    geom_density_ridges(bandwidth = 3.5, alpha = 0.7) +
    scale_x_continuous(limits = c(0,150), expand  = c(0,0)) +
    labs(subtitle = 'Guassian kernel SD = 3.5') +
    theme( axis.ticks.y = element_blank() )

Editar e executar o código