Update plot3.R

Forgot to add the legend