R语言基于一级名称与位置索引为嵌套列表二级元素命名求助

方案1：使用purrr包（代码更简洁） #

先加载purrr包，通过imap遍历一级列表，直接生成目标命名：

library(purrr)
nested_list <- imap(nested_list, ~ set_names(.x, paste0(.y, "_", seq_along(.x))))

调用str(nested_list)即可验证生成的结构符合预期。

方案2：基础R实现（无需额外安装包） #

通过循环遍历一级列表完成命名赋值：

for (level1_idx in seq_along(nested_list)) {
  level1_name <- names(nested_list)[level1_idx]
  names(nested_list[[level1_idx]]) <- paste0(level1_name, "_", seq_along(nested_list[[level1_idx]]))
}

运行完成后直接查看str(nested_list)即可得到目标结构。

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