循环通过每个文件对的函数R

我有多个.txt文件对，看起来像这样：

file1_a.txt
file1_b.txt
file2_a.txt
file2_b.txt

它们包含我想用我创建的函数进一步分析的信息。在脚本中，我需要一起分析每个文件对（通过“file1”和“file2”链接在一起）

如何使用for循环（或apply族）在每个文件对上循环，为每个文件对运行函数

这个问题与发现的问题不太一样，因为我正在寻找使用文件对的方法

在虚拟代码中：

files <- list.files(pattern = "*.txt")

for(file_pairs in files){
  function(file1, file2)
}

---

文件假设文件的命名是一致的，可能类似这样

library(stringr)

files <- c('file1_a.txt', 'file1_b.txt', 'file2_a.txt','file2_b.txt')

unique.files <- unique(gsub('(.+)_[a-z].txt','\\1',files))

my.list <- vector('list',length(unique.files))
for(f in seq_along(unique.files)){
  files.sub <- str_detect(files, unique.files[f])
  files.to.do.stuff <- files[files.sub]
  my.list[[f]] <- files.to.do.stuff
}

my.list
#[[1]]
#[1] "file1_a.txt" "file1_b.txt"
#
#[[2]]
#[1] "file2_a.txt" "file2_b.txt"

库（stringr）
文件你到底在用这些文本文件做什么？我假设您想将它们读入数据帧/表，但这并不完全清楚。当您编写“脚本”时，我希望您的意思是“函数”。如果不是，你需要解决这个问题。请提供一个最小的可复制示例。@TimBiegeleisen基本上，我将其内容导入一个变量（每个文件一个），并通过一个函数运行它们。我想为文件夹中的每个可用文件对执行此操作。