[R-SIG-Finance] Minor bug in addSAR

[Worik Stanton]

 > getSymbols("YHOO")
 > YH <- YHOO[,-5] # Remove volume
 > chartSeries(YH, subset='2012-11::2013-01-07')
 > addSAR()

The SAR plot extends off the plot area.

Using chart_Series(..) it is the same except that the background colour 
of the plot is changed from white to black.

cheers
Worik
-- 
Overcoming poverty is not a task of charity, it is an act of justice