How to define colour of a point for a factor column

How do I define the point colours in this plot to be read and green, rather than green and blue?


d <- plot_ly(df, x = resolutiondate, y = age/86400, text = paste("Clarity: ", df),
             mode = "markers", color = factor(isbreached), size = counts, opacity = counts) %>% layout(yaxis = ylabel)

Perhaps, this article or this forum discussion will help. Without the data, it is hard to demonstrate how to apply to your situation. Here is an example using mtcars.

  x = mpg,
  y = wt,
  group = factor(cyl),
  mode = "markers",
  marker = list(
    color = factor(mtcars$cyl,labels=c("red","purple","blue"))