Zéro médailles olympiques
Depuis 1896, des athlètes du monde entier 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 des Jeux. Vous souhaitez créer une visualisation du nombre de médailles remportées par pays (team) et par year. Cependant, comme tous les pays ne remportent pas des médailles chaque année, vous devrez introduire des zéros avant de pouvoir produire une visualisation 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.
Cet exercice fait partie du cours
Reshaper des données avec tidyr
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
medal_df %>%
# Count the medals won per team and year
___(___, ___, name = "n_medals")