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 の次の部分を再計算します。
効果的な手順はありますか?
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 の次の部分を再計算します。
効果的な手順はありますか?