Added plot2.R and png