使用字符串搜索文件夹并在 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))
我正在尝试搜索文件夹并根据字符值导入多层栅格。
如何导入与字符串匹配的文件并保留其名称?
#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))