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 に答える