R에서 자정 이후 경과 된 밀리 초를 얻는 방법?

Question

strptime 및 as.POSIXct의 도움으로 POSIXlt 및 POSIXct 클래스는 전체 초만 기록하는 것처럼 보입니다.

는 (I는 공유 객체에 난수 발생기에 시드 (seed)로 전달하기 위해 밀리 초를해야합니다.)

Answer 1

당신은 옵션을 변경하여 초 이하의 정밀도로 인쇄 시간을 설정할 수 있습니다

options("digits.secs"=6) 

최대 값은 6 자리입니다. options

다음으로 시스템 시간을 밀리 초로 설정할 수 있습니다.

as.POSIXlt(Sys.time()) 

시간이 인쇄됩니다. 자정 이후로 밀리 초를 얻으려면 다음을 사용하십시오.

mySeed = as.POSIXlt(Sys.time()) 
mySeed = 1000*(mySeed$hour*3600 + mySeed$min*60 + mySeed$sec) 

Answer 2

?Sys.time는 말한다 :

거의 모든 시스템은 초 이하의 정밀도를 가질 것 , 아마도 마이크로 초 또는 그 이상일 수 있습니다. Windows에서는 밀리 초의 정확도로보고 된 시계 틱 (일반적으로 1/60 초) 단위로 증가합니다.

그래서 당신은 간단하게이 작업을 수행 할 수 있습니다

> foo <- Sys.time() 
> foo 
[1] "2014-05-22 12:40:55 CEST" 
> hours <- as.POSIXlt(foo)$hour 
> minutes <- as.POSIXlt(foo)$min 
> seconds <- as.POSIXlt(foo)$sec 
> hours*60*60*1000+minutes*60*1000+seconds*1000 
[1] 45655771 

도움말 페이지에 비추어, 결과는 시스템에 따라 달라집니다.

당신이 인쇄 밀리 초하려는 경우, 당신은이 작업을 수행 할 수 있습니다

> options(digits.secs=3) 
> foo 
[1] "2014-05-22 12:40:55.771 CEST"