向 ChartSeries Quantmod 添加自定义指标

【问题标题】：Adding a custom indicator to ChartSeries Quantmod向 ChartSeries Quantmod 添加自定义指标
【发布时间】：2018-11-27 01:00:36
【问题描述】：

我已经创建了枝形吊灯指示器。功能是：

chandlier_exit_long = function(x,k = 3,  
 n = 22){
 high = rollapplyr(Hi(x), width = n, FUN 
 = max)
 atr = ATR(x, n)[, "atr"]
  z = high - atr
 names(z) = "Chandelier_Exit_Long"
 return(z)
}

我已经使用 quantmods 函数 newTA 来创建：

  addChandExitLong = newTA(FUN = 
  chandlier_exit_long, preFUN = OHLC, col 
  = "red")

我收到一个错误

【问题讨论】：

标签： r quantmod quantstrat

【解决方案1】：

这是一个警告，而不是错误。虽然它确实表明有些事情不太对劲。问题是rollapplyr 默认不填充/填充NA。所以你需要改变你的功能：

chandlier_exit_long = function(x, k = 3, n = 22){
  high = rollapplyr(Hi(x), n, FUN = max, fill = NA)  # add `fill = NA`
  atr = ATR(x, n)[, "atr"]
  z = high - atr
  names(z) = "Chandelier_Exit_Long"
  return(z)
}

或者您可以将rollapplyr() 调用替换为runMax(Hi(x), n)。

【讨论】：