geom_errorbar does not take "size" aesthetics

It seems ggplotly returns the same plot with different size. Here is an example:

df <- data.frame(x = 1:10,
                 y = 1:10,
                 ymin = (1:10) - runif(10),
                 ymax = (1:10) + runif(10),
                 xmin = (1:10) - runif(10),
                 xmax = (1:10) + runif(10))

p <- ggplot(df)+
  geom_errorbar(aes(ymin = ymin, ymax = ymax, x = x, y = y), size = 10)


ggplotly(p)

Comienza ejecutando el ejemplo de R proporcionado con ggplotly y compara la salida renderizada de geom_errorbar para distintos valores de size. Sigue el punto de entrada de la conversión de ggplotly para geom_errorbar y determina dónde se pierde la estética size. Se considera terminado cuando las barras de error renderizadas cambian visiblemente con size y el comportamiento está cubierto por una prueba de regresión.