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

Question

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

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

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

这似乎给了我我想要的东西，例如，如果我对 12/30/2014 的起始值执行此操作，我将返回值"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"

---

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

有关typeof和class更多帮助，请参阅此链接

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> 

小广告：我随时有一个新包，目前在 CRAN 中，它处理这个问题，因为它将“任何东西”转换为 POSIXct（通过 anydate 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>