如何将函数应用于tidyverse中的colnames

就像在标题中一样：是否有任何函数允许将另一个函数应用于

数据框的列名

？我的意思是类似于

forcats:：fct_relabel

的东西，它将一些函数应用于因子标签

举个例子，我有一个

data.frame

，如下所示：

X<-data.frame(
   firababst = c(1,1,1),
   secababond = c(2,2,2),
   thiababrd = c(3,3,3)
 )  

X
  firababst secababond thiababrd
1         1          2         3
2         1          2         3
3         1          2         3

你能建议一些更为激进的方法吗？理想情况下，类似于：

X %>% 
   magic_foo(str_remove, 'abab')

你可以做：

X %>%
 rename_all(~ str_remove(., "abab"))

  first second third
1     1      2     3
2     1      2     3
3     1      2     3

---

使用

base R

，我们可以

names(X) <- sub("abab", "", names(X))

---

names（X）OMG！很容易！甚至
X%>%rename\u all（str\u remove，'abab'）
！是的，即使这是一个选项：）
names(X) <- sub("abab", "", names(X))