如何将R Date转换为Excel数字序列日期？

Question

Excel将日期内部存储为浮点序列日期。我们知道如何使用as.Date(var2, origin="1899-12-30", tz='UTC')将其转换为R。

问题是：如何将其转换回Excel ？我尝试了所有显而易见的事情，但我仍然感到不匹配。

Answer 1

一种方法是，例如日期＆＃39; 2017-05-15＆＃39; ：

d0 <- as.Date(0, origin="1899-12-30", tz='UTC')
d1 <- as.Date('2017-05-15')

d <- as.numeric(d1-d0)
# or in one line
d <- as.numeric(as.Date('2017-05-15') -as.Date(0, origin="1899-12-30", tz='UTC'))
print(d)
[1] 42870

excel the date＆＃39; 2017-05-15＆＃39;表示为数字序列日期时给出相同的数字。