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

Question

从"data_riferemento"开始，当data_rifeimento等于"data_prova_v"时，我们将停止while循环。如何更新"data_rifemento"="data_rivemento"+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)
}