I found a working solution here:
https://stackoverflow.com/a/47245472/1349673. But symbol <- parent.frame(n =
2)$symbol is obviously a kludge. I couldn't figure out how to extract the
current symbol using the ... argument either. A simple solution would be to
add a symbol argument to applyIndicators and then have applyStrategy pass
in symbol when it calls applyIndicators.
I wanted to check here if I am missing something before submitting a
feature request/bug report to github?
James Hirschorn, Ph.D.