[r] How to give color to each class in scatter plot in R?