带时间标记R□格式日期

Question

我想转换日期如下

dates <-c(1149318000L, 1151910000L, 1154588400L, 1157266800L, 1159858800L, 1162540800L) 

到日期和时间格式

我不知道日期的起源，但我知道，

1146685218 = 2006/05/03 7时00分00秒

**更新1 **

我已经对未格式化的日期进行了排序，并用友好的顺序替换了上面的示例，但我有实际的日期。我正在考虑使用上述密钥作为原点，但它似乎并不奏效。

让

seconds_in_days <- 3600*24 

（日期[2] -dates [1]）/ seconds_in_days

## [1] 30 

Answer 1

如果你知道

1146685218 = 2006/05/03 07:00:00 

然后只是使起源

dates <- c(1149318000L, 1151910000L, 1154588400L, 1157266800L, 1159858800L, 1162540800L) 

orig.int <- 1146685218 
orig.date <- as.POSIXct("2006/05/03 07:00:00", format="%Y/%m/%d %H:%M:%S") 

as.POSIXct(dates-orig.int, origin=orig.date) 
# [1] "2006-06-02 18:19:42 EDT" "2006-07-02 18:19:42 EDT" "2006-08-02 18:19:42 EDT" 
# [4] "2006-09-02 18:19:42 EDT" "2006-10-02 18:19:42 EDT" "2006-11-02 18:19:42 EST" 

这工作假设你的“日期”的值，因为一个特定的日期/时间，这是怎么回事POSIXt店的日期/时间值的秒数。