Olympische medailles per continent

Je wilt de Olympische prestaties van atleten per continent door de tijd heen vergelijken, zowel voor de Winter- als de Zomerspelen. Je hebt een gegevensset medal_df met het gemiddelde aantal medailles per deelnemer per continent sinds 1928. Je gaat deze data completeren zodat jaren waarin een continent geen medailles won een nulwaarde krijgen.

Olympic flag

Het pakket ggplot2 is alvast voor je geladen.

Deze oefening maakt deel uit van de cursus

Data herstructureren met tidyr

Cursus bekijken

Oefeninstructies

Completeer de gegevensset zodat elk continent bij elk olympisch evenement een waarde voor medals_per_participant heeft. Vul ontbrekende waarden aan met nullen.
Neste de variabelen season en year met de functie nesting(), omdat de Zomer- en Winterspelen niet in dezelfde jaren plaatsvinden.
Gebruik ggplot() om een lijndiagram te maken van medals_per_participant per year, en kleur de lijnen op continent.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

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 ~ .)

Code bewerken en uitvoeren