将目录中的文件名称与数据框列中的名称匹配 - 将匹配的行粘贴为匹配文件中的列

Question

我在一个文件夹中有 100 个 files.txt。

这些 filenames.txt 以相同的方式写入 R 数据帧的 column1 行。

files.txt 小于数据框 column1 行！这意味着不是 column1 的所有行都会匹配！

我想做什么：

如果文件名与 column1 名称匹配，则在同一行（R 数据框）插入第 2 列和第 3 列的名称，这作为 file.txt 中的列。

示例

Name   Family  Subfamily
marc    A        B
Jaco    C        D

marc.txt   
Jaco.txt 

包含新列系列和子系列的输出 files.txt。

marc.txt

column1 column2 .....  Family Subfamily 
.....   ......  .....    A     B
.....    .....  .....    A     B
.....    .....  ......   A     B

jaco.txt

column1 column2 .....  Family Subfamily 
.....   ......  .....    C     D
.....    .....  .....    C     D
.....    .....   ....    C     D

Answer 1

编辑：创建检查文件是否存在

这样的事情应该可以工作：

df1 <- data.frame(Name = c("marc", "Jaco"),
                  Family = c("A.", "C"),
                  Subfamily = c("B", "D"))

files <- list.files(pattern = ".txt")
for (i in 1:nrow(df1)) {
  if (!paste0(df1[i,1], ".txt") %in% files) {
    next()
  }
  dfi <- read.csv(paste0(df1[i,1], ".txt"))
  dfi <- cbind(dfi, df1[i,-1])
  write.csv(dfi, paste0(df1[i,1], ".txt"))
}

只需要替换表名