R中%B.%Y格式字符转日期返回NA仅zoo::as.yearmon生效原因求解

问题原因 #

• as.Date和strptime的设计逻辑本身要求输入包含完整的日期定位信息：Date类型内部存储的是自1970-01-01以来的天数，POSIXlt/POSIXct（strptime返回的类型）存储的是自1970-01-01 00:00:00以来的秒数，只有年月信息的情况下，系统无法确定具体的天数/秒数偏移，默认不会自动补充缺失的日信息，因此直接返回NA。
• 你修改LC_TIME后仍然无效是因为问题本身和时区、区域设置无关：你补充的带日的测试转换成功，已经说明区域配置是正确的、能识别英文月份名，问题核心是缺失日字段。
• zoo::as.yearmon转换成功是因为该类型是专门为年月场景设计的，内部用「年份+月份/12」的浮点数存储，不需要日信息即可完成解析。

可行解决方案 #

方案1：直接使用yearmon类型（推荐用于纯年月分析场景） #

如果你需要处理的指标本身就是按年月统计的，直接用zoo::as.yearmon的结果即可，该类型支持时间序列运算、排序、分组等操作，不需要额外转换。如果后续需要转成Date类型，可直接调用as.Date转换，通过frac参数指定取当月第一天还是最后一天：

library(zoo)
ym_vec <- as.yearmon(c('November.2017', 'April.2017'), '%B.%Y')
# 转当月第一天
as.Date(ym_vec, frac = 0)
# 转当月最后一天
as.Date(ym_vec, frac = 1)

方案2：手动补日无依赖转换 #

不想引入额外包的话，直接给原字符串拼接默认日字段再转换即可：

date_str <- c('November.2017', 'April.2017')
# 补当月第一天后转换为Date
as.Date(paste0(date_str, '.01'), format = '%B.%Y.%d')
# 转POSIX时间格式同理
strptime(paste0(date_str, '.01'), format = '%B.%Y.%d')

方案3：用lubridate包简化转换 #

常用的日期处理包lubridate提供了适配年月格式的解析函数，会自动补全日字段：

library(lubridate)
# my()对应"月-年"格式的解析，自动补当月第一天
my(c('November.2017', 'April.2017'))

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