added Plot2.R and plot2.png: