geom_errorbar - error bars displaying incorrectly (horizontal)

geom_errorbar - error bars are displayed incorrectly (wrong size) on the horizontal display (does not happen for the vertical (non coord_flip() version)

Sample to reproduce:

dd2 <- data.frame( auc=c(0.268707482993197,0.571428571428571), 
                   high=c(0.407680628614317,0.648343533190079), 
                   low=c(0.129734337372078,0.494513609667063), 
                   Names = c("Firmicutes","Spirochaetes"))


library(ggplot2)
library(plotly)

gx <- ggplot(data=dd2, aes(y=auc, x=Names))  + 
  geom_bar(stat="identity") +   
  geom_errorbar(aes(ymax = high, ymin=low)) +
  coord_flip()
gx

gp <- ggplotly(gx)
gp   # error bars are incorrect size

Start by running the supplied R example with ggplot2, coord_flip(), geom_errorbar(), and ggplotly(), then compare the horizontal result with the vertical version. Trace how the reproduced plot is converted and verify that horizontal error bars preserve the intended low-to-high size and position.