如何在 R 中使用日、月和年创建日期？

Question

从“data_riferimento”开始，当 data_riferimento 等于“data_prova_v”时，我们将停止 while 循环。如何更新 'data_riferimento' = 'data_riferimento' + 1？

data_riferimento='08/01/2022'
data_prova_v='11/01/2022'


while (match(data_riferimento,data_prova_v)==NA) {
  giorno_data_riferimento=as.numeric(substring(data_riferimento,1,2))+1
  mese_data_riferimento=as.numeric(substring(data_riferimento,4,5))
  anno_data_riferimento=as.numeric(substring(data_riferimento,7))
  
data_riferimento=as.Date(as.POSIXct(as.numeric(giorno_data_riferimento,mese_data_riferimento,anno_data_riferimento),origin="1970/01/01") --> # it does not work

}

Answer 1

使用lubridate

library(lubridate)

data_riferimento=as_datetime('08/01/2022',tz="UTC",format="%d/%m/%Y")
data_prova_v=as_datetime('11/01/2022',tz="UTC",format="%d/%m/%Y")

while (data_riferimento<=data_prova_v) {
  data_riferimento=data_riferimento+days(1)
}