Update redraw2.R