R - 当前时间戳，精确到毫秒

Question

如何以毫秒精度获取当前时间戳？

我尝试了设置digits.secs=3的选项，但是，无法获得毫秒的部分。

> op<-options(digits.secs=3)
> format(Sys.time(),format="%Y-%m-%d %H:%M:%S.%s")
[1] "2015-01-07 22:44:51.1420650891"
> library(lubridate)
> format(now(),format="%Y-%m-%d %H:%M:%S.%s")
[1] "2015-01-07 22:45:15.1420650915"

我需要具体的毫秒精度，因为这是系统其余部分的设置方式。