add graphics.R