0

xts があり、EMA を計算します。i 値を以前の EMA と比較し、しきい値を超えている場合は、そのポイントを削除してから EMA 評価を更新したいと考えています。

何かのようなもの:

dat<-as.xts(data)
dat_EMA<-EMA(abs(dat),n=10)
dat_EMA<-lag(dat_EMA,k=-1) 

次に、 の場合dat > 100*dat_EMA、その点から削除しdatて、EMA の次の部分を再計算します。

効果的な手順はありますか?

4

0 に答える 0