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

การใช้การวิเคราะห์การถดถอยเพื่อทดสอบค่าประมาณการ

หลังจากตรวจสอบข้อมูลด้วยสายตาแล้ว คุณต้องการใช้การวิเคราะห์การถดถอยเพิ่มเติม เพื่อพิจารณาว่ามีการเปลี่ยนแปลงแนวโน้มอย่างมีนัยสำคัญทางสถิติระหว่างรายได้ในอดีตกับรายได้ที่ประมาณการไว้หรือไม่ โดยต้องสร้างตัวแปร trend (trend) และตัวแปร shift (shift)

สำหรับแบบฝึกหัดนี้ ข้อมูลรายได้ที่สร้างไว้ในแบบฝึกหัดก่อนหน้าถูกเก็บไว้ในออบเจกต์ rev ซึ่งประกอบด้วยชุดข้อมูลสองชุด ได้แก่ รายได้ในอดีต (hist_rev) และรายได้ที่ประมาณการ (proj_rev) โดย hist_rev มีค่าเป็นบวกสำหรับ 10 ปีแรกของข้อมูลประวัติศาสตร์ และเป็น 0 ในช่วงประมาณการ ส่วน proj_rev มีค่าเป็น 0 ใน 10 ปีแรก และมีค่าเป็นบวกในช่วงประมาณการ

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

การประเมินมูลค่าหุ้นด้วย R

ดูคอร์ส

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

  • สร้างชุดข้อมูลรายได้เดียวที่รวมข้อมูลประวัติศาสตร์และข้อมูลประมาณการเข้าด้วยกัน
  • เพิ่มตัวแปร trend ลงใน rev_all_df โดยใช้ seq()
  • เพิ่มตัวแปร shift ลงใน rev_all_df โดยใช้ ifelse()
  • ถดถอย rev_all บน trend และ shift

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

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

# Create a data frame of single series
rev_all <- ___
rev_all_df <- data.frame(rev_all)

# Create Trend Variable
rev_all_df$trend <- seq(___, nrow(rev_all_df), ___)

# Create Shift Variable
rev_all_df$shift <- ifelse(rev_all_df$trend <= 7, ___, ___)

# Run regression
reg <- lm(___, data = rev_all_df)
summary(reg)
แก้ไขและรันโค้ด