gpt4 book ai didi

r - 如何让 vapply 返回一个日期向量?

转载 作者:行者123 更新时间:2023-12-05 03:58:51 26 4
gpt4 key购买 nike

如何让 vapply 返回一个日期向量? (我认为这是一个不同的问题:Returning a vector of class POSIXct with vapply):

f1 <- function(x) {
as.Date(paste0("2000", sprintf("%02d", x), "01"), format = "%Y%m%d")
}

vapply(3:7, f1, as.Date("2000-01-01"))
# [1] 11017 11048 11078 11109 11139

想要:

# "2000-03-01" "2000-04-01"  "2000-05-01"  "2000-06-01"  "2000-07-01"

最佳答案

问题是 apply家庭功能下降Date类(class)。这是一种方法:

do.call("c", lapply(3:7, f1))

您还可以添加 class(result) <- "Date"评估后vapply .

完整版class(result) <- "Date" :

result <- vapply(3:7, f1, numeric(1))
class(result) <- "Date"
result
# "2000-03-01" "2000-04-01" "2000-05-01" "2000-06-01" "2000-07-01"

关于r - 如何让 vapply 返回一个日期向量?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/57671921/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com