主页 / coding / 问题 / 79032885
Accepted
farrow90
Asked: 2024-09-28 05:00:33 +0800 CST

找出不同文件中哪些列相同

  • 772

我在全局环境中的 R 中有一个数据框：

file_1 <- data.frame(A = 1:5, B = 6:10, C = 11:15)
file_2 <- data.frame(A = 1:5, D = 16:20, E = 21:25)
file_3 <- data.frame(B = 6:10, C = 11:15, F = 26:30)

我想制作一个矩阵来帮助我了解哪些列名在所有数据框中是通用的，哪些不是。

我尝试手动完成此操作：

for (file in files) {
  data <- get(file)
  column_names[[file]] <- colnames(data)
}

all_columns <- unique(unlist(column_names))
matrix <- sapply(column_names, function(cols) all_columns %in% cols)
rownames(matrix) <- all_columns

matrix_df <- as.data.frame(matrix)

print(matrix_df)

这是在 R 中执行此操作的正确方法吗？

顺便说一句，如果它们在列表中，我认为我们可以这样做：

all_columns <- unique(unlist(lapply(mylist, colnames)))

matrix <- sapply(mylist, function(df) all_columns %in% colnames(df))
rownames(matrix) <- all_columns

matrix_df <- as.data.frame(matrix)

print(matrix_df)

1 个回答

  1. Best Answer

    你是指像下面这样的矩阵吗？

    > table(stack(lapply(mget(ls(pattern = "file_")), names)))
      ind
values file_1 file_2 file_3
     A      1      1      0
     B      1      0      1
     C      1      0      1
     D      0      1      0
     E      0      1      0
     F      0      0      1
    • 4

相关问题