Dự đoán số lượt thuê xe đạp trên dữ liệu mới
Trong bài tập này, bạn sẽ dùng mô hình đã xây dựng ở bài trước để dự đoán cho tháng 8. Bộ dữ liệu bikesAugust có cùng các cột như bikesJuly.
Lưu ý bạn phải chỉ định type = "response" với predict() (docs) khi dự đoán số đếm từ mô hình glm poisson hoặc quasipoisson.
Mô hình bike_model và data frame bikesAugust đã được nạp sẵn.
Bài tập này là một phần của khóa học
Học có giám sát với R: Hồi quy
Hướng dẫn bài tập
- Dùng
predictđể dự đoán số xe mỗi giờ trên dữ liệubikesAugust. Gán các dự đoán vào cộtbikesAugust$pred. - Điền vào chỗ trống để tính RMSE của các dự đoán trên dữ liệu tháng 8.
- Điền vào chỗ trống để vẽ biểu đồ so sánh dự đoán với số đếm thực tế.
- Có dự đoán nào âm không?
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.
# bikesAugust is available
str(bikesAugust)
# bike_model is available
summary(bike_model)
# Make predictions on August data
bikesAugust$pred <- ___
# Calculate the RMSE
bikesAugust %>%
mutate(residual = ___) %>%
summarize(rmse = ___)
# Plot predictions vs cnt (pred on x-axis)
ggplot(bikesAugust, aes(x = ___, y = ___)) +
geom_point() +
geom_abline(color = "darkblue")