奇怪的as.Date()行为

Question

我使用的是R4.2.1，所有软件包都更新到了最新版本。下面的两行仅按级联向量中元素的顺序不同，但输出完全不同。

as.Date(c(Sys.Date(), "2020-09-09"))
as.Date(c("2020-09-09", Sys.Date()))

产出如下：

> as.Date(c(Sys.Date(), "2020-09-09"))
[1] "2022-09-16" "2020-09-09"
> as.Date(c("2020-09-09", Sys.Date()))
[1] "2020-09-09" NA 

第一行正确地将系统日期强制为字符串，第二行先以数值形式强制，然后以字符串形式强制，但我以前从未遇到过这样的情况，即R中的强制依赖于向量中元素的顺序.

有人能给我解释一下为什么胁迫规则是这样的吗?我能在哪里读到更多关于它的文章.

在c()中的元素类型不知道的情况下，我能做什么呢？

谢谢!

Answer 1

默认的c()在组合它们之前取消每个参数的类(到今天为止，它们的unclass(Sys.Date())是19251 )；这是因为“除名称之外的所有属性都被(至少是) c()，(包括类)的默认版本删除”。

顺序差异的原因是，c()是一个S3泛型函数，这意味着它分配给它的first参数的类，所以c(<date>, <character>)调用c.Date()，而c(<character>, <date>)调用c()的泛型版本(它在C中是一个基本函数，我不想费心钻研)。

c.Date代码

function (..., recursive = FALSE) 
.Date(c(unlist(lapply(list(...), function(e) unclass(as.Date(e))))))

换句话说，它把所有的东西强制到一个日期，然后取消它的类，然后当所有的东西连在一起的时候，它会将向量返回到日期.

一个可能的解决办法/解决方案是显式调用c.Date()，如果您知道这是您想要的.