列表-使用lappy重命名特定的data.frames列

我有一个包含10个data.frames的列表，我只需要重命名每个data.frames的一列。要重命名的列是第7列，我想我可以用lapply来完成这个任务

以下是我尝试但未成功的：

lst <- lapply(lst, function(x) colnames(x)[7] <- 'new_name') 

---

lst您需要使用
{}
并返回
x
：

lst <- lapply(lst, function(x) {colnames(x)[7] <- 'new_name'; x}) 

lst
lst <- lapply(lst, function(x) {
  colnames(x)[7] <- 'new_name'
  x      
})

lapply(list(iris, iris), function(x) {colnames(x)[3] <- "test"; x})