Adăugarea unui slider pentru timp
În lecția anterioară, ai creat o animație care afișa numărul de lansări ale fiecărui stat de-a lungul anilor. O bară slider este o alternativă la acea animație, oferindu-ți control deplin asupra porțiunii din poveste pe care vrei să o explorezi. De exemplu, poți parcurge datele de la început până la sfârșit sau te poți concentra doar pe anii '60. În acest exercițiu, sarcina ta este să adaugi o bară slider sub graficul liniar al lansărilor pe state.
plotly, crosstalk, dplyr și setul de date state_launches au fost încărcate pentru tine.
Acest exercițiu face parte din cursul
Vizualizare interactivă avansată a datelor cu plotly în R
Instrucțiuni pentru exercițiu
- Calculează numărul de lansări pe
state_codeșilaunch_year, apoi convertește rezultatul într-un obiectSharedData. Stochează rezultatul înshared_launches. - Folosind
shared_launches, creează un grafic liniar care să afișeze numărul de lansări (n) pentru fiecare stat în timp. Stochează acest grafic calaunch_ts. Folosește culoarea pentru a reprezentastate_code. - Plasează un slider sub grafic pentru a filtra anii afișați. Etichetează acest slider cu
"Year".
Exercițiu interactiv practic
Încearcă acest exercițiu completând acest cod de exemplu.
# 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 = ___)
))