library(quantmod) getSymbols("YHOO") chartSeries(YHOO, theme="white") b1 <- addBBands(50,2) b1 at params$colors$bg.col="#FFFFFF" b1 b2 <- addBBands(100,2) b2 at params$colors$bg.col="#FFFFFF" b2 [[alternative HTML version deleted]]