Millisecond 타임 스탬프를 파싱하는 시간이 R

Question

전이 질문에 답을 얻었지만 정답을 찾을 수 없습니다. 자정 (예 : 34200577)부터 밀리 초를 나타내는 숫자가있는 경우이를 어떻게 R 시간으로 변환합니까?

Answer 1

자정에서 '기준 시간'을 구축, 한 번 초로 변환 주어진 밀리 초 을 추가하고 시간으로 해석 :

사실

R> as.POSIXct(as.numeric(ISOdatetime(2013,8,22,0,0,0)) + 34200577/1e3, 
+    origin="1970-01-01") 
[1] "2013-08-22 09:30:00.576 CDT" 
R> 

, 짧은

R> ISOdatetime(2013,8,22,0,0,0) + 34200577/1e3 
[1] "2013-08-22 09:30:00.576 CDT" 
R> 

이 작동하고 ISOdatetime()은 소수 시간이 인 적절한 시간 객체 을 반환하므로 주어진 오프셋을 적용하기 만하면됩니다.

이 창문에 ...

R> 34200577/1e3  # seconds 
[1] 34200.6 
R> 34200577/1e3/60 # minutes 
[1] 570.01 
R> 34200577/1e3/60/60 # hours 
[1] 9.50016 
R> 

Answer 2

POSIXct는 시간 스케일의 원점 1970을 사용 (초 단위).

> time= as.POSIXct(34200577/1000 , origin=Sys.Date()) 
> time 
[1] "2013-08-22 02:30:00 PDT" 

참고 더크의 내 방법과 결과의 불일치. POSIX 시간은 UCT에서 발생하는 것으로 가정하므로 UCT-8에서 내 위치에 대한 추가 8 시간이 나타납니다.

> difftime(as.POSIXct(34200577/1000 , origin=Sys.Date()) , Sys.Date()) 
Time difference of 9.50016 hours 

당신은 자정 이후의 시간을 얻을 수 :

format(as.POSIXct(34200577/1000 , origin=Sys.Date(), tz="UCT"), 
      format="%H:%M:%S") 
[1] "09:30:00" 

Answer 3

내가 지적 가치가 생각하는 "gottcha"A 적게 R 3.1.2에서

올바른 것으로 보인다 64 비트 나는 다음과 같은 결과를 얻을 수 더크의 예를 들어

> ISOdatetime(2013,8,22,0,0,0) + 34200577/1e3 
[1] "2013-08-22 09:30:00 BST" 

소수 초가 부족합니다. 당신이 아마 추측 수 있듯이

> options(digits.secs=3) 
> ISOdatetime(2013,8,22,0,0,0) + 34200577/1e3 
[1] "2013-08-22 09:30:00.576 BST" 

이이 서식하는 것입니다 : 이것은 다음과 예상되는 결과를 제공으로이 옵션을 설정 "digits.secs"

> getOption("digits.secs") 
NULL 

에 대한 옵션 설정으로 인해 의 출력이 아니라 실제 날짜 값 산술 값입니다. 자세한 내용은 ?strptime 및 ?options을 참조하십시오.