Update plot3.R file

Minor modification