How to generate a number of most distinctive colors in R? How to generate a number of most distinctive colors in R? r r