`plot.lm()`에 의해 생성 된 "residuals vs leverage"음모의 빨간색 실선은 무엇입니까?

Question

fit <- lm(dist ~ speed, cars) 
plot(fit, which = 5) 

플롯의 중간에 빨간색으로 선은 무엇을 의미합니까?

요리사의 거리가 아니라고 생각합니다.

Answer 1

레버리지에 대해 표준화 된 잔차를 다듬는 것이 LOESS 회귀 선 (span = 2/3 및 degree = 2)입니다.

내부적으로 plot.lm()에서 변수 xx은 레버리지이며, rsp은 피어슨 잔류 물 (즉, 표준화 된 잔차)이다.

다음

graphics::panel.smooth(xx, rsp) 

이 함수가 무엇인가 : 다음, 분산 플롯뿐만 아니라 붉은 실선을 통해 그려 ?plot.lm에 대한

> panel.smooth 
function (x, y, col = par("col"), bg = NA, pch = par("pch"), 
    cex = 1, col.smooth = "red", span = 2/3, iter = 3, ...) 
{ 
    points(x, y, pch = pch, col = col, bg = bg, cex = cex) 
    ok <- is.finite(x) & is.finite(y) 
    if (any(ok)) 
     lines(stats::lowess(x[ok], y[ok], f = span, iter = iter), 
      col = col.smooth, ...) 
} 
<bytecode: 0xabc0004> 
<environment: namespace:graphics> 

---

R 문서는 모든 것을 설명하지 않습니다. 당신은 가장 "인수"섹션에서 다음 힌트를 얻을 수 있습니다 :

일반적으로 add.smooth = TRUE

panel 

    panel function. The useful alternative to `points`, `panel.smooth` can be 
    chosen by `add.smooth = TRUE`. 

add.smooth 

    logical indicating if a smoother should be added to most plots; see also 
    panel above. 

기본이다, 따라서 당신은 볼 고체 레드 라인. 그러나 당신은 그것을 억제 add = FALSE를 사용할 수 있습니다

plot(fit, which = 5, add.smooth = FALSE)