如何將R日期轉換爲Excel數字序列日期？

Question

Excel在內部將日期存儲爲浮點序列日期。我們知道如何將它轉換爲R - 使用as.Date(var2, origin="1899-12-30", tz='UTC')。

現在的問題是：如何將其轉換回Excel？我嘗試了所有明顯的事情，但我仍然遇到了不匹配。

Answer 1

一種方法是，例如，用於日期「2017年5月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年5月15日」給出當作爲數字序列日期表達了相同的編號。