โมเดลที่ดีที่สุดแยกตามเพศ
ในแบบฝึกหัดก่อนหน้า คุณได้ทำนายอายุจาก shuckedWeight หรือ shellWeight โดย shellWeight ให้ผลการทำนาย age ที่ดีกว่า ด้วยค่า r.squared ที่สูงกว่า
ในแบบฝึกหัดนี้ ให้รันการถดถอยเชิงเส้นอย่างง่ายของ age โดย shellWeight สามครั้ง — หนึ่งครั้งสำหรับแต่ละเพศของหอยเป๋าฮื้อ ("I", "F", "M") บันทึกผลลัพธ์จากแต่ละโมเดล lm() แล้วเปรียบเทียบค่าสถิติความพอดีของโมเดล เช่น r.squared
ชุดข้อมูล abaloneKeep และแพ็กเกจ dplyr ถูกโหลดไว้แล้ว พร้อมกับกราฟแสดงความพอดีของแต่ละโมเดล
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
R สำหรับผู้ใช้ SAS
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Save model output and output of model summary for infants
modelInfants <- lm(___ ~ ___, data = ___, subset = ___)
summaryInfants <- summary(___)