R语言如何通过字符串生成变量名 批量创建名称相似的dataframe

实现方法 #

方法1：直接生成独立对象（和你预期的循环写法效果一致） #

直接用assign()函数即可实现动态变量名赋值，同时需要把字符串格式的变量名转换为aggregate可识别的公式对象，示例代码如下：

for (val in c('dbh','agb','ba')){
  # 构造聚合公式
  agg_formula <- as.formula(paste0(val, " ~ date + plot"))
  # 动态生成对应前缀的变量并赋值
  assign(paste0("mean_", val), aggregate(agg_formula, data, mean))
}

运行完成后，你的工作环境中会直接生成mean_dbh、mean_agb、mean_ba三个独立的dataframe，和你最初手动编写的代码效果完全一致。

方法2：存入列表（更推荐的规范写法） #

更建议你把结果统一存入命名列表中，后续需要批量操作时不需要重复写变量名，维护效率更高：

calc_vars <- c("dbh", "agb", "ba")
mean_res <- setNames(
  lapply(calc_vars, function(x) {
    aggregate(as.formula(paste0(x, " ~ date + plot")), data, mean)
  }),
  paste0("mean_", calc_vars)
)

调用单个结果时写法为mean_res$mean_dbh或mean_res[["mean_dbh"]]。

内容的提问来源于stack exchange，提问作者Ana Catarina Vitorino