Chaotischer Plot beim Plotten von Vorhersagen einer Polynomregression mit lm () in R - r, Plot, Regression, lineare Regression, lm

Ich baue ein quadratisches Modell mit lm in R:

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

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

Jetzt möchte ich sowohl die vorhergesagten Werte als auch die tatsächlichen Werte in einer Grafik darstellen. Ich habe das versucht:

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

aber die Linie kommt alles recht stramm. Vielleicht hat es damit zu tun, dass es quadratisch ist? Danke für jede Hilfe.

Antworten:

Du brauchst order():

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

Meine Antwort hier ist verwandt: Probleme bei der Anzeige der Regressionslinie und des Konfidenzintervalls