Create plot2.R

R program to create plot2