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

Question

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

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

Answer 1

一种方法是，例如日期 '2017-05-15' ：

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 中，日期 '2017-05-15' 在表示为数字序列日期时给出相同的数字。