在R语言中为数据框date列值末尾插入指定数字01的方法

这里有几种简单可行的方式实现你的需求：

方法1：数值运算（最直接） #

如果你的date列是数值类型，直接通过乘100加1就能得到目标结果——每个年月值乘100相当于在末尾补两个0，再加1就变成了当月1号的数字：

df$date <- df$date * 100 + 1

执行后数据框会直接变成你想要的样子：

df <- data.frame(date=c(20220301,20220401,20220501,20220601))

方法2：字符串拼接（适配字符型列） #

如果date列是字符类型，或者你想先转成字符处理，可以用paste0()直接拼接"01"，再按需转回数值型：

# 先转字符拼接，再转回数值
df$date <- as.numeric(paste0(as.character(df$date), "01"))

你之前用gsub没成功，大概率是没先把数值转成字符——gsub是字符串处理函数，直接传入数值会被强制转换，但其实完全没必要用gsub绕弯，直接拼接效率更高。如果一定要用gsub，可以这么写：

df$date <- as.numeric(gsub("(.*)", "\\101", as.character(df$date)))

方法3：转为标准日期格式（推荐用于后续日期操作） #

如果之后需要对日期做计算、格式化等操作，建议用lubridate包先转成标准日期类型，再按需转成8位数字：

library(lubridate)
# 把年月转成标准日期（默认当月1号），再格式化为8位数字
df$date <- as.numeric(format(ym(df$date), "%Y%m%d"))

这种方式更规范，后续提取年、月、日或者做日期加减都会更方便。

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