Menambahkan slider untuk waktu
Pada pelajaran sebelumnya, Anda membuat animasi yang menampilkan jumlah peluncuran oleh setiap negara bagian dari tahun ke tahun. Bilah slider merupakan alternatif dari animasi tersebut yang memberi Anda kendali penuh atas bagian cerita yang ingin ditelusuri. Misalnya, Anda dapat melihatnya dari awal hingga akhir atau berfokus hanya pada tahun 1960-an. Pada latihan ini, tugas Anda adalah menambahkan bilah slider di bawah bagan garis peluncuran berdasarkan negara bagian.
plotly, crosstalk, dplyr, dan himpunan data state_launches telah dimuat untuk Anda.
Latihan ini adalah bagian dari kursus
Visualisasi Data Interaktif Tingkat Menengah dengan plotly di R
Petunjuk latihan
- Hitung jumlah peluncuran berdasarkan
state_codedanlaunch_year, lalu ubah menjadi objekSharedData. Simpan hasilnya sebagaishared_launches. - Dengan menggunakan
shared_launches, buat bagan garis yang menampilkan jumlah peluncuran (n) oleh setiap negara bagian dari waktu ke waktu. Simpan bagan ini sebagailaunch_ts. Gunakan warna untuk merepresentasikanstate_code. - Posisikan slider di bawah bagan untuk memfilter tahun yang ditampilkan. Beri label slider ini
"Year".
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# 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 = ___)
))