Zeroing in on chart_Series issue 

library(quantmod)
getSymbols("SPY", src = "yahoo")

## [1] "SPY"

This looks fine

chartSeries(SPY)

plot of chunk unnamed-chunk-2

This looks wrong

cs <- new.replot()

plot of chunk unnamed-chunk-3