Niechlujny wykres przy wykreślaniu przewidywań regresji wielomianowej za pomocą lm () w R - r, wykres, regresja, regresja liniowa, lm

Buduję kwadratowy model z lm w R:

y <- data[[1]]
x <- data[[2]]
x2 <- x^2

quadratic.model = lm(y ~ x + x2)

Teraz chcę wyświetlić zarówno wartości prognozowane, jak i rzeczywiste na wykresie. Próbowałem tego:

par(las=1,bty="l")
plot(y~x)
P <- predict(quadratic.model)
lines(x, P)

ale linia pojawia się cały zawijas. Może ma to związek z faktem, że jest kwadratowy? Dzięki za pomoc.

Odpowiedzi:

Potrzebujesz order():

P <- predict(quadratic.model)
plot(y~x)
reorder <- order(x)
lines(x[reorder], P[reorder])

Moja odpowiedź tutaj jest związana: Problemy z wyświetlaniem linii regresji LOESS i przedziału ufności