Как построить несколько линий на одном графике ggplot2?

Я работаю над программой R Shiny, которая может принимать любой файл csv и выводить его графики. Пользователь, который загружает csv, имеет некоторые рекомендации о том, как должны выглядеть данные, но я не хочу, чтобы они были слишком строгими.

В настоящее время я пытаюсь использовать ggplot2 для построения нескольких строк одного и того же набора данных на одном графике для сравнения.

Данные, которые я сейчас загружаю, выглядят следующим образом (упрощенно, поскольку данные содержат более 1000 строк):

Date Hamburgers Salads Sodas Fries
12-01    4        4      3    2
12-02    1        7      3    9
12-03    22       24     45   34
12-04    23       44    46    22

Я пытаюсь вывести график, на котором время отображается по оси X (пользователь выбирает это через боковую панель, так как он может выбрать любую ось, но время имеет здесь наибольший смысл). Для оси Y мне нужны 4 линии, окрашенные по-разному, на графике каждой переменной с течением времени.

У меня есть все, что `` пользователь принимает ввод и выбирает столбцы для графического отображения '', но для простоты мы можем предположить, что по большей части это было жестко закодировано (поэтому переменная Y фактически будет входить в $ y и т. Д. в моей реализации)

Часть моего кода, в которой я пытаюсь построить график данных:

output$plotLine <- renderPlot({
  p <- ggplot(data, aes_string(x=X, y=Y), environment = environment()) 
      p <- p + geom_point(size = 3) 
      p <- p + geom_line(aes(group=1)) 

  print(p)
})

Это рисует одну из линий, но я понятия не имею, как построить другие на том же участке. Я читал об использовании 'group' в функции aes, но это зависит от наличия классификатора в наборе данных, которого в настоящее время нет.

Я также изучил функцию melt () из пакета reshape2, но не уверен, как она мне поможет (как для многострочной проблемы, так и для большего смысла этого проекта, так что пользователю не нужно соблюдать строгие правила). правила для формата загрузки csv).

Любая помощь приветствуется!