plot1.R

added plot1.R