Some geoms always appear below others

Rendering of violin plots with box plots (to provide median & stddev) is in wrong order when using ggplotly.

library(ggplot2)
library(plotly)

p <- ggplot(iris,aes(Species,Sepal.Length))+
  geom_violin()+geom_boxplot(width=.1)
q <- ggplotly(p) 

the ggplot (p) will render as expected with violin plots:

the ggplotly (q) will render with the box plot behind the violin plot (and larger than expected):

Bắt đầu với ví dụ R được cung cấp bằng cách sử dụng ggplot2 và ggplotly, sau đó theo dõi cách các biểu đồ violin và box được chuyển đổi và render. Xác nhận vấn đề bằng cách so sánh đầu ra của ggplot và ggplotly; được xem là hoàn thành khi biểu đồ box xuất hiện phía trước biểu đồ violin với kích thước như mong đợi.