การทำนายราคาบ้านด้วยตัวเอง
สามารถคำนวณค่าทำนายจากค่าสัมประสิทธิ์ของโมเดลได้ด้วยตัวเอง ในการใช้งานจริงควรใช้ predict() จะสะดวกกว่า แต่การลองทำด้วยมือช่วยให้เข้าใจว่าค่าทำนายไม่ใช่เรื่องวิเศษแต่อย่างใด—เป็นเพียงการคำนวณทางคณิตศาสตร์เท่านั้น
สำหรับการถดถอยเชิงเส้นอย่างง่าย ค่าทำนายคือค่า intercept บวกกับ slope คูณกับตัวแปรอธิบาย
$$response = intercept + slope * explanatory$$
mdl_price_vs_conv และ explanatory_data พร้อมใช้งานแล้ว และโหลด dplyr ไว้เรียบร้อยแล้ว
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การถดถอยใน R เบื้องต้น
คำแนะนำการฝึกหัด
- ดึงค่าสัมประสิทธิ์ของ
mdl_price_vs_convแล้วกำหนดให้กับcoeffs - ดึงค่า intercept ซึ่งเป็นองค์ประกอบแรกของ
coeffsแล้วกำหนดให้กับintercept - ดึงค่า slope ซึ่งเป็นองค์ประกอบที่สองของ
coeffsแล้วกำหนดให้กับslope - ทำนายค่า
price_twd_msqด้วยตัวเองโดยใช้intercept,slopeและn_convenience
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Get the coefficients of mdl_price_vs_conv
coeffs <- ___
# Get the intercept
intercept <- ___
# Get the slope
slope <- ___
explanatory_data %>%
mutate(
# Manually calculate the predictions
price_twd_msq = ___
)
# Compare to the results from predict()
predict(mdl_price_vs_conv, explanatory_data)