在R中的循环中添加新行

Question

我的数据帧为Table，如下所示：

Date   Task
1      575171-02-1
2      571120-01-7, 712102-01-1, 712102-02-1, 712202-01-1
3      535105-01-5, 532137-01-2
4      572036-01-6, 532170-01-2

我想要这样的输出：

Task               Date
575171-02-1          1
575171-02-1          1
712102-01-1          1
712102-02-1          1
712202-01-1          2 
535105-01-5          3
...

我试图在循环中创建新的数据帧

    for (i in 1:nrow(Table)) {

      X<-strsplit(Table$Task[i],", ")

      for (j in 1:length(X))
      { Date<-Table$Date[i]
        Task<-X[j]

我不知道如何在第二个循环中创建新的数据帧，因此当i转到新循环时，它不会被覆盖