如何在同一图上用 ggplot2 绘制两个变量的直线？

Question

这是一个很新的问题，但我有这样的数据：

test_data <-
  data.frame(
    var0 = 100 + c(0, cumsum(runif(49, -20, 20))),
    var1 = 150 + c(0, cumsum(runif(49, -10, 10))),
    date = seq(as.Date("2002-01-01"), by="1 month", length.out=100)
  )

如何用ggplot2、同时借助x-axis上的数据，来绘制var0和var1这两个时间序列？如果你能用不同的颜色加以区分还是一个加分项！ 我相信这很简单，但我找不到任何例子。

Answer 1

For a small number of variables, you can use build up the plot manually yourself:

ggplot(test_data, aes(date)) + 
  geom_line(aes(y = var0, colour = "var0")) + 
  geom_line(aes(y = var1, colour = "var1"))