First working version of plot1.R

First working version of plot1.R