R语言循环创建多个向量并追加数据报错如何修复

报错原因 #

你收到target of assignment expands to non-language object错误的核心是赋值逻辑不符合R的语法规则：assign()是用来直接完成变量赋值的函数，不能将assign()语句放在赋值操作符<-的左侧作为被赋值的目标，你原代码的第二行写法违反了该规则。
同时原代码存在冗余逻辑：重复调用assign()初始化空向量，且没有正确读取已创建的动态变量的值用于追加操作。

修复方案 #

方案1：直接修正原assign写法 #

如果你确实需要在全局环境生成v1到v10共10个独立向量，可以按如下写法调整：

for (i in 1:10) {
  # 先构造动态变量名
  var_name <- paste0("v", i)
  # 初始化空向量
  assign(var_name, vector())
  # 用get()获取已创建变量的当前值，追加后再用assign赋值
  assign(var_name, append(get(var_name), json_file$rows[i]))
}

方案2：更推荐的列表存储方案 #

不建议在全局环境生成大量零散的独立向量，用列表存储后续操作更便捷，代码也更简洁：

# 初始化空列表
v_list <- list()
for (i in 1:10) {
  v_list[[paste0("v", i)]] <- json_file$rows[i]
}

# 后续调用示例：取v2对应的值
v_list[["v2"]]

优化说明 #

如果json_file$rows[i]本身就是符合向量格式的内容，不需要额外先初始化空向量再追加，直接赋值即可，可进一步简化代码。

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