How to make plotly graph function less laggier and more distinct in R for many datapoints?

Question

Currently, I have a lot of datapoints, and its not really distinguishable by color. How can I make the colors more distinguishiable, or do I have to make a graph other than