เขียนโค้ดสำหรับการถดถอยแบบตัวแปรเดียว
ในแบบฝึกหัดเขียนโค้ดแรกนี้ จะได้สร้างสูตรเพื่อกำหนดงานโมเดลแบบตัวแปรเดียว แล้วฟิตโมเดลเชิงเส้นกับข้อมูล โดยใช้อัตราการว่างงานของชายและหญิงในสหรัฐอเมริกาในช่วงหลายปีที่ผ่านมา (แหล่งข้อมูล)
โจทย์คือการทำนายอัตราการว่างงานของหญิงจากอัตราการว่างงานของชายที่สังเกตได้
ตัวแปรผลลัพธ์คือ female_unemployment และตัวแปรอินพุตคือ male_unemployment
เครื่องหมายของสัมประสิทธิ์ตัวแปรบอกว่าผลลัพธ์เพิ่มขึ้น (+) หรือลดลง (-) เมื่อตัวแปรนั้นเพิ่มขึ้น
รูปแบบการเรียกใช้ lm() (docs) คือ:
lm(formula, data = ___)
โหลด data frame unemployment ไว้ให้แล้ว
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
Supervised Learning ใน R: การถดถอย
คำแนะนำการฝึกหัด
- กำหนดสูตรที่แสดง
female_unemploymentในรูปของฟังก์ชันของmale_unemploymentแล้วกำหนดสูตรให้กับตัวแปรfmlaและพิมพ์ค่าออกมา - จากนั้นใช้
lm()และfmlaเพื่อฟิตโมเดลเชิงเส้นสำหรับทำนายอัตราการว่างงานของหญิงจากอัตราการว่างงานของชาย โดยใช้ชุดข้อมูลunemployment - พิมพ์โมเดลออกมา สัมประสิทธิ์ของ
male_unemploymentสอดคล้องกับที่คาดไว้หรือไม่ อัตราการว่างงานของหญิงเพิ่มขึ้นตามอัตราการว่างงานของชายหรือเปล่า?
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# unemployment is available
summary(unemployment)
# Define a formula to express female_unemployment as a function of male_unemployment
fmla <- ___
# Print it
___
# Use the formula to fit a model: unemployment_model
unemployment_model <- ___
# Print it
___