ggplot 在情节丢失的图例中

Question

我很难让一个图例出现在情节中，特别是ggplot + geom_line.

我正在使用plotly 3.6.0和ggplot2 2.1.0

为了演示我的问题，我将构建一个简单的数据框：

x = 1:5
y1 = 1:5
y2 = y1 * 2
d = data.frame(x, y1, y2)

g = ggplot(data = d, aes(x=x)) +
geom_line(aes(y = y1, col = 'y1')) + 
geom_line(aes(y = y2, col = 'y2')) + 
scale_color_manual(values = c('red', 'blue'), labels = c('y1 lab', 'y2 lab'), name = '')
g

这将创建一个带有图例的 ggplot 图。但是，当我尝试使用 plotly 创建交互式版本时，图例不再存在。

ggplotly(g)

我尝试了以下方法来解决问题：

g_build = plotly_build(g)
g_build$layout$showlegend <- TRUE
g_build$layout$margin <- list(l=80, r=300, b=80, t=100, pad=0)
g_build

Answer 1

library(reshape2)

d<-melt(d,id="x")
g <- ggplot(data = d, aes(x=x, y=value, color=variable)) +
  geom_line() +scale_color_manual(values = c('red', 'blue'), 
                                  labels = c('y1 lab', 'y2 lab'), name = '')
ggplotly(g)