在R中從日期時間更改為數字AND返回日期時間

Question

看到其他人無法重現這一點任何關於可能導致我所看到的系統設置的猜測都會受到贊賞。 這是在由IT配置的工作PC上，但我將在今晚與我的個人安裝進行比較，然后更新問題。

使用基數R，我試圖讀取日期和時間，轉換為數字，然后轉換回日期時間。 我遇到的問題是引入+ 5小時的班次，我認為由於時區默認。

從上一個問題中，提供了日期時間到數字的示例： 從日期和小時格式更改為數字格式

> x <- as.POSIXct("9/27/2011  3:33:00 PM", format="%m/%d/%Y  %H:%M:%S %p")
> x
[1] "2011-09-27 03:33:00 EDT"
> y <- as.numeric(x)
[1] 1317108780

* 以上代碼中的錯誤修復

當我試圖把它帶回到最新時間時，我得到：

> z <- as.POSIXct(y, origin="1970-01-01")
> z
[1] "2011-09-27 08:33:00 EDT" 

我嘗試了一些變體，包括明確指定時區，但我一直在進行這種轉變。

Answer 1

我認為這只是指定時區的問題：

x <- as.POSIXct("9/27/2011  15:33:00", format="%m/%d/%Y  %H:%M:%S")
> as.POSIXct(as.numeric(x), origin="1970-01-01",tz="EST") # as.numeric(x)=1317130380
[1] "2011-09-27 08:33:00 EST"

但是：

x <- as.POSIXct("9/27/2011  15:33:00", format="%m/%d/%Y  %H:%M:%S",tz="EST")
> as.POSIXct(as.numeric(x), origin="1970-01-01",tz="EST") # as.numeric(x)=1317155580
[1] "2011-09-27 15:33:00 EST"

備注：我在15:33:00簡化了03:33:00 PM