Упорядочение точек на графике R линий

Я хочу добавить подгоночную линию квадратичного подгонки к scatteprlot, но порядок точек как-то испорчен.

attach(mtcars)
plot(hp, mpg)
fit <- lm(mpg ~ hp + I(hp^2))
summary(fit)
res <- data.frame(cbind(mpg, fitted(fit), hp))
with(res, plot(hp, mpg))
with(res, lines(hp, V2))

Это рисует линии повсюду, в отличие от smooh, проходящего через диаграмму рассеяния. Я уверен, что это довольно просто, но я немного озадачен.

Ответы на вопрос(1)

Ваш ответ на вопрос