在R语言中拼接带递增数字后缀的系列列表的快捷实现方法

当然有更简便的写法！不用手动逐个列出所有列表，这里有两种实用的方法帮你高效完成拼接：

方法1：已知列表数量范围时用mget() + do.call() #

如果明确知道列表是从mylist1到mylistN，可以直接生成名字向量，再批量获取并拼接：

# 先模拟几个测试列表
mylist1 <- list(name = "Alice", age = 25)
mylist2 <- list(name = "Bob", age = 30)
mylist3 <- list(name = "Charlie", age = 35)

# 拼接操作
combined_list <- do.call(c, mget(paste0("mylist", 1:3)))

原理说明： #

• paste0("mylist", 1:3)生成所有目标列表的名字：c("mylist1", "mylist2", "mylist3")
• mget()会根据名字从当前环境中取出对应的列表，返回一个包含这三个列表的大列表
• do.call(c, ...)相当于把大列表里的每个元素作为参数传给c()，效果和手动写c(mylist1, mylist2, mylist3)完全一致，但扩展性更强——比如要拼100个列表，只要把1:3改成1:100就行。

方法2：未知数量时用正则匹配+排序 #

如果不确定有多少个列表，或者列表名是随机以mylist开头加数字的，可以用正则表达式匹配名字，再按数字排序后拼接：

# 匹配所有以"mylist"开头、后面跟数字的对象
list_names <- ls(pattern = "^mylist\\d+$")

# 按数字后缀排序（避免出现mylist10排在mylist2前面的情况）
list_names <- list_names[order(as.integer(sub("mylist", "", list_names)))]

# 批量拼接
combined_list <- do.call(c, mget(list_names))

原理说明： #

• ls(pattern = "^mylist\\d+$")用正则表达式筛选出符合命名规则的列表名：^表示开头，\\d+表示一个或多个数字，$表示结尾
• 排序步骤很关键：默认字符串排序会把mylist10排在mylist2前面（因为字符"1"比"2"小），所以我们用sub()去掉前缀"mylist"，转成整数后排序，保证列表按数字顺序拼接。

注意事项 #

如果你的列表元素都是简单向量，用unlist(mget(...))也能得到拼接后的向量，但do.call(c, ...)会保留列表的嵌套结构（比如某个子列表里还有列表的话，不会被扁平化），根据你的需求选择即可。

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