Hareketli ortalama hesapla ve görselleştir
Oluşturmak istediğin son beyzbol göstergesi L10: son on maçtaki galibiyet/mağlubiyet ortalaması. Kümülatif galibiyet/mağlubiyet ortalaması takımın genel durumunu gösterirken, L10 gösterge takımın son dönemdeki performansına daha net bir pencere açar. Spor dünyasının ötesinde, bu ölçüm, yakın dönem portföy performansına odaklanan bir finansal göstergeye benzetilebilir.
Hareketli galibiyet/mağlubiyet ortalaması üretmek için, önceki bölümde kullandığın rollapply() komutuna geri dön. Bu durumda, 2013 sezonu boyunca herhangi bir anda Red Sox'ın oynadığı son 10 maça mean fonksiyonunu uygulamak isteyeceksin.
win_loss sütunu da dahil olmak üzere redsox_xts nesnesi çalışma alanında hazır.
Bu egzersiz
Vaka Çalışması: R ile Şehir Zaman Serisi Verilerini Analiz Etme
kursunun bir parçasıdırEgzersiz talimatları
- Yalnızca 2013 sezonunu içeren yeni bir xts nesnesi oluştur. Bu nesneye
redsox_2013adını ver. rollapply()kullanarakredsox_2013içindekiwin_losssütununa dayalılastten_2013göstergeni hesapla. Red Sox'ın oynadığı son on maçı dahil etmek içinwidthdeğerini10olarak ayarla vewin_losssütununun ortalamasını almak içinFUNargümanınımeanyap.- 2013 sezonu boyunca yeni göstergeni görmek için
plot.xts()kullan. Önceden yazılmış koddakiylimargümanını olduğu gibi bırak.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# 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))