Un graphique en crêtes de base
On vous fournit du code pour créer un graphique en crêtes montrant, selon le jour de la semaine, de combien en pourcentage au‑dessus de la limite les conducteurs interceptés se trouvaient.
Modifiez le code pour définir la largeur du noyau (bandwidth) à une valeur précise, changer les limites de l'axe des x pour éliminer les longues queues, et ajouter aussi un subtitle indiquant au lectorat la largeur de noyau utilisée.
Cette activité fait partie du cours
Les meilleures pratiques de visualisation avec R
Instructions de l’exercice
- Changez le
bandwidthà 3.5 dansgeom_density_ridges(). - Réglez les
limitsde l'échelle en x de0à150. - Donnez au graphique le sous-titre
'Gaussian kernel SD = 3.5'.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
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