Update plot4.R

small modification to legend borders of 2,1