在R语言中按指定顺序批量创建变量名的方法求助

我懂你想要的效果：给每个从0到99的序号，都配上n、man、woman、low65、up65这5个后缀，生成I0.n、I0.man…I99.up65这样完整的变量名序列。你之前的代码没成功，是因为paste0默认是按位置一一对应拼接，结果会变成I0.n、I1.man这种错位的配对，而不是每个序号都带全5个后缀。

下面给你两种高效的实现方法，都是基础R就能搞定的：

方法一：用outer函数（最简洁） #

outer函数天生就是用来生成两个向量的笛卡尔积组合的，非常适合你的需求：

# 生成序号（如果想要I0而不是I00，把sprintf换成as.character(0:99)）
num <- sprintf('%02d', 0:99)
# 定义后缀列表
index <- c('n', 'man', 'woman', 'low65', 'up65')
# 生成所有组合并拼接
vars <- c(outer(num, index, function(x, y) paste0('I', x, '.', y)))

运行后，vars会按I00.n→I00.man→I00.woman→I00.low65→I00.up65→I01.n…的顺序排列，完全符合你的要求。

方法二：用expand.grid（更直观，适合理解） #

如果你想更清晰地看到所有组合的结构，可以用expand.grid先生成配对表，再拼接：

num <- sprintf('%02d', 0:99)
index <- c('n', 'man', 'woman', 'low65', 'up65')
# 生成所有序号和后缀的组合表
combos <- expand.grid(num = num, suffix = index, stringsAsFactors = FALSE)
# 按序号排序，保证同一序号的后缀连在一起
combos <- combos[order(combos$num), ]
# 拼接成变量名
vars <- paste0('I', combos$num, '.', combos$suffix)

小提示 #

如果不需要两位数的序号（比如想要I0.n而不是I00.n），只需要把sprintf('%02d', 0:99)替换成as.character(0:99)即可，这样生成的序号就是"0"、"1"…"99"。

你可以用head(vars)验证前几个结果，比如用as.character(0:99)的话，输出会是：

[1] "I0.n"     "I0.man"   "I0.woman" "I0.low65" "I0.up65"  "I1.n"

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