добавить пользовательский ТП chart.Posn()

Question

У меня такая же проблема, как: Add Technical Indicator to chart.Posn

однако, я работаю с пользовательским индикатором и замышляют на верхней части диаграммы позиций. может кто-нибудь мне помочь? показатель, с которым я работаю, - это правильность, но любое определенное решение для пользовательских индикаторов было бы полезно.

вот мой chart.Posn() вызов:

chart.Posn(Portfolio = strategy, 
      Symbol = tickers, 
      theme = myTheme, 
      Dates = "2016-01-20::2016-01-20", 
      TA = "add_TA(range_expansion_index(OHLC(mktdata)))") 

и это то, что мой вывод выглядит (я высветил проблему в красной коробке):

Answer 1

решения, для меня работала функция add_TA. например,

rei <- my_function(close_prices, period = 5) 

chart.Posn(Portfolio = strategy_nm, 
      Symbol = tickers, 
      theme = myTheme) 

add_TA(rei, col = "black", lwd = 1.5, legend = "REI", type = 'l')