Een eenvoudige ridgeline-plot

Er is code meegeleverd om een ridgeline-plot te maken die kijkt naar het percentage boven de limiet waarvoor bestuurders staande werden gehouden, uitgesplitst naar dag van de week.

Pas de code aan om de kernelbreedte (bandwidth) op een opgegeven waarde te zetten, verander de x-as-limieten om de lange staarten te verwijderen, en voeg ook een subtitle toe zodat de lezer weet welke bandwidth je gebruikt.

Deze oefening maakt deel uit van de cursus

Best practices voor visualisaties in R

Cursus bekijken

Oefeninstructies

Verander de bandwidth naar 3.5 in geom_density_ridges().
Stel de limits van de x-schaal in op 0 tot 150.
Geef de plot de subtitle 'Gaussian kernel SD = 3.5'.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

library(ggridges)

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)) + 
    # Set bandwidth to 3.5
    geom_density_ridges() +
    # add limits of 0 to 150 to x-scale
    scale_x_continuous() 
    # provide subtitle with bandwidth

Code bewerken en uitvoeren