r - 現地時間が機能しないのはなぜですか? 特定のタイムゾーンでの POSIXct [R]

Question

私のデータがESTタイムゾーンにある時間、そして私はこのタイムゾーンを使用しようとしています.

週を（ではなく現地時間で）カウントしたいので、 inGMTを手動で定義しますoriginTimeEDT

originTime = as.POSIXlt('2000-01-02 00:00:00 EDT')
dt2 = data.frame(time=c(as.POSIXlt('2000-01-09 00:00:05 EDT')))
dt2$week = as.integer( floor( ( as.numeric(dt2$time) - as.numeric(originTime) ) /(3600*24*7) ) )
dt2$wday = weekdays(dt2$time)

これは機能します。

今、知りたいのですが、特定の時間の 1 週間後は何ですか?

> as.POSIXlt( 1 * 3600*24*7 , origin = originTime)
[1] "2000-01-08 19:00:00 EST"

ここに問題があります。R は にあると考えてoriginTimeいるようですGMT。誰か助けてくれませんか？ありがとう