การพยากรณ์ส่วนแบ่งสำหรับกลุ่ม racer
มาลองพยากรณ์ส่วนแบ่งสำหรับกลุ่มรถสปอร์ตอีกกลุ่มหนึ่งกัน มีการโหลดโมเดล m5 และฟังก์ชัน predict_mnl() ที่แสดงให้ดูในวิดีโอไว้ล่วงหน้าแล้ว ในโค้ดตัวอย่าง คุณจะเห็นโค้ดสำหรับสร้างดาต้าเฟรม prod ด้วย งานของคุณคือแก้ไขโค้ดเพื่อพยากรณ์ส่วนแบ่งสำหรับกลุ่ม "racer"
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
Choice Modeling สำหรับการตลาดใน R
คำแนะนำการฝึกหัด
- แก้ไขโค้ดสำหรับสร้างดาต้าเฟรม
prodเพื่อให้ตัวแปรsegmentเป็น"racer"สำหรับผลิตภัณฑ์ทั้งสองรายการ อย่าลืมว่าตัวแปรผู้ใช้อย่างsegmentควรมีค่าเดียวกันสำหรับผลิตภัณฑ์ทุกรายการในprod - พยากรณ์ส่วนแบ่งสำหรับผลิตภัณฑ์ใน
prodโดยใช้โมเดลm5คุณสามารถใช้ฟังก์ชันpredict_mnl()เพื่อทำสิ่งนี้ได้ ตรวจสอบให้แน่ใจว่าผลลัพธ์ระบุว่าsegmentเป็น"racer"สำหรับผลิตภัณฑ์ทั้งสองรายการ
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# modify the code below so that the segment is set to "racer" for both alternatives
price <- c(35, 30)
seat <- factor(c(2, 2), levels=c(2,4,5))
trans <- factor(c("manual", "auto"), levels=c("auto", "manual"))
convert <- factor(c("no", "no"), levels=c("no", "yes"))
segment <- factor(c("basic", "basic"), levels=c("basic", "fun", "racer"))
prod <- data.frame(seat, trans, convert, price, segment)
# predict shares for the "racer" segment