R循环保留数据帧的先前值

Question

我有这样一个日期框架

KEY  DATE

A    2019-01-01
A    2019-02-03
B    2019-04-16 
B    2019-05-23
C    2019-12-03
C    2019-11-12
C    2018-03-04 

我想得到这个结果

KEY    DATE_1      DATE_2     DATE_3 ... DATE_N

A     2019-01-01   2019-02-03   NA          NA
B     2019-04-16   2019-05-23   NA          NA
C     2019-12-03   2019-11-12   2018-03-04  NA

我的代码：

for(i in 2:nrow(my_final)){
  my_final[paste("date", 1:7, sep = ".")] <-  ifelse(my_final$key[i]==my_final$key[i-1], 
                                                     my_final$issueDate, "NA")
}

我还创建了7个变量，但所有变量都带有向量的最后一个值。

您有一些线索可以解决吗？

非常感谢您

M4h