R语言如何为数据框列内的数字添加前导零补全为6位长度

下面提供两种常用的实现方式：

1. 基础R无依赖方案 #

直接使用内置的sprintf()格式化函数即可实现，格式符%06d表示将整数格式化为6位长度，不足位用前导零补齐：

# 假设你的数据框为df，待处理的列名为num_col
df$processed_col <- sprintf("%06d", df$num_col)

# 如果原列是字符型数字，先转数值再处理即可
df$processed_col <- sprintf("%06d", as.numeric(df$num_col))

2. stringr包方案（tidyverse生态） #

如果日常使用tidyverse系列工具，str_pad()函数的参数更直观易读：

library(stringr)

df$processed_col <- str_pad(
  string = df$num_col,
  width = 6, # 目标长度
  side = "left", # 左侧补位
  pad = "0" # 用0填充
)

效果验证 #

用你提供的测试数据验证，输出完全符合预期：

test_data <- c(1331, 221231, 21311)
sprintf("%06d", test_data)
# 输出：[1] "001331" "221231" "021311"

内容的提问来源于stack exchange，提问作者thomas.diridondo