plot1.R file added