Začněte nyníZačněte zdarma

Časová osa vesmírného závodu

„První" vesmírný závod začal ve chvíli, kdy se Spojené státy a Sovětský svaz snažily stát se světovou velmocí v kosmonautice. Tento závod vrcholil 20. července 1969, kdy přistál na Měsíci Apollo 11 – kosmická loď s posádkou. V tomto cvičení je tvým úkolem vytvořit graf časové řady shrnující první vesmírný závod: souboj zemí o nadvládu v kosmickém létání.

Balíčky plotly, crosstalk a dplyr jsou již načteny.

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

Intermediate Interactive Data Visualization with plotly in R

Zobrazit kurz

Pokyny k cvičení

  • Vytvoř nový objekt SharedData z datového rámce state_launches.
  • Vytvoř spojnicový graf zobrazující počet startů podle roku (launch_year) pro každý stát (state_code).
  • Každou linii zobraz jinou barvou.
  • Povol výběr (tj. zvýraznění) jednotlivého státu.

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

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

# table of launches by year
state_launches <- launches %>% 
  filter(agency_type == "state") %>% 
  count(launch_year, state_code)

# create a ShareData object for plotting
shared_launches <- state_launches %>% ___(key = ___)

# Create a line chart for launches by state, with highlighting
shared_launches %>%
  ___(___, ___, ___) %>%
  ___() %>%
  ___()
Upravit a spustit kód