R语言中如何批量将数据框整数列转换为字符列？

方法一：用dplyr的across函数（和你原代码风格一致） #

你原来用的是dplyr的mutate，直接用across就能批量处理，不用逐个列名写：

library(dplyr)
Post <- Post %>%
  mutate(across(where(is.integer), as.character))

where(is.integer)会自动识别数据框里所有整数类型的列，as.character就是你要的转换函数，一行代码搞定所有整数列的转换。

方法二：base R原生方法（不用加载额外包） #

如果不想用dplyr，用base R也能实现：

# 先筛选出所有整数列
int_columns <- sapply(Post, is.integer)
# 批量转换这些列
Post[int_columns] <- lapply(Post[int_columns], as.character)

sapply遍历每一列判断是否是整数，得到逻辑向量后，直接对这些列做批量转换。

补充说明 #

如果你的数据里有特殊的整数类型（比如integer64），可以把判断条件改成包含这种类型，比如dplyr里可以写：

Post <- Post %>%
  mutate(across(where(function(x) is.integer(x) || inherits(x, "integer64")), as.character))

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