绘制来自两个data.frame的数据时图例的问题

Question

我正在按照我的意愿让ggplot2工作有点麻烦.基本上,我想通过将它们放在一个单独的图中来比较实际观察值与近似值.例如,

> library(ggplot2)
> df.actual <- data.frame(x = 1:100, y = (1:100) * 2)
> df.approx <- data.frame(x = 1:150, y = (1:150) * 2 + 5  + rnorm(150, mean = 3) )
> ggplot() + geom_point(aes(x, y), data = df.actual) + geom_line(aes(x,y), data = df.approx)

我的问题是我无法显示传奇.我在某处读到ggplot2的传说不是很灵活(？).理想情况下,传说与

• title ='类型'
• key:黑色填充点和黑色线条
• 关键标签:'实际','近似'
• legend.position ='topright'

谢谢.

Answer 1

试试这个让你入门

ggplot() + 
  geom_point(aes(x, y, colour = "actual"), data = df.actual) + 
  geom_line(aes(x, y, colour = "approximate"), data = df.approx) + 
  scale_colour_discrete("Type")