如何修改dplyr与stringr代码实现数据框列批量重命名？

嘿，我猜你大概率是在结合dplyr和stringr重命名列时，没把字符串处理逻辑正确传递给重命名函数？毕竟这是新手常踩的坑！我给你梳理几个常见场景的正确写法，你可以对照着调整自己的代码：

1. 先明确版本差异： #

新版dplyr（1.0.0及以上）推荐用rename_with()替代旧版的rename_all()/rename_at()，我会同时给出新旧版写法，你根据自己的包版本选就行。

常见重命名场景示例 #

假设你的原始数据框叫df，以下是不同目标的实现代码：

场景A：把所有列名转为小写

library(dplyr)
library(stringr)

# 新版dplyr写法
df_renamed <- df %>%
  rename_with(str_to_lower)  # 直接传stringr的函数即可

# 旧版dplyr写法
df_renamed <- df %>%
  rename_all(str_to_lower)

场景B：替换列名里的特定字符（比如把空格换成下划线）

这里要注意必须用公式语法~，才能把每个列名作为参数传给stringr函数：

# 新版写法
df_renamed <- df %>%
  rename_with(~ str_replace_all(., " ", "_"))  # . 代表当前列名

# 旧版写法
df_renamed <- df %>%
  rename_all(~ str_replace_all(., " ", "_"))

场景C：移除列名的前缀/后缀（比如去掉data_前缀）

# 新版写法
df_renamed <- df %>%
  rename_with(~ str_remove(., "^data_"))  # ^ 匹配字符串开头

# 旧版写法
df_renamed <- df %>%
  rename_all(~ str_remove(., "^data_"))

最容易踩的坑： #

很多人会忘记加~，直接写rename_with(str_replace_all, " ", "_")，这会报错或者达不到预期——因为rename_with需要你定义一个处理单个列名的函数，公式语法~就是用来创建这个匿名函数的，.代表当前遍历到的列名。

如果你的目标输出是更复杂的规则（比如把列名按特定格式重命名），可以把原列名和预期列名的例子贴出来，我再帮你精准调整代码~

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