R语言代码无法为数据框添加新列问题求助

• 你创建的列表datasets存储的是原数据框的副本，而非对原变量的引用。循环中修改的只是列表内的副本，全局环境里的data2010至data2022从未被改动，所以调用原变量的新增列会返回NULL。
• 循环结束后，你没有将列表中修改好的数据框重新赋值回原变量名，导致原数据框始终保持初始状态。

方法一：直接修改全局环境中的原变量 #

通过get()获取变量、assign()更新变量，直接操作原数据框：

library(dplyr)

# 生成所有数据框的变量名
year_vars <- paste0("data", 2010:2022)

for(var in year_vars) {
  # 获取当前数据框
  current_df <- get(var)
  # 提取年份数字
  current_year <- as.integer(sub("data", "", var))
  # 修改并覆盖原变量
  assign(var, current_df %>% mutate(TREAT = 0, POST = 0, YEAR = current_year))
}

方法二：列表处理后同步回全局环境 #

先通过列表批量处理，再将修改后的结果导出到全局环境：

library(dplyr)

# 按变量名批量获取数据框到列表（保留变量名）
datasets <- mget(paste0("data", 2010:2022))

# 批量修改列表中的每个数据框
datasets <- lapply(names(datasets), function(var_name) {
  df <- datasets[[var_name]]
  year <- as.integer(sub("data", "", var_name))
  df %>% mutate(TREAT = 0, POST = 0, YEAR = year)
})

# 给列表元素恢复原变量名
names(datasets) <- paste0("data", 2010:2022)

# 将列表中的数据框导出到全局环境
list2env(datasets, envir = .GlobalEnv)

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