编辑
事实证明，这仍然是那个问题的骗局……几年后。
原始问题
这与这个问题有关，但那是几年前的事了，不容易找到。
基本上，当 ggplotly 翻译 ggplot2 图时，它结合了两个图例并创建了一个不那么可用的组合图例。
可重复的例子：
library(ggplot2)
library(plotly)
data(mtcars)
#two separate legends, as expected
p <- ggplot(mtcars, aes(x = mpg, y = hp,
colour = factor(am), shape = factor(carb))) +
geom_point()
#one combined, not-usable legend.
ggplotly(p)