Create plot2.R

added script to generate plot2.png