关于r：ggplot2中相同图例中的不同图例键

Different legend-keys inside same legend in ggplot2

比方说，我不需要\\'proper \\'变量映射，但仍然希望使用图例键来帮助理解图表。我的实际数据类似于以下df

1
2
3
4
5
6
7

df <- data.frame(id = 1:10, line = rnorm(10), points = rnorm(10))

library(ggplot2)

ggplot(df) +
geom_line(aes(id, line, colour ="line")) +
geom_point(aes(id, points, colour ="points"))

enter

1
2
3
4
5
6
7

library(reshape2)

df <- melt(df, id.vars="id")

ggplot() +
geom_point(aes(id, value, shape = variable), df[df$variable=="points",]) +
geom_line(aes(id, value, colour = variable), df[df$variable=="line",])

但是它定义了两个单独的图例。修复第二个代码(并且必须重塑我的数据)也可以，但是我更喜欢一种方法(如果有的话)来手动更改任何图例键(并继续使用第一个方法)。谢谢！

编辑：

感谢@alex，感谢您刷新我有关变量映射的记忆。但是，到目前为止，我最简单的方法仍然是以下操作(非常糟糕的破解！)：

1
2
3
4
5
6

df <- data.frame(id = 1:10, line = rnorm(10), points = rnorm(10))

ggplot(df) +
geom_line(aes(id, line, colour ="line")) +
geom_point(aes(id, points, shape ="points")) +
theme(legend.title=element_blank())

只是隐藏了两个不同图例的标题。

enter

1
2
3
4

ggplot(df) +
geom_line(aes(id, line, colour ="line")) +
geom_point(aes(id, points, colour ="points"))+
guides(color=guide_legend(override.aes=list(shape=c(NA,16),linetype=c(1,0))))

enter