Modify plot2.R to make plot2.PNG