在R中编写循环以从多个csv文件中提取特定列和行

我在R工作室工作，我有多个小的csv文件（大约500个），我只需要这些列中的三列，只有两行。我可以创建一个循环或一系列循环，首先提取我需要的列，然后提取行（反之亦然），并写入一个新的csv文件吗？有没有办法维护文件名以便我知道哪些数据集来自何处

---

我阅读了我能找到的内容，并试图拼凑一个脚本，但似乎没有任何东西能满足我的需要。

我们可以将数据集读入

列表，创建行索引和列索引，以便根据行-列索引进行提取

files <- list.files('/path/to/your/directory', full.names = TRUE,
        pattern = '\\.csv$')
# // change accordingly
rind <- c(3, 4)
cind <- c(22, 134)
out_lst <- lapply(files, function(x) read.csv(x)[rind, cind])

文件我建议您阅读，如果您创建一个小的可复制示例以及预期的输出，那么会更容易获得帮助。了解。