R语言中如何批量转换不规则mdY格式字符串为日期对象？

你遇到的问题是因为mdy()函数要求输入的日期字符串严格匹配两位月份、两位日期的格式，而部分字符串的月份仅为一位数，导致无法识别。以下是两种可行的解决方法：

方法1：使用lubridate的parse_date_time()函数 #

parse_date_time()支持匹配多种日期格式，能自动识别月份/日期是否补零的情况，非常适合处理这种格式不统一的日期字符串：

library(lubridate)
Obj <- c('3122024', '04122023', '412024')
# 指定日期格式逻辑为「月-日-年」，函数自动适配位数差异
date_obj <- parse_date_time(Obj, orders = "mdY")
# 转换为标准Date类型
as.Date(date_obj)

运行结果：

[1] "2024-03-12" "2023-04-12" "2024-04-12"

方法2：Base R 结合tryFormats参数 #

如果不想额外加载lubridate包，可以使用Base R的as.Date()函数，通过tryFormats参数指定多种可能的格式：

Obj <- c('3122024', '04122023', '412024')
# 列出所有可能的mdY格式（覆盖一位/两位月份的情况）
date_obj <- as.Date(Obj, tryFormats = c("%m%d%Y", "%_m%d%Y"))
date_obj

注：%_m表示允许月份为一位或两位数字（自动忽略前导零），若部分系统不支持该写法，可补充其他格式字符串确保覆盖所有输入情况。

内容的提问来源于stack exchange，提问作者Bogaso