如何從所有數據框 [R] 創建唯一列名列表？

Question

我在一個文件夾中有幾十個 csv 文件/數據幀。 許多數據框都有唯一的列名，而列名是亂序的。 我需要重新組織列名，並最終合並所有數據框。 首先，我想在所有數據框中創建一個包含所有唯一列名的列表。 我可以手動完成：

setwd(workingDir)

DRP003667 <- read.csv('DRP003667.csv')
DRP003669 <- read.csv('DRP003669.csv')

DRP003667_ls <- colnames(DRP003667)
DRP003669_ls <- colnames(DRP003669)

myls <- unique(c(DRP003667_ls,DRP003669_ls))

myls
[1] "ID"       "Time"         "Date"         "Length"         "Width"

         

我怎樣才能使它更有效率？

如何打開文件夾中的所有 csv 個文件？ 如何從所有文件中提取列名？

Answer 1

我們可以使用mget從全局環境中創建的 object 名稱中獲取list中的數據集，並使用lapply循環遍歷列表，提取列名， unlist list並獲取unique

unique(unlist(lapply(mget(ls(pattern = "^DRP\\d+")), names))