Staatliche vs. private Starts
Ausgehend von der vorherigen Grafik scheint es, dass es – abgesehen von China – weniger Starts gibt. Stimmt das? Oder hat das Wettrennen im All den privaten Markt erreicht? In dieser Übung sollst du dieser Frage nachgehen, indem du die Anzahl der Starts von Staaten und privaten Unternehmen im Zeitverlauf vergleichst.
Die Pakete plotly, crosstalk und dplyr sind bereits geladen.
Diese Übung ist Teil des Kurses
<Kurs>Interaktive Datenvisualisierung mit plotly in R – Fortgeschrittene Themen</Kurs>Übungsanweisungen
- Erstelle ein neues
SharedData-Objekt aus dem Data Framelaunches_by_year. - Erstelle ein Liniendiagramm, das die Anzahl der Starts über die Zeit (
launch_year) nachagency_typedarstellt. Verwende Farbe, umagency_typezu kodieren. - Aktiviere die Auswahl (d. h. Hervorhebung) eines
agency_type.
Interaktive praktische Übung
Versuche dich an dieser Übung, indem du diesen Beispielcode vervollständigst.
# table of launches by year and agency type
launches_by_year <- launches %>% count(launch_year, agency_type)
# create a ShareData object for plotting
shared_launches <- launches_by_year %>% ___(key = ___)
# create a line chart displaying launches by agency type, with highlighting
shared_launches %>%
___(___, ___, ___) %>%
___() %>%
___()