首页 > 解决方案 > 重命名多个数据集中的列 R

问题描述

我有一堆数据集,我想将重命名函数应用于所有列。我已经构建了该函数,并达到了我有一个带有重命名列的数据框列表的地步,但我一直坚持如何将这些数据框重新分配回原始数据框。有人可以在最后一步帮助我或建议更简单的方法吗?

A = data.frame(Var 1 = c(1,2,3,4), Var 2 = c(1,2,3,4))
B = data.frame(Var 3 = c(1,3,4,7), Var 4 = c(1,2,3,4))

better_names <- function(x) {
    names(x) <- names(x) %>% stringr::str_replace_all("\\s","_") %>% tolower
    return(x)
}

list_data <- list(A, B)
l <- lapply(list_data, better_names)

标签: rstringrnames

解决方案


我们可以命名输出list,然后用于list2env更改全局环境中存在的对象(虽然不推荐)

names(l) <- c('A', 'B')
list2env(l, .GlobalEnv)

- 检查对象

A
#  var_1 var_2
#1     1     1
#2     2     2
#3     3     3
#4     4     4

B
#  var_3 var_4
#1     1     1
#2     3     2
#3     4     3
#4     7     4

数据

A <- data.frame(`Var 1` = c(1,2,3,4), `Var 2` = c(1,2,3,4), check.names = FALSE)
B <- data.frame(`Var 3` = c(1,3,4,7), `Var 4` = c(1,2,3,4), check.names = FALSE)

推荐阅读