MulaiMulai sekarang secara gratis

Prediksi penyewaan sepeda pada data baru

Dalam latihan ini, Anda akan menggunakan model yang Anda bangun pada latihan sebelumnya untuk membuat prediksi untuk bulan Agustus. Himpunan data bikesAugust memiliki kolom yang sama dengan bikesJuly.

Ingat bahwa Anda harus menentukan type = "response" dengan predict() (docs) saat memprediksi jumlah dari model glm poisson atau quasipoisson.

Model bike_model dan data frame bikesAugust telah dimuat sebelumnya.

Latihan ini adalah bagian dari kursus

Supervised Learning di R: Regresi

Lihat Kursus

Petunjuk latihan

  • Gunakan predict untuk memprediksi jumlah sepeda per jam pada data bikesAugust. Tetapkan prediksi ke kolom bikesAugust$pred.
  • Lengkapi bagian yang kosong untuk mendapatkan RMSE dari prediksi pada data Agustus.
  • Lengkapi bagian yang kosong untuk menghasilkan plot antara prediksi dan jumlah aktual.
    • Apakah ada prediksi yang tampak bernilai negatif?

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# 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")
Edit dan Jalankan Kode