plot3.R file added