Question

当我取消列出日期列表时，它会将它们变回数字。这是正常的吗？除了重新申请as.Date之外的任何解决方法？

> dd <- as.Date(c("2013-01-01", "2013-02-01", "2013-03-01"))
> class(dd)
[1] "Date"
> unlist(dd)
[1] "2013-01-01" "2013-02-01" "2013-03-01"
> list(dd)
[[1]]
[1] "2013-01-01" "2013-02-01" "2013-03-01"

> unlist(list(dd))
[1] 15706 15737 15765

这是一个错误吗？

Answer 1

do.call是一个使用列表“做某事”的便捷功能。在我们的例子中，使用c连接它。 cbind或rbind data.frames从列表到单个大数据框架的情况并不少见。

我们在这里做的实际上是连接dd列表的元素。这类似于c(dd[[1]], dd[[2]])。请注意，c可以作为函数或字符提供。

> dd <- list(dd, dd)
> (d <- do.call("c", dd))
[1] "2013-01-01" "2013-02-01" "2013-03-01" "2013-01-01" "2013-02-01" "2013-03-01"
> class(d) # proof that class is still Date
[1] "Date"

Answer 2

或使用purrr将日期列表展平为矢量保留类型：

list(as.Date(c("2013-01-01", "2013-02-01", "2013-03-01"))) %>% purrr::reduce(c)

产生

[1] "2013-01-01" "2013-02-01" "2013-03-01"

为什么unlist（）在R中杀死日期

2 个答案: