如何通过向量中的数据框名称批量将第4列后列转为数值型？

你的问题出在直接用字符串（paste0生成的结果）当作DataFrame对象来操作——R不会自动把字符串转换成对应的对象引用，而且你的赋值方式也不符合语法要求。下面给你两种可行的解决方案：

方法一：用get()和assign()配合循环 #

这是最直观的方式，通过字符串名称获取对象，修改后再存回原名称：

for (industry_name in list.industries) {
  # 根据字符串名称获取对应的DataFrame
  current_df <- get(industry_name)
  # 把第4列及之后的所有列转换为数值型
  current_df[, 4:ncol(current_df)] <- lapply(current_df[, 4:ncol(current_df)], as.numeric)
  # 将修改后的DataFrame重新赋值回原名称
  assign(industry_name, current_df)
}

关键说明： #

• get(industry_name)：把字符串形式的对象名转换成实际的DataFrame对象
• 修改列类型后，用assign()把更新后的DataFrame放回原名称对应的变量中，这样全局环境里的原始DataFrame就会被更新

方法二：用lapply简化循环 #

如果觉得for循环不够"R风格"，可以用lapply来遍历名称列表，逻辑和上面一致：

lapply(list.industries, function(name) {
  df <- get(name)
  df[, 4:ncol(df)] <- lapply(df[, 4:ncol(df)], as.numeric)
  assign(name, df, envir = .GlobalEnv) # 指定环境为全局环境，确保修改生效
})

额外提醒： #

如果你的DataFrame不是在全局环境（比如存在自定义环境中），记得给get()和assign()加上envir参数，指定对应的环境对象，比如envir = my_custom_env。

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