Olympijské medaile podle kontinentu

Chceš porovnat olympijské výsledky sportovců podle kontinentu v průběhu času – na zimních i letních olympijských hrách. K dispozici máš datovou sadu medal_df s průměrným počtem medailí na účastníka za každý kontinent od roku 1928. Doplníš tato data o nulové hodnoty pro roky, kdy daný kontinent žádné medaile nezískal.

Olympic flag

Balíček ggplot2 je již načtený.

Toto cvičení je součástí kurzu

Reshaping Data with tidyr

Zobrazit kurz

Pokyny k cvičení

Doplň datovou sadu tak, aby měl každý continent hodnotu medals_per_participant pro každou olympiádu. Chybějící hodnoty nahraď nulami.
Proměnné season a year vnořte pomocí funkce nesting(), protože letní a zimní olympijské hry se nekonají ve stejných letech.
Pomocí ggplot() vytvoř spojnicový graf zobrazující medals_per_participant v závislosti na year a obarvi ho podle continent.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

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

Upravit a spustit kód