... > lines(resp$lwr ~ resp$age, col=4) > lines(resp$upr ~ resp$age, col=4) (Chú ý lệnh trên, sử dụng biến số resc$fit, resc$lwr,resc$upr,resp$lwr,resp$upr Cách viết có nghĩa trích biến số fit từ ... định F Residual standard error: 0.3027 on 16 degrees of freedom Multiple R- Squared: 0.8775, Adjusted R- squared: 0.8698 F-statistic: 114.6 on and 16 DF, p-value: 1.058e-08 Ngoài ra, phần cho ... Phân tích phần dư để kiểm tra giả định phân tích hồi qui tuyến tính Để kiểm tra giả định trên, vẽ loạt đồ thị treân sau: > op plot(reg)...