getSymbols("YHOO")
chartSeries(YHOO)
chartSeries(YHOO,theme=chartTheme('white'))
chartSeries(YHOO,TA=NULL) #no volume
chartSeries(YHOO,TA=c(addVo(),addBBands())) #add volume and Bollinger Bands from TTR
addMACD() # add MACD indicator to current chart
setTA()
chartSeries(YHOO) #draws chart again, this time will all indicators present
Run the code above in your browser using DataLab