R语言批量删除列名内容：使用 %>% 运算符

要批量删除列名中的内容，可以使用 %>% 运算符来连接多个操作。以下是一个示例代码，演示如何使用 %>% 来批量删除列名中的内容：

library(dplyr)

# 创建一个示例数据框
df <- data.frame(
  col1_name = 1:5,
  col2_name = 6:10,
  col3_name = 11:15
)

# 使用%>%运算符批量删除列名中的内容
df <- df %>%
  rename_at(vars(contains('_name')), ~gsub('_name', '', .))

# 输出结果
print(df)

在上述代码中，我们使用 rename_at() 函数和 contains() 函数来选择所有包含 '_name' 的列，然后使用 gsub() 函数来删除列名中的 '_name' 部分。最后，使用 %>% 运算符将两个操作连接起来，并将结果赋值给数据框 df。

输出结果如下：

  col1 col2 col3
1    1    6   11
2    2    7   12
3    3    8   13
4    4    9   14
5    5   10   15

可以看到，列名中的 '_name' 部分已经被成功删除。