我无法让一个传奇出现在剧情中,特别是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
最佳答案
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)