具有日期和滞后的动态If_else语句：If_else在R中不起作用

Question

我的数据有一个StartDate列，其中包括观察开始研究某部分的日期，即患者A在2014年1月1日开始治疗1，在2014年6月1日开始治疗2。

导致（滞后）新处理日期的行为空白。我想使用if_else语句用滞后的日期填充空白单元格。在下面的示例中，“ StartDate”列是我当前拥有的内容，“ NewDate”列是我想要结束的内容。单元格“”是我要用滞后日期填充的空白或NULL单元格。

我之所以选择使用滞后函数，是因为我认为单元格会相互链接，即单元格3将复制单元格2，而单元格2将复制单元格1。

有什么建议吗？谢谢

df<-data.frame(StartDate=c(as.Date('2014-01-01'),"","","","",as.Date('2014-06-01'),"","","","",""),
       NewDate=c(as.Date('2014-01-01'),as.Date('2014-01-01'),as.Date('2014-01-01'),as.Date('2014-01- 01'),as.Date('2014-01-01'),as.Date('2014-06-01'),as.Date('2014-06-01'),as.Date('2014-06- 01'),as.Date('2014-06-01'),as.Date('2014-06-01'),as.Date('2014-06-01')))
df$testDate<-if_else(is.na(df$Date),lag(df$Date),df$Date)

我的数据有一个StartDate列，其中包括观察开始研究某部分的日期，即患者A从2014年1月1日开始治疗1，从6月1日开始开始治疗2 ...

Answer 1