大小比例消失ggplotly

Question

当我尝试使用ggplotly（）时，我失去了解释色标的图例。如果我使用颜色而不是尺寸，则会出现图例。如何在使用尺寸时显示图例？

library(dplyr)
library(plotly)

plot <- mtcars %>%
  ggplot(aes(x = mpg, y = cyl, size = disp, frame = hp)) +
  geom_point()

ggplotly(plot) %>%
  layout(showlegend = T)

Answer 1

我认为问题在于使用大小作为数字变量（例如disp）会产生一个非常大的传说，例如：

p <- ggplot(data=mtcars, aes(x = mpg, y = cyl, colour=factor(disp), size = factor(disp))) +
geom_point() 
p <- ggplotly(p)
p

PS：我不确定您是否可以使用frame并使用ggplotly仍然拥有所需的图例。

选项2：直接使用plot_ly例如：

plot_ly(mtcars,x = ~ mpg, y= ~ cyl,  size = ~disp , type='scatter', mode = 'markers', frame = ~disp) %>%
layout(showlegend = T)