サポート/抵抗レベルを見つける方法R

Question

Rでサポート/抵抗レベルを見つける方法については、良い答えが見つかりませんでした。基本的には、在庫が統合されているが、見つかったクラスタ/エリアまたはピボットそうすることは困難です。

# loads quatmod & xts 
library("quantmod") 
# Retrive 'ESSI' TICKER OHLCV data 
STOCK = getSymbols("ESSI",auto.assign = FALSE) 
# last observation carried formward/facilitates NAs 
STOCK <- reclass(apply(STOCK,2,na.locf),match.to=STOCK) 

# To be used as a rolling window 
K=20 
# Find MAX for Each Open, High, Low, Close Column & merge them 
MAX <- merge.xts(rollmax(Op(STOCK), k=K, na.pad=TRUE),rollmax(Hi(STOCK), k=K, na.pad=TRUE),rollmax(Lo(STOCK), k=K, na.pad=TRUE),rollmax(Cl(STOCK), k=K, na.pad=TRUE)) 
# Find the mean of each MAX row 
MAX <- na.locf(reclass(apply(MAX,1,mean),match.to=MAX)) 

私はローのために同じことをするだろうが、私は、私はDonchianChannel()を使用してついて行くたほうが良いと思いますが、それは私が欲しいものではありません...出力はFinVizのに似た何かを返す必要があります：

Answer 1

TTRのZigZag機能などのスイングフィルタを適用できます。このように逆転を特定することは、Donchianのチャンネルよりも良い方法のように思えます。逆転が集中する傾向のあるレベルとして支持/抵抗を定義することができます。