การ Fitting การถดถอยเชิงเส้น

การถดถอยใน R เบื้องต้น

Richie Cotton

Data Evangelist at DataCamp

เส้นตรงถูกกำหนดด้วยสองสิ่ง

จุดตัดแกน y

ค่า $y$ เมื่อ $x$ เท่ากับศูนย์

ความชัน

ค่า $y$ เพิ่มขึ้นเท่าใดเมื่อ $x$ เพิ่มขึ้น 1 หน่วย

สมการ

$y = intercept + slope * x$

การประมาณจุดตัดแกน y

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์ สินไหม พร้อมเส้นแนวโน้มเชิงเส้น ยอดชำระเพิ่มขึ้นเป็นเส้นตรงตามจำนวนการเคลียร์สินไหมที่เพิ่มขึ้น

การประมาณจุดตัดแกน y

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายจุดที่เส้นแนวโน้มตัดแกน y

การประมาณจุดตัดแกน y

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายค่าเมื่อจำนวนการเคลียร์สินไหมเท่ากับศูนย์

การประมาณความชัน

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายสองจุดบนเส้นแนวโน้ม จุดหนึ่งอยู่ที่ 150 โครนาและ 40 การเคลียร์สินไหม อีกจุดอยู่ที่ 400 โครนาและ 110 การเคลียร์สินไหม

การประมาณความชัน

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายผลต่างของยอดชำระระหว่างสองจุด 400 โครนาลบ 150 โครนา ได้ 250 โครนา

การประมาณความชัน

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายผลต่างของจำนวนการเคลียร์สินไหมระหว่างสองจุด 110 การเคลียร์สินไหมลบ 40 การเคลียร์สินไหม ได้ 70 การเคลียร์สินไหม

การประมาณความชัน

กราฟกระจายของยอดชำระเงินรวมเทียบกับจำนวนการเคลียร์สินไหม พร้อมคำอธิบายอัตราส่วนของผลต่างยอดชำระและผลต่างจำนวนการเคลียร์สินไหม 2000 หารด้วย 60 ได้ประมาณ 33

การรันโมเดล

lm(total_payment_sek ~ n_claims, data = swedish_motor_insurance)

Call:
lm(formula = total_payment_sek ~ n_claims, data = swedish_motor_insurance)

Coefficients:
(Intercept)     n_claims  
     19.994        3.414

การตีความค่าสัมประสิทธิ์ของโมเดล

Call:
lm(formula = total_payment_sek ~ n_claims, data = swedish_motor_insurance)

Coefficients:
(Intercept)     n_claims  
     19.994        3.414

สมการ

$total\_payment\_sek = 19.994 + 3.414 * n\_claims$

มาฝึกกันเถอะ!

การถดถอยใน R เบื้องต้น