为什么我必须在 R 中使用 assign() 而不是 eval(parse(text=()))

Question

当我想使用循环将新值分配给多个数据帧时，就会出现问题。

我知道正确的方法是

for (df.name in c('df1', 'df2', 'df3')) {
  assign(df, new.value)
}

我的问题是，为什么我不能这样做

for (df.name in c('df1', 'df2', 'df3')) {
  eval(parse(text=df.name)) <- new.value
}

谢谢！

Answer 1

你可以使用 eval/parse:

eval(parse(text= paste(df.name, "<- new.value")))

你得到的错误，

赋值目标扩展为非语言对象

是因为 eval(parse(text=df.name)) 返回变量 df1，它不是要计算的 R 表达式。

---

请记住，eval/parse 是黑暗的、危险的、魔法，会导致无法维护的僵尸代码。如果您能找到其他方式来编写代码，请选择它。

---

如 cmets 中所述，如果您有多个具有相似属性的数据框，通常将它们作为列表使用会更容易。

df_list <- list(df1 = df1, df2 = df2, df3 = df3)

然后您可以使用lapply 循环操作每个数据帧，或者使用rbind 或dplyr::bind_rows 将它们组合成一个数据帧。