Un ridgeline plot simple

On vous fournit du code pour créer un ridgeline plot montrant le pourcentage au-dessus de la limite de vitesse des conducteurs contrôlés, selon le jour de la semaine.

Modifiez le code pour définir la largeur du noyau (bandwidth) à une valeur donnée, changer les limites de l’axe des x pour supprimer les longues queues, et ajouter un subtitle pour indiquer au lecteur la valeur de bandwidth utilisée.

Cet exercice fait partie du cours

Bonnes pratiques de visualisation avec R

Afficher le cours

Instructions

Changez bandwidth à 3.5 dans geom_density_ridges().
Définissez les limits de l’échelle des x de 0 à 150.
Ajoutez au graphique le sous-titre 'Gaussian kernel SD = 3.5'.

Exercice interactif pratique

Essayez cet exercice en complétant cet exemple de code.

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

Modifier et exécuter le code