unneeded warning about colours

Running the code below return the plot with a warning about the number of colours.
This is not needed as I provided the full colour palette.

library(plotly)
colours <- c(
  "#00007F", "blue", "#007FFF", "cyan", "#7FFF7F", "yellow", "#FF7F00", "red",
  "#7F0000"
)
x <- data.frame(
  id = factor(colours)
)
plot_ly(x) |>
  add_markers(x = ~id, y = ~id, color = ~id, marker = list(color = colours))

Warning messages:
1: In RColorBrewer::brewer.pal(N, "Set2") :
  n too large, allowed maximum for palette Set2 is 8
Returning the palette you asked for with that many colors

2: In RColorBrewer::brewer.pal(N, "Set2") :
  n too large, allowed maximum for palette Set2 is 8
Returning the palette you asked for with that many colors

まず、提供されている R と plotly の例を実行して、RColorBrewer::brewer.pal の 2 つの警告を再現します。マーカーの色に Set2 パレットが選択されている箇所を追跡し、次に、その例が提供された 9 色のパレットを警告なしで使用していることを確認します。