与plotly一起使用时GGplot图会发生变化

Question

我试图使我的 GGplot 与plotly 交互，但是给出以下代码后图形完全改变。非常感谢任何关于我可能出错的地方的建议。我尝试关注之前有关此主题的一些帖子，但似乎没有任何帮助。如果您想重现此代码，我已附上我的数据集，该数据集是此列表中的第 24 号：https://vincentarelbundock.github.io/Rdatasets/articles/data.html

library(plotly)
library(ggplot2)
library(dplyr)
library(tidyr)

p2 <- ggplot(data_set,aes(gender, income))+geom_boxplot(aes(fill=private)) 

ggplotly(p2)
p2

我附上了关于图形通过绘图提交时如何变化的照片：

与普通 GGplot 相比

Answer 1

将此行添加到绘图中：

 layout(boxmode = "group")

ggplotly(p2) %>% 
  layout(boxmode = "group")