作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
如何让 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/
我是一名优秀的程序员,十分优秀!