Assign Color To Value In R