Tính và vẽ trung bình trượt
Chỉ báo bóng chày cuối cùng bạn muốn tạo là L10, tức trung bình thắng/thua trượt của 10 trận gần nhất. Trong khi trung bình thắng/thua tích lũy cho bạn biết bức tranh tổng thể, chỉ báo L10 cho thấy cụ thể hơn phong độ gần đây của đội. Ngoài lĩnh vực thể thao, thước đo này tương tự một chỉ báo tài chính tập trung vào hiệu suất danh mục gần đây.
Để tạo trung bình thắng/thua trượt, hãy quay lại lệnh rollapply() đã dùng ở chương trước. Ở đây, bạn sẽ áp dụng hàm mean cho 10 trận gần nhất của Red Sox tại bất kỳ thời điểm nào trong mùa giải 2013.
Đối tượng redsox_xts, bao gồm cột win_loss, đã có sẵn trong không gian làm việc của bạn.
Bài tập này là một phần của khóa học
Nghiên cứu tình huống: Phân tích dữ liệu chuỗi thời gian của thành phố bằng R
Hướng dẫn bài tập
- Tạo một đối tượng xts mới chỉ chứa mùa giải 2013. Đặt tên đối tượng này là
redsox_2013. - Dùng
rollapply()để tính chỉ báolastten_2013dựa trên cộtwin_losstrongredsox_2013. Đặtwidthbằng10để bao gồm 10 trận gần nhất của Red Sox và đặt đối sốFUNlàmeanđể tính trung bình cộtwin_loss. - Dùng
plot.xts()để xem chỉ báo mới trong mùa 2013. Giữ nguyên đối sốylimnhư trong mã đã viết sẵn.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# 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))