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

Commencez par exécuter l’exemple R fourni avec ggplot2, coord_flip(), geom_errorbar() et ggplotly(), puis comparez le résultat horizontal avec la version verticale. Suivez la conversion du graphique reproduit et vérifiez que les barres d’erreur horizontales conservent l’étendue et la position prévues du minimum au maximum.