LoslegenKostenlos starten

Einen Zeitregler hinzufügen

In der vorherigen Lektion hast du eine Animation erstellt, die die Anzahl der Starts der einzelnen Staaten über die Jahre zeigt. Ein Schieberegler ist eine Alternative zu dieser Animation und gibt dir die volle Kontrolle darüber, welchen Teil der Geschichte du untersuchen möchtest. Du kannst dir zum Beispiel alles von Anfang bis Ende ansehen oder dich nur auf die 1960er konzentrieren. In dieser Aufgabe fügst du unter dem Liniendiagramm der staatenbasierten Starts einen Schieberegler hinzu.

plotly, crosstalk, dplyr und der Datensatz state_launches wurden für dich geladen.

Diese Übung ist Teil des Kurses

<Kurs>Interaktive Datenvisualisierung mit plotly in R – Fortgeschrittene Themen</Kurs>
Kurs ansehen

Übungsanweisungen

  • Berechne die Anzahl der Starts nach state_code und launch_year und wandle das Ergebnis in ein SharedData-Objekt um. Speichere das Resultat in shared_launches.
  • Erstelle mit shared_launches ein Liniendiagramm, das die Anzahl der Starts (n) der einzelnen Staaten im Zeitverlauf darstellt. Speichere dieses Diagramm als launch_ts. Nutze die Farbe, um den state_code zu repräsentieren.
  • Platziere unter dem Diagramm einen Schieberegler, um die angezeigten Jahre zu filtern. Beschrifte diesen Regler mit "Year".

Interaktive praktische Übung

Versuche dich an dieser Übung, indem du diesen Beispielcode vervollständigst.

# Create a SharedData object containing the number of launches by year and state
shared_launches <- state_launches %>%
  count(___, ___) %>%
  ___()

# Create a line chart displaying the launches by state
launch_ts <- ___ %>%
  ___(x = ___, y = ___, color = ___) %>%
  ___()  

# Add a slider below the chart to filter the years displayed
___(list(___,
    ___(id = "time", label = ___, 
        sharedData = ___, column = ___)
))
Code bearbeiten und ausführen