R 如何从POSIXlt中提取索引的次秒部分？

如何从POSIXlt对象中提取小数？as.numeric（）只给出自历元以来的秒数

as.character((as.POSIXlt(1366736969, origin="1970-01-01") + 0.001172))
[1] "2013-04-23 13:09:29.001172"
as.numeric((as.POSIXlt(1366736969, origin="1970-01-01") + 0.001172))
[1] 1366736969

---

as.numeric

不仅返回秒数，这就是它的打印方式。通过提高精度可以看到这一点

options(digits.secs=6)
p <- as.POSIXct(1366736969, origin="1970-01-01") + 0.001172
as.numeric(p)
# [1] 1366758569
od <- options("digits")
options(digits=22)
as.numeric(p)
# [1] 1366758569.001172065735

---

不，没有，但它只打印了这么多：

as.numeric（（as.POSIXlt（1366736969，origin=“1970-01-01”）+0.001172））%1

@JoshuaUlrich听起来像个答案。

p%%1

也适用于此。（编辑-我看到你在上面的评论中有这个！）

options(od)
p-trunc(p)
# Time difference of 0.001172066 secs