Create plot1.R

The plot1.R file is created