ggplotly does not preserve drawing order of elements defined by geom_rect

When creating a ggplot with geom_rect the order in which the data is provided is honored. Once converted via ggplotly the drawing order changes and therefore geom_rect objects may e.g. no longer be visible. I would expect that the display between the original plot and the converted plot are the same.

exampleBug.csv

pltData <- read.csv('exampleBug.csv')

plt <- ggplot(data = pltData) + 
    geom_rect(aes(ymax = yMax, ymin = yMin,
                  xmax = xMax, xmin = xMin,
                  fill = TornadoCase))

# gives the desired bebaviour
plt

# changes drawing order 
ggplotly(plt)

Riprodurre il problema con exampleBug.csv e il codice R fornito, iniziando dal punto di ingresso della conversione ggplotly(plt). Confrontare la visualizzazione originale di geom_rect con il grafico convertito e tracciare il punto in cui cambia l’ordine di disegno dell’input. Il lavoro è completato quando il grafico convertito conserva l’ordine di geom_rect e corrisponde alla visualizzazione originale.