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

Question

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

问题是:如何将其转换回 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”在表示为数字序列日期时给出相同的数字。