Отображение двух переменных в виде линий с использованием ggplot2 на одном графике

Очень новый вопрос, но предположим, что у меня есть такие данные:

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)
  )

Как я могу построить оба временных ряда var0 и var1 на одном графике с помощью дата на оси x с использованием ggplot2 ? Бонусные баллы, если вы сделаете var0 и var1 разных цветов и можете включить легенду!

Я уверен, что это очень просто, но я не могу найти никаких примеров там.