R语言字符型转日期时间时丢失时分或返回NA问题求助

使用as.Date只能保留日期维度，本身设计就不支持时分秒存储，需要保留时间细节必须使用POSIXct/POSIXlt类型或者lubridate的datetime类型。as.POSIXct返回NA基本都是格式匹配错误、时区配置问题或者存在脏数据导致的。

分步解决方法 #

• 第一步：匹配格式参数
  首先对应你的原始字符时间格式，准确填写format参数，常见格式对应规则：
  • %Y：4位年份（如2024），%y：2位年份（如24）
  • %m：2位月份（如03），%b：月份缩写（如Mar），%B：月份全称（如March）
  • %d：2位日期（如15）
  • %H：24小时制小时（如14），%I：12小时制小时（如02）
  • %M：分钟，%S：秒
  • %p：AM/PM标识
    比如原始数据是2024-03-15 14:23:45，对应的format参数就是"%Y-%m-%d %H:%M:%S"。如果时间字符串包含中文标识，需要先切换系统locale：

  Sys.setlocale("LC_TIME", "zh_CN.UTF-8")
  

• 第二步：单值测试+指定时区
  先取第一条时间字符串单独测试，避免全量转换时脏数据干扰，同时显式指定时区避免系统默认时区不兼容：

  # 替换为你实际的第一条时间字符串和对应format
  single_time <- "2024-03-15 14:23:45"
  as.POSIXct(single_time, format = "%Y-%m-%d %H:%M:%S", tz = "Asia/Shanghai")
  

  单值转换成功后再应用到全列。
• 第三步：排查脏数据
  如果单值转换成功但全列转换仍有NA，说明存在格式不一致的异常记录，用正则筛选异常值处理：

  # 替换正则匹配规则为你对应时间格式的规则
  bad_idx <- !grepl("^\\d{4}-\\d{2}-\\d{2} \\d{2}:\\d{2}:\\d{2}$", df$你的字符时间列名)
  # 查看异常记录
  df[bad_idx, ]
  

  异常记录可以手动修正或者转为NA值保留。
• 第四步：使用lubridate自动识别（推荐）
  不想手动匹配格式可以用lubridate包的内置解析函数，自动适配大部分常规时间格式：

  # 安装加载包
  install.packages("lubridate")
  library(lubridate)
  
  # 根据你的时间顺序选对应函数：
  # 年-月-日 时:分:秒 用ymd_hms
  df$datetime_col <- ymd_hms(df$字符时间列名, tz = "Asia/Shanghai")
  # 月/日/年 时:分 用mdy_hm
  # 日-月-年 时:分:秒 用dmy_hms
  

参考示例 #

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