相关疑难解决方法(0)

我有一个简单的多项式回归,我做如下

attach(mtcars)
fit <- lm(mpg ~ hp + I(hp^2))

现在,我的情节如下

> plot(mpg~hp)
> points(hp, fitted(fit), col='red', pch=20)

这给了我以下内容

我想将这些点连接成平滑的曲线,使用线条给出了以下内容

> lines(hp, fitted(fit), col='red', type='b')

我在这里想念的是什么 我希望输出是连接点的平滑曲线