Olympische Medaillen pro Kontinent

Du möchtest die olympische Leistung von Athletinnen und Athleten pro Kontinent über die Zeit vergleichen – sowohl bei Winter- als auch bei Sommerspielen. Du hast den Datensatz medal_df erhalten, der seit 1928 die durchschnittliche Anzahl an gewonnenen Medaillen pro Teilnehmer bzw. Teilnehmerin jedes Kontinents enthält. Du wirst diese Daten vervollständigen, um für Jahre, in denen ein Kontinent keine Medaillen gewonnen hat, Nullwerte einzufügen.

Olympic flag

Das Paket ggplot2 wurde bereits für dich geladen.

Diese Übung ist Teil des Kurses

Daten umformen mit tidyr

Kurs anzeigen

Anleitung zur Übung

Vervollständige den Datensatz so, dass jeder continent bei jedem olympischen Event einen Wert für medals_per_participant hat. Fehlende Werte sollen mit Nullen gefüllt werden.
Verschachtle die Variablen season und year mit der Funktion nesting(), da Sommer- und Winterspiele nicht in denselben Jahren stattfinden.
Verwende ggplot(), um ein Liniendiagramm mit medals_per_participant pro year zu erstellen, und färbe die Linien nach continent ein.

Interaktive Übung

Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.

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 bearbeiten und ausführen