r - 日時文字列を1960年1月1日以降のミリ秒の倍精度値に変換する

Question

関連する質問から、Rで1960年1月以降のミリ秒からStataの日時形式を変換する方法を見つけました（以下を参照）：

as.POSIXct(874022400000/1000, origin="1960-01-01")

私は R で反対のことをしようとしています: つまり、文字列として表現された日時が与えられた場合、日時の値を 1960 年 1 月 1 日 00:00:00 からのミリ秒として返す方法を見つけます。どんな提案でも大歓迎です。

Answer 1

as.numeric日時をエポックからの秒数に戻すために使用します。R は 1970 年を起源として使用するため、1960 年から 1970 年までのオフセットを追加で考慮する必要があります。最後に、もちろん、秒からミリ秒への変換に注意してください。

> mydate = as.POSIXct(874022400000/1000, origin="1960-01-01")
> 1000 * (as.numeric(mydate) - as.numeric(as.POSIXct('1960-01-01')))
[1] 874022400000