如何用data.table从日期列提取月份并新增列（保留历史值）

针对8万+行的data.table数据集，无需循环逐个月份赋值（这种方法低效且容易覆盖已有数据），直接通过:=按引用修改的方式一次性生成month列即可，以下是具体实现：

1. 确认date列的类型 #

如果你的date列是字符型，先转换为Date类型（已经是Date类型可跳过此步骤）：

library(data.table)
# 转换字符型date为Date类型
my_dt[, date := as.Date(date)]

2. 提取月份生成新列 #

方法一：使用lubridate包（简洁高效）

library(lubridate)
# 直接提取月份数值，赋值给新列month
my_dt[, month := month(date)]

方法二：使用base R（无需额外安装包）

# 用format提取月份字符串，再转为整数
my_dt[, month := as.integer(format(date, "%m"))]

关于单月赋值清空数据的原因 #

如果你之前用my_dt[date == "2010-03-01", month := 3]这类代码逐个月份赋值，每次执行都会影响整个month列：首次创建列时，未匹配的行会被设为NA；后续修改其他月份时，仅匹配行被更新，之前的有效数据会被保留但整体操作逻辑混乱。而一次性生成整列的方法既高效，又能避免这类问题，8万行数据处理仅需毫秒级时间。

内容的提问来源于stack exchange，提问作者Azzo.fa