Adding plot1.R file