创建一个带有随机日期的新列

Question

我试图在数据框中生成一个新列，其日期在01-01-1945和01-01-2001之间。

当前我的代码如下：

set.seed(123)
df$DOB<-sample(seq(as.Date('1945/01/01'), 
                   as.Date('2001/01/01'), by="day"), length(df$ID))

但我收到此错误：

  

sample.int（length（x），size，replace，prob）中的错误：     当'replace = FALSE'`

时，样本不能大于总体

我在哪里出错呢？