r - 如何在我的数据框中将所有数字列转换为字符类型？

Question

我想做一些比

更有效率的事情

dataframe$col <- as.character(dataframe$col)

因为我有很多数字列。

Answer 1

在 base R 中，我们可以使用以下之一，即遍历所有列，创建一个 if/else 条件来更改它

dataframe[] <- lapply(dataframe, function(x) if(is.numeric(x)) 
           as.character(x) else x)

或者为数字列创建索引并仅在这些列上循环并分配

i1 <- sapply(dataframe, is.numeric)
dataframe[i1] <- lapply(dataframe[i1], as.character)

---

dplyr

可能更灵活

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