Wie plotten Sie Polynom in R?

Question

Ich habe ein parametric polynomial regression in R, dass ich wie so meine Daten ausgestattet:

poly_model <- lm(mydataframef$y ~ poly(mydataframe$x,degree=5)) 

mydf offensichtlich enthält y und x. Ich plotten es dann wie dieses

plot(mydataframe$x, mydataframe$y, xlab='regressor or predictor variable polynomial regression', ylab='outcome or label') 

Dann habe ich das Polynom hinzufügen möchten, die ausgestattet war, so dass ich wie folgt vorgehen:

abline(poly_model) 

Das gibt mir eine Warnung: Warning message: In abline(poly_model) : only using the first two of 6 regression coefficients

Of Natürlich ist die Handlung alles andere als verrückt, weil, wie versprochen, nur die ersten zwei verwendet werden, die der Schnittpunkt und die Steigung sind. Warum sollte es nur die ersten beiden Koeffizienten verwenden, wenn ich nur eine Prädiktorvariable habe? Also sollte die Handlung sowieso 2-d sein? Verwirrt. Vielen Dank.

Answer 1

Hier ist die Antwort,

poly_model <- lm(mpg ~ poly(hp,degree=5), data = mtcars) 

x <- with(mtcars, seq(min(hp), max(hp), length.out=2000)) 
y <- predict(poly_model, newdata = data.frame(hp = x)) 

plot(mpg ~ hp, data = mtcars) 
lines(x, y, col = "red") 

Der Ausgang Plot ist,

Answer 2

Verwenden Sie fitted. Mit Hilfe der eingebauten data.frame BOD:

fm <- lm(demand ~ poly(Time, 3), BOD) 
plot(demand ~ Time, BOD) 
lines(fitted(fm) ~ Time, BOD, col = "red") 

geben: