Hitung dan plot rata-rata bergulir
Indikator baseball terakhir yang ingin Anda buat adalah L10, yaitu rata-rata menang/kalah bergerak dari sepuluh pertandingan sebelumnya. Sementara rata-rata kumulatif menang/kalah memberi tahu Anda performa tim secara keseluruhan, indikator L10 memberikan gambaran yang lebih spesifik tentang performa terbaru tim. Di luar dunia olahraga, ukuran ini sebanding dengan indikator keuangan yang berfokus pada kinerja portofolio terkini.
Untuk menghasilkan rata-rata menang/kalah bergulir, kembali ke perintah rollapply() yang digunakan di bab sebelumnya. Dalam hal ini, Anda akan menerapkan fungsi mean pada 10 pertandingan terakhir yang dimainkan Red Sox pada waktu tertentu selama musim 2013.
Objek redsox_xts, termasuk kolom win_loss, tersedia di ruang kerja Anda.
Latihan ini adalah bagian dari kursus
Studi Kasus: Menganalisis Data Deret Waktu Kota di R
Petunjuk latihan
- Buat xts baru yang hanya mencakup musim 2013. Beri nama objek ini
redsox_2013. - Gunakan
rollapply()untuk menghitung indikatorlastten_2013berdasarkan kolomwin_lossdalamredsox_2013. Tetapkanwidthsama dengan10untuk memasukkan sepuluh pertandingan terakhir yang dimainkan Red Sox dan tetapkan argumenFUNkemeanuntuk menghasilkan rata-rata dari kolomwin_loss. - Gunakan
plot.xts()untuk melihat indikator baru Anda selama musim 2013. Biarkan argumenylimsebagaimana adanya pada kode yang sudah disediakan.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Select only the 2013 season
redsox_2013 <- ___["___"]
# Use rollapply to generate the last ten average
lastten_2013 <- rollapply(___$___, width = ___, FUN = ___)
# Plot the last ten average during the 2013 season
plot.xts(___, ylim = c(0, 1))