Проблема с Quantmod add_TA и chart_Series - строки и текст исчезают после следующего вызова add_TA

Я довольно часто использую новые chart_Series и add_TA . У меня это работает очень хорошо, и я считаю его очень полезным.

Я пытаюсь добавить несколько элементов (горизонтальные линии и текст) на график. Здесь начинают возникать проблемы. После того, как горизонтальные линии и текст нарисованы правильно, они исчезают, если я вызываю последующий add_TA ... См. Пример кода ниже, в котором воспроизводится проблема:

library(quantmod)

getSymbols("SPY")

dev.new()
chart_Series(SPY)
add_TA(ADX(HLC(SPY))$ADX)
abline(h=15, col="red")
abline(h=35, col="green")
text(10, 7, "Text and horizontal lines disappear after next add_TA is called",
  col="blue", cex=0.8, adj = c(0,0))
# run the code up to this point (including text(...
# see how horizontal lines drawn with abline and text is displayed correctly
# now run the last line by adding additional TA and you will see that lines
# and text disappears
add_TA(DVI(Cl(SPY))$dvi)

Это предполагаемое поведение?

РЕДАКТИРОВАТЬ: Как сделать выполнить эту работу (согласно комментарию Джошуа ниже: перерисовка также строки и текста при перерисовке объекта графика (chob))?