เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

การแสดงผลการพยากรณ์

ผลการพยากรณ์ของคุณดูเหมือนจะคลาดเคลื่อนเฉลี่ยมากกว่า 18% ลองเปรียบเทียบผลการพยากรณ์กับชุดข้อมูล validation แบบ visual เพื่อดูว่าเกิดอะไรขึ้น workspace ของคุณมี object การพยากรณ์ forecast_MET_t และชุดข้อมูล validation MET_t_valid โหลดไว้ให้แล้ว อย่าลืมว่าชุดข้อมูล validation มีความยาว 22 สัปดาห์!

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การพยากรณ์ความต้องการสินค้าใน R

ดูคอร์ส

คำแนะนำการฝึกหัด

  • แปลงค่าเฉลี่ยของการพยากรณ์ (forecast$mean) ให้เป็น object ประเภท xts โดยใช้ object for_dates เป็น time index โดยจำไว้ว่าชุดข้อมูล validation มีความยาว 22 สัปดาห์
  • พล็อตชุดข้อมูล validation
  • วางกราฟการพยากรณ์ (for_MET_t_xts) ซ้อนทับบนกราฟ validation
  • อย่าเปลี่ยนตัวเลือกการพล็อตในทั้งสองส่วน เพื่อให้มองเห็นได้ชัดเจนขึ้น

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

# Convert your forecast to an xts object
for_dates <- seq(as.Date("2017-01-01"), length = ___, by = "weeks")
for_MET_t_xts <- xts(forecast_MET_t$___, order.by = ___)

# Plot the validation data set
plot(MET_t_valid, main = 'Forecast Comparison', ylim = c(4000, 8500))

# Overlay the forecast of 2017
lines(___, col = "blue")
แก้ไขและรันโค้ด