R 为什么曲线拟合线杂乱无章？

您好，我想知道为什么图片中的拟合曲线看起来如此糟糕，而不仅仅是一条平滑的线

plot(df$Q,df$C)
cur=lm(C~I(1/Q),data=df)
lines(df$Q, predict(cur), col = "green")

---

我遗漏了什么？

相反，您应该按照X值顺序对预测值和X值进行排序。一种方法是将一组有序的值传递给lm函数。然后，预测值也将反映该顺序：

 plot( df$Q, dg$C )
 cur  <- lm(C~I(1/Q), data=df[order[df$Q), ] )
 lines(df$Q, predict(cur), col = "green")

绘图（df$Q，dg$C）
cur，因为这些值不是按x轴值排序的。要开始，请阅读此处有关如何创建示例数据集的内容：