Create plot1.R

The code to create plot1.png