plot1 and 2

plot1.R plots graphs 1 and 2