Zéro médailles olympiques
Depuis 1896, des athlètes de partout dans le monde participent aux Jeux olympiques modernes. On vous fournit un jeu de données (medal_df) contenant les observations de toutes les médailles remportées par les athlètes des 10 pays les plus performants de l'histoire olympique. Vous voulez créer un visuel montrant le nombre de médailles remportées par pays (team) et par year. Cependant, comme certains pays n'ont pas gagné de médailles chaque année, vous devrez introduire des zéros avant de pouvoir produire un visuel fidèle.

Les packages ggplot2 et dplyr ont été préchargés pour vous. Aux étapes 2 et 3, la fonction scale_color_brewer() est utilisée pour colorer les lignes du graphique avec une palette qui facilite la distinction entre les différents pays.
Cette activité fait partie du cours
Restructurer des données avec tidyr
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
medal_df %>%
# Count the medals won per team and year
___(___, ___, name = "n_medals")