零枚奥运奖牌
自 1896 年以来,来自世界各地的运动员一直在参加现代奥运会。您拿到一个数据集(medal_df),其中包含奥运历史上最成功的 10 个国家的运动员所获全部奖牌的观测记录。您希望按国家(team)和按 year 可视化每年获得的奖牌数。不过,并不是每个国家每年都有奖牌,因此在绘图前,您需要先把缺失年份补成 0,才能得到准确的可视化结果。

已为您预先加载 ggplot2 和 dplyr 包。在步骤 2 和 3 中,使用 scale_color_brewer() 函数为折线着色,所用调色板便于区分不同国家。
本练习是课程的一部分
使用 tidyr 重塑数据
交互式实操练习
通过完成这段示例代码来试试这个练习。
medal_df %>%
# Count the medals won per team and year
___(___, ___, name = "n_medals")