使用字符串搜索文件夹并在 R 中导入文件

Use string to search folder and import file in R

我正在尝试搜索文件夹并根据字符值导入多层栅格。

如何导入与字符串匹配的文件并保留其名称?

#use shp and y to find orthos
ortho <- crop(MrSID_shp, y)
s <- ortho[[2]] 
s
#"3_5" "2_5"

#use s values to search folder with corresponding name
file.is <- Sys.glob("*.tif")
print(file.is) # "0_0.tif" "2_5.tif" "3_5.tif"

for (i in seq_along(file.is)){
file.is[[i]] <- stack(file = file.is[i],
                      pattern = s,)
}
#this results in empty values 

我尝试过 grep、find 和 lapply 但都没有成功。我已经能够使用 's' 的模式导入“3_5.tif”,但我需要导入所有匹配的文件,而不仅仅是一个。

谢谢

以下适用于您的示例(我手动创建了 file.is,您希望在其中使用 Sys.glob("*.tif")):

s <- c("2_5", "3_5")
file.is <- c("0_0.tif", "2_5.tif", "3_5.tif")

unique(sapply(s, grep, file.is, value = TRUE))