Update plot3.R

Updated legend