Create Rplot1.png