Финансовый трейдинг на R
Ilya Kipnis
Professional Quantitative Analyst and R programmer
chart.Posn() даёт первое представление о результатах стратегии
chart.Posn(portfolio = portfolio.st, Symbol = "LQD")

Пересчитайте индикаторы вне стратегии, чтобы добавить их на график
sma50 <- SMA(x = Cl(LQD), n = 50)
sma200 <- SMA(x = Cl(LQD), n = 200)
dvo <- DVO(HLC = HLC(LQD), nAvg = 2, percentLookback = 126)
Добавляйте индикаторы командой add_TA(). Используйте on = 1, чтобы добавить на график цены
chart.Posn(Portfolio = portfolio.st, symbol = "LQD")
add_TA(sma50, on = 1, col = "blue")
add_TA(sma200, on = 1, col = "red")add_TA(dvo)
zoom_Chart("date1/date2") для более детального просмотраzoom_Chart("2007-08/2007-12") даёт следующий результат:
Финансовый трейдинг на R