7

モデルを適用する前に外れ値を削除したいと考えています。トレンド ラインを区切るために黄土曲線を使用しており、外れ値の制限を設定しています。定義された制限外の行を削除したいと思います。各ポイントを一度に 1 つずつ取得し、ローカルの黄土の勾配などをチェックするカスタム関数でこれを行う以外に...もっと簡単な方法はありますか?

制限付き黄土傾向線 (1.2)

# Code generating image above
scatter.smooth( idam$T_d, idam$T_x10d)
loessline <- loess.smooth( idam$T_d, idam$T_x10d)
lines(loessline$x, loessline$y, lwd=3)
lines(loessline$x, loessline$y*1.2, lwd=3, col='red')
lines(loessline$x, loessline$y/1.2, lwd=3, col='red')
4

3 に答える 3

0

私の提案は、 を見に行くことoutliers packageです。このパッケージにより、分析が行われる前に識別が可能になります。これは非常に単純な例です:

library(outliers)
series<-c(runif(100,1,2),1000)
round(scores(series,prob=1,type="chisq"),3)

この機能を使用すると、多数のテストを実行することができ、外れ値である確率レベルを設定することができます。

series<-series[which(series<0.95),]
于 2016-01-22T18:38:16.613 に答える