R语言如何批量转换数据框中以Date结尾的列为指定日期类型

你的代码有两个核心问题：

• 操作逻辑完全错位：你用apply按行遍历数据，还把as.Date的返回值当成行筛选索引，本质是在做行子集筛选，但你的实际需求是修改符合条件的列的类型，和行筛选没有关系
• 调用as.Date时没有手动指定日期格式，R默认会按%Y-%m-%d的标准格式解析字符串，遇到%d-%m-%Y格式的内容就会抛出你看到的「字符串不是标准明确格式」的报错

直接用dplyr的across函数批量匹配列、批量转换即可，lubridate的dmy()函数专门用来解析「日-月-年」格式的日期，不需要手动写格式参数，写法最简洁：

myData <- myData %>%
  mutate(across(ends_with("Date"), dmy))

如果转换时出现大量解析警告，可以先查看对应列的原始值是否存在格式异常；如果确定要忽略非标准值转成NA，可以给dmy加参数写成~dmy(.x, quiet = TRUE)抑制提示。

如果不想用tidyverse系列函数，也可以先匹配目标列，再用lapply批量转换，记得手动给as.Date指定格式：

# 匹配所有列名以Date结尾的列
target_cols <- colnames(myData)[endsWith(colnames(myData), "Date")]

# 批量转换列类型
myData[target_cols] <- lapply(myData[target_cols], function(col) {
  as.Date(col, format = "%d-%m-%Y")
})

转换完成后可以运行str(myData[target_cols])检查，确认所有目标列都已经是Date类型即可。

内容的提问来源于stack exchange，提问作者a nony mouse