更改列表数据框中的向量名称

Question

我有一个包含9个数据框的列表

Year  Total Counts   Total Overshoot
2015    80               50
2016    100              60
2017    120              70

我想在列表的所有数据框中将Total Counts的名称更改为TotalCounts，将Total Overshoot的名称更改为TotalOvershoot（删除空格）。我怎样才能做到这一点？

Answer 1

我们可以在rename和list之间循环使用map

library(tidyverse)
map(lst1, ~ .x %>%
               rename(TotalCounts = "Total Counts"))

Answer 2

也（如果要更改的名称始终排在第二位）：

lapply(my_list, function(x){
  colnames(x)[2] <- gsub(" ","", colnames(x)[2])
  x
} 

Answer 3

具有基数R和setNames的解决方案：

lapply(mylist,
       function(x) setNames(x, replace(names(x), names(x) == "Total Counts", "TotalCounts")))