比较前一天和前一天的最高价和最低价

卡梅伦·贾尔斯

我正在尝试制作和指标以在我的 quantstrat 回测中使用,但似乎无法弄清楚如何编写它。基本上我想比较 2 天前的高点和低点与 3 天前的高点和低点。如果第 2 天的 H&L 低于第 3 天,我会将其作为买入信号,否则我会将其设为空头信号。之后,我想制作另一个指标来做同样的事情,但将其提前一个时期,因此昨天的 H&L 低于 2 天前的 H&L,依此类推。

最初我使用的是 donichan 通道,但意识到这不会起作用,因为它会保持相同的值,直到其中一个产生新的高点或低点。

我知道这是一个如此简单的问题,我想多了。

卡梅伦·贾尔斯

我设法使用@Pete 的使用 dylpr 滞后函数的建议弄清楚了。这是我的最终结果:

Rule3 <- function(lagH3,lagL3,lagH2,lagL2)
{ifelse(lagH3 & lagL3>lagH2 & lagL2,1,0)} 
add.indicator(strategy=strategyname,name="lag",
          arguments=list(x=quote(mktdata$High),n=3L),label="lagH3")
add.indicator(strategy=strategyname,name="lag",
          arguments=list(x=quote(mktdata$Low),n=3L),label="lagL3")
 add.indicator(strategy=strategyname,name="lag",
          arguments=list(x=quote(mktdata$High),n=2L),label="lagH2")
add.indicator(strategy=strategyname,name="lag",
          arguments=list(x=quote(mktdata$Low),n=2L),label="lagL2")

add.indicator(strategyname, name="Rule3", arguments=list(lagH3=quote(mktdata$High.lagH3),
lagL3=quote(mktdata$Low.lagL3),Close=quote(mktdata$Close),lagH2=quote(mktdata$High.lagH2),
lagL2=quote(mktdata$Low.lagL2)), label="Rule3Signal")

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章