r - date_decimal 的问题

Question

我试图出于某种目的将日期转换为十进制，当我需要使用date_decimal函数的原始格式的日期时，它没有返回正确的实际日期。

当我(tz = "EST")在 date_decimal 中使用时，它显示了正确的日期，但我不确定首先失败的原因是什么，更不用说使用“EST”它是如何工作的了。

谁能分享如何lubridate将日期转换为十进制，反之亦然？！

library(lubridate)
temp <- c('2015-01-01', '2015-02-01', '2015-03-01','2015-04-01', '2015-05-01', '2015-06-01', '2015-07-01', '2015-08-01', '2015-09-01', '2015-10-01', '2015-11-01','2015-12-01')
temp_decimal <- decimal_date(as.Date(temp,format = "%Y-%m-%d"))
temp_date <- as.Date(date_decimal(temp_decimal))
temp_date

[1] "2015-01-01" "2015-01-31" "2015-02-28" "2015-04-01" "2015-04-30" "2015-05-31" "2015-07-01" "2015-07-31" "2015-09-01" "2015-10-01" "2015-10-31" "2015-12-01"

预期输出为：

[1] "2015-01-01" "2015-02-01" "2015-03-01" "2015-04-01" "2015-05-01" "2015-06-01" "2015-07-01" "2015-08-01" "2015-09-01" "2015-10-01" "2015-11-01" "2015-12-01"

标签： rdatelubridate