Annotations for factor in barplot misplaced

When adding annotations to a barplot with x as factor, the plot gets squished
Problem arises since R plotly version 4.10.1. Worked fine until plotly 4.9.2.1

This works not

plotData <- data.frame(x = factor(1991:2000), y = rnorm(10))
plot_ly(data = plotData, x = ~x, y = ~y, type = "bar") %>%
  layout(annotations = list(x = plotData$x, y = 0, text = 1:10))

This works, although it is safer to match on the actual x-values (factor levels) rather than on a numeric variant (mind the -1 to get it start at 0!)

plotData <- data.frame(x = factor(1991:2000), y = rnorm(10))
plot_ly(data = plotData, x = ~x, y = ~y, type = "bar") %>%
  layout(annotations = list(x = as.numeric(plotData$x) - 1, y = 0, text = 1:10))

Comience con la reproducción proporcionada de plot_ly() y layout(annotations = ...) usando valores x de tipo factor, comparando el comportamiento entre plotly.R 4.9.2.1 y 4.10.1. Rastree cómo se convierten las anotaciones factor y verifique que las anotaciones permanezcan alineadas con las categorías de las barras sin requerir valores factor numéricos.