Scatter points at wrong coordinates when combining multicategory axis and colour

Hi,

When combining a multicategory axis and colour coding in a scatter plot, the mapping of the points seem to go wrong.
In p2 in the example below, the points appear at coordinates that are not in the data.
The problem can be resolved by first ordering the data (p4).

library(plotly)
d <- data.frame(
  l1 = letters[11:15],
  l2 = c('a', 'a', 'a', 'a', 'b'),
  y = 1:10,
  col = LETTERS[11:15],
  stringsAsFactors = F
)
p1 <- plot_ly(
  data = d,
  x = list(~l2, ~l1),
  y = ~y,
  # color = ~col,
  type = 'scatter',
  mode = 'markers'
)
p2 <- plot_ly(
  data = d,
  x = list(~l2, ~l1),
  y = ~y,
  color = ~col,
  type = 'scatter',
  mode = 'markers'
)
d <- d[order(d$l1), ]
p3 <- plot_ly(
  data = d,
  x = list(~l2, ~l1),
  y = ~y,
  # color = ~col,
  type = 'scatter',
  mode = 'markers'
)
p4 <- plot_ly(
  data = d,
  x = list(~l2, ~l1),
  y = ~y,
  color = ~col,
  type = 'scatter',
  mode = 'markers'
)

subplot(p1, p2, p3, p4, nrows = 2, margin = .07) %>% 
  layout(annotations = list(
    list(x = 0.1 , y = 1.05, text = "unordered/uncolored", showarrow = F, xref='paper', yref='paper'),
    list(x = 0.9 , y = 1.05, text = "unordered/colored", showarrow = F, xref='paper', yref='paper'),
    list(x = 0.1 , y = .45, text = "ordered/uncolored", showarrow = F, xref='paper', yref='paper'),
    list(x = 0.9 , y = .45, text = "ordered/colored", showarrow = F, xref='paper', yref='paper')
  )
)

Inizia eseguendo l'esempio riproducibile in R fornito e confronta il grafico a dispersione non ordinato/colorato con gli altri pannelli. Segui la gestione dei grafici a dispersione per assi multicategoria combinati con il colore; l'attività è completata quando i punti rimangono alle coordinate dei dati di input senza richiedere un ordinamento preliminare.