我的代码中遇到了这个问题
我有以下有效的代码。
mutate(data, as.Date(parse_date_time(data$birthday, c("%d.%m.%Y", "%Y-%m-%d",
"%Y/%m/%d", "%d-%m-%Y",
"%m-%d-%Y"))))
现在，我想将该parse_date_time函数应用于数据的另一列，并编写以下内容（现在，我使用方括号来下标）：
mutate(data, as.Date(parse_date_time(data[, c("birthday", "subscription_date")],
c("%d.%m.%Y", "%Y-%m-%d",
"%Y/%m/%d", "%d-%m-%Y",
"%m-%d-%Y"))))
但是，我收到警告消息“所有格式都无法解析”。找不到格式。。为什么会这样？
提前致谢
您可以使用lapply：
cols <- c("birthday", "subscription_date")
data[, cols] <- lapply(data[, cols], lubridate::parse_date_time,
c("%d.%m.%Y", "%Y-%m-%d", "%Y/%m/%d", "%d-%m-%Y","%m-%d-%Y"))
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句