How To Add Legend To Plot In R