Nechme pršet (datové body)

Zvýšená bimodalita, kterou vidíme na začátku týdne, může být zajímavá – než ale vyvodíme závěry, měli bychom pod hustoty vykreslit jednotlivé body, abychom lépe viděli, jak KDE interpoluje.

Kód z předchozích cvičení jsme doplnili o geometrii bodů přesně za tímto účelem. Zatím to nevypadá nejlépe. Pojďme to napravit v několika krocích.

Nejdřív mírně snižme průhlednost bodů (alpha), aby bylo vidět jejich překryv. Pak přepneme tvar bodů na svislé čárky ve stylu geom_rug() ('|').

Když teď kód spustíš, uvidíš, že body nepěkně zasahují do tvarů hustot. Potřebujeme je trochu posunout dolů po ose y. K tomu slouží argument position a pomocná funkce position_nudge().

Toto cvičení je součástí kurzu

Vizualizace dat v R – nejlepší postupy

Zobrazit kurz

Pokyny k cvičení

Nastav alpha bodů na 0.2, aby byl vidět jejich překryv.
Změň tvar shape na '|' pro efektivnější využití prostoru.
Posuň body dolů, aby se nepřekrývaly s tvarem hustoty: position = position_nudge(y = -0.05).

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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() )

Upravit a spustit kód