为什么R要向date-time对象添加不存在的微秒/纳秒？

Question

我已经用"%d-%b-%Y %H:%M:%S.%OS"格式编写了datetimes，例如"25-Apr-2021 18:31:56.234"，也就是精确到毫秒。当解析到time对象时，我发现值不一样，有时会增加1微秒或减少1微秒，或者类似的东西。为什么会这样，该怎么做呢？我想要一个恰好是56秒234毫秒的time对象！(如果需要添加更高的精度，则在此之后添加零

例如，当我调用print(as.numeric(), digits=20)命令："1615310444.7509999 1615310442.5550001"时，它会打印一些值，或者当我请求两个值之间的差异时，它会给出："Time difference of 0.003999949 secs"。

Answer 1

您可以使用选项(digits.secs)来显示毫秒。下面是一个例子。digits.secs必须设置为零。另请注意，您应该更改日期的格式

> dp <- options(digits.secs=0)
> dp
$digits.secs
[1] 0

> strptime("25-Apr-2021 18:31:56.234", format = "%d-%b-%Y %H:%M:%OS")
[1] "2021-04-25 18:31:56 +08"
> dp <- options(digits.secs=3)
> dp
$digits.secs
[1] 0

> strptime("25-Apr-2021 18:31:56.234", format = "%d-%b-%Y %H:%M:%OS")
[1] "2021-04-25 18:31:56.234 +08"