Medalhas olímpicas por continente

Você quer comparar, ao longo do tempo, o desempenho olímpico dos atletas por continente, tanto nos Jogos de inverno quanto nos de verão. Você recebeu um conjunto de dados medal_df com o número médio de medalhas por participante de cada continente desde 1928. Você vai completar esses dados para inserir valores zero nos anos em que um continente não ganhou nenhuma medalha.

Olympic flag

O pacote ggplot2 já foi carregado para você.

Este exercício faz parte do curso

Reestruturando dados com tidyr

Ver curso

Instruções do exercício

Complete o conjunto de dados para que cada continent tenha um valor de medals_per_participant em cada evento olímpico. Valores ausentes devem ser preenchidos com zeros.
Aninhe as variáveis season e year usando a função nesting(), já que as Olimpíadas de verão e de inverno não acontecem nos mesmos anos.
Use ggplot() para criar um gráfico de linhas com medals_per_participant por year, colorindo o gráfico por continent.

Exercício interativo prático

Experimente este exercício completando este código de exemplo.

medal_df %>% 
  # Give each continent an observation at each Olympic event
  complete(
    ___, 
    ___, 
    fill = ___(___ = ___)
  ) %>%
  # Plot the medals_per_participant over time, colored by continent
  ggplot(___) +
  ___ +
  facet_grid(season ~ .)

Editar e executar o código