如何在R中将数值月份格式的日期转换为带月份缩写的日期

前置说明 #

如果你的输入已经是R内置Date类型的日期对象，可直接跳过字符串转日期的步骤，直接调用格式化函数；如果输入是"2021-10-22"格式的字符串，需要先转换为日期对象再做格式化。 #

具体操作步骤 #

• 字符串转日期对象（仅输入为字符串时需要）

# 输入为字符串的情况先执行转换
date_input <- as.Date("2021-10-22", format = "%Y-%m-%d")

• 格式化输出为目标格式

# %Y对应4位年份，%b对应月份缩写，%d对应2位日期
formatted_date <- toupper(format(date_input, "%Y-%b-%d"))
print(formatted_date)

运行后输出结果为："2021-OCT-22" #

注意事项 #

如果本地R环境默认语言为中文，%b会默认输出中文月份缩写，可在格式化前先临时修改时区语言设置：

# 临时修改时间相关区域设置为英文
Sys.setlocale("LC_TIME", "English")

转换完成后可按需改回原有区域设置即可。

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