如何将数据列中多种日期格式统一转换为标准日期类型？

你的问题是因为variable列存在两种不同的日期格式：%Y.%m.%d（如2023.05.03）和%m/%d/%y（如5/1/23），单一格式的as.Date()无法同时匹配两种格式，导致部分值返回NA。以下是两种可行的解决方法：

方法1：用lubridate包自动识别多格式 #

lubridate包提供的parse_date_time()函数可以同时指定多种可能的日期格式，自动匹配转换：

# 安装并加载所需包
install.packages("lubridate")
library(lubridate)
library(dplyr)

# 转换日期列
mydata <- mydata %>%
  mutate(mydate = parse_date_time(variable, orders = c("%Y.%m.%d", "%m/%d/%y")) %>% as.Date())

orders参数列出所有可能的日期格式，函数会逐个尝试匹配，转换后通过as.Date()转为标准的Date类型。

方法2：手动分格式转换后合并 #

如果不想引入额外包，可以先按一种格式转换，再对NA值用第二种格式补全：

library(dplyr)

mydata <- mydata %>%
  mutate(
    # 先转换第一种格式
    mydate = as.Date(variable, format = "%Y.%m.%d"),
    # 对NA值用第二种格式转换，再转回Date类型
    mydate = ifelse(is.na(mydate), as.Date(variable, format = "%m/%d/%y"), mydate) %>% as.Date()
  )

两种方法都能将两种格式的日期统一转换为有效的Date类型，比如5/1/23会转为2023-05-01，2023.05.03转为2023-05-03。

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