0

我正在尝试将曲线段拟合到数据集。虽然我可以创建线,但它始终连接回起点。我不知道如何摆脱这个。我真的很感激任何帮助。这是代码

mscF25=c(-12.94382785, -11.0281518, -9.186403952, -7.691576905, -6.470229134, -5.43000796, -4.559074508, -12.87271022, -10.0646268, -6.796208225, -4.433351598, -2.928135666, -1.979265556, -1.38936463, -11.05819006, -7.785838826, -5.297330858, -3.674159165, -2.64702678, -1.980973252, -1.533714976, -11.83971039, -9.168353808, -6.89192172, -5.23424594, -4.033326594, -3.148798626, -2.480469911)
bscF25=c(4, 5, 6, 7, 8, 9, 10, 4, 5, 6, 7, 8, 9, 10, 4, 5, 6, 7, 8, 9, 10, 4, 5, 6, 7, 8, 9, 10)
df25 <- data.frame(bscF25,mscF25)
plot(mscF25 ~ bscF25, data = df25)
ls25 <- loess(mscF25 ~ bscF25, data = df25, span = 3)
lines(df25$bscF25, ls25$fitted)

这就是我得到的。 我想保留曲线但摆脱连接它的直线部分。

4

1 回答 1

1

您可以尝试以下scatter.smooth功能:“绘制并添加由黄土计算的平滑曲线到散点图”

scatter.smooth(x = df25$bscF25, y = df25$mscF25, span = 3)

在此处输入图像描述

于 2013-09-27T09:26:12.400 回答