Create plot2.R

plot2.R code