为什么 Date 以“double”类型返回？

Question

我在使用 R 中的 as.Date 函数时遇到了一些问题。我有一个日期向量，我正在从一个 .csv 文件中读取该日期向量，这些日期作为整数或字符的因子传入（取决于关于我如何读取文件，但这似乎与问题无关），格式为%m/%d/%Y。

我正在逐行浏览文件，提取日期字段并尝试使用以下代码将其转换为在其他地方使用：

tmpDtm <- as.Date(as.character(tempDF$myDate), "%m/%d/%Y")

这似乎给了我想要的东西，例如，如果我对 2014 年 12 月 30 日的起始值执行此操作，我会返回值 "2014-12-30"。但是，如果我使用typeof() 检查这个值，R 会告诉我它的数据类型是“double”。此外，如果我尝试将其绑定到其他值并使用 c() 或 cbind() 将其存储在数据框中，在数据框中，它最终会存储为 16434，这在我看来就像某种不同的内部日期的存储值。我很确定它也是如此，因为如果我尝试使用 as.Date() 再次转换该值，它会抛出一个询问来源的错误。

那么，有两个问题：这符合预期吗？如果是这样，是否有更合适的方法来转换日期，以便我最终得到一个日期类型的对象？

谢谢

Answer 1

日期在内部表示为双精度，如下例所示：

> typeof(as.Date("09/12/16", "%m/%d/%y"))
[1] "double"

它仍然被标记为一个类日期，如

> class(as.Date("09/12/16", "%m/%d/%y"))
[1] "Date"

因为它是一个双精度数，所以你可以用它进行计算。但是因为它属于 Date 类，所以这些计算会导致 Dates：

> as.Date("09/12/16", "%m/%d/%y") + 1
[1] "2016-09-13"
> as.Date("09/12/16", "%m/%d/%y") + 31
[1] "2016-10-13"

---

编辑 我要求c() 和cbind()，因为它们可能与一些奇怪的行为有关。请参见以下示例，其中在c 中切换顺序不会更改结果的类型而是更改结果的类：

> c(as.Date("09/12/16", "%m/%d/%y"), 1)
[1] "2016-09-12" "1970-01-02"
> c(1, as.Date("09/12/16", "%m/%d/%y"))
[1]     1 17056

> class(c(as.Date("09/12/16", "%m/%d/%y"), 1))
[1] "Date"
> class(c(1, as.Date("09/12/16", "%m/%d/%y")))
[1] "numeric"

---

EDIT 2 - c() 和 cbind 强制对象为一种类型。第一次编辑显示了强制异常，但通常，向量必须是一个共享类型。 cbind 共享此行为，因为它强制转换为矩阵，而矩阵又强制转换为单一类型。

有关typeof 和class 的更多帮助，请参阅this link

Answer 2

这符合预期。你用过typeof()；你可能应该使用class():

R> Sys.Date()
[1] "2016-09-12"
R> typeof(Sys.Date())       # this more or less gives you how it is stored
[1] "double"
R> class(Sys.Date())        # where as this gives you _behaviour_
[1] "Date"
R> 

小广告：我有一个新包 anytime，目前在 CRAN 收到，它处理这个问题，因为它将“任何东西”转换为 POSIXct（通过anytime()）或日期（通过anydate()。

例如：

R> anydate("12/30/2014")             # no format needed
[1] "2014-12-30"
R> anydate(as.factor("12/30/2014"))  # converts from factor too
[1] "2014-12-30"
R>