在循环R

Question

我的列表中有许多数据框，并且有一个带有新列名的向量

nom_colonnes <- c("HEURE","REGIE", "ANTENNE", "MOYEN_DE_DIRECT", "ID_MOYEN", "SRV", "DESTINATION", "INSERT", "CDC_JRI", "REPORTER_INVITES", "LIEU", "ETAT","P_ou_R", "NOTE")
for (i in 1 : nb_files) {
        colnames(get(data_names[[i]])) <- nom_colonnes
}

  

get（data_names [[i]]）中的错误<-*vtmp*：无法解决“ get <-”功能   追溯：

我迷路了...有人可以帮忙吗？非常感谢

Answer 1

一种选择是将数据集与list放在mget中，并与list遍历data.frame s的lapply，设置列名与“ nom_colonnes”

lst1 <- lapply(mget(data_names), setNames, nom_colonnes)

最好将其保存在list中。如果我们想更新原始对象，那么（不推荐）

list2env(lst1, envir = .GlobalEnv)