chart_Series() - ! - , .
, (?), , - , chart_Series() (.. / "replot", , ).
#
getSymbols("YHOO")
myChob <- chart_Series(YHOO)
#
myChob
#
myxlim <- myChob$get_xlim()
myylim <- myChob$get_ylim()
#
myxlim <- c(1, 2000)
myylim[[2]] <- structure(c(0, 50), fixed=TRUE)
#
#
myChob$set_ylim(myylim)
myChob$set_xlim(myxlim)
#
myChob