使用 facet_wrap 时 ggplotly 添加的空图表

Question

有什么方法可以删除将 facet_wrap 与 ggplotly 一起使用时添加到最后一行的空图表？

我正在使用 facet_wrap 生成如下图：

library(ggplot2)
library(plotly)
g=ggplot(data=mtcars, aes(x=mpg, y=wt))+geom_point()+facet_wrap(~hp)
print(g)

给出这个数字：

如果我尝试使用 ggplotly，额外的空图表会添加到最后一行。

gg = ggplotly(g)
print(gg)

有什么办法可以避免这种情况吗？

Answer 1

安装 ggplot2 和 plotly 的 github 版本解决了这个问题。

devtools::install_github("tidyverse/ggplot2")
devtools::install_github("ropensci/plotly")

library(ggplot2)
library(plotly)

g=ggplot(data=mtcars, aes(x=mpg, y=wt))+geom_point()+facet_wrap(~hp)
print(g)

gg = ggplotly(g)
print(gg)