list.files（）用于从目录中的某些文件夹中获取文件

Question

我有一个包含许多子文件夹的文件夹，我希望从某些文件夹中提取所有CEL文件。 我有一个要从中获取文件的文件夹名称列表，但是我不确定在该代码中可以调用该列表的位置

chems =  read.csv("Unique_Chemicals.csv")

其中包含我要从中获取CEL文件的文件夹名称 阿卡波糖。大鼠。活体。肝脏。重复

allCELPaths = list.files(pattern = ".CEL$", path = getwd(),
                         recursive = TRUE, full.names = TRUE)

我拥有的代码将从所有化学品中获取所有CEL文件路径 我大约有140个文件夹，我只想获取其中77个文件夹的路径

Answer 1

这样的事情可能会为您带来想要的东西。

dirs <- paste0(getwd(), "/", chems)
allCELPaths = list.files(pattern = ".CEL$", path = dirs , full.names = TRUE)