R 选择特定的形状文件进行输入

我有一个包含各种形状文件的文件夹，如下所示：

• 1965年上海医药大学
• 1967年(120m.shp)
• 1968年上海医药大学
• 1965年上海医药大学
• 1967年(小水电)
• 1968年上海医药大学
• 1965年上海医药大学
• 1967年上海医药大学
• 1968年上海医药大学

（文件夹中的数据要多得多，这只是一个示例）因此我努力找到一种方法，从该文件夹中选择50米的所有形状文件

---

你有什么想法吗？

没有可复制的示例，很难提供完整的解决方案，但是

filenames <- list.files(path=".", pattern="50m.shp", ignore.case = TRUE, recursive = FALSE, include.dirs = FALSE)

---

文件名这似乎是我一直在寻找的，但我不了解的是图层上的输入。。。。假定文件路径是readOGR函数的第一个输入。这是你的脚本适合我的需要和一些更多的细节帮助

input_folder<- "C:/Users/Data_Analysis/R data processing/points_rastervalue"

output_folder<- "C:/Users/Data_Analysis/R data processing/output"

setwd("C:/Users/Data_Analysis/R data processing/points_rastervalue")

shps <- list.files(path=".", pattern="50m.shp", ignore.case = TRUE, recursive = FALSE, include.dirs = FALSE)

for( shp in shps ){
  mySHP <- readOGR('.', layer = ?? )
}

input\u folderIs这是关于根据文件名选择文件的，是否为“50m”？需要如何做到这一点？使用GUI使用choose.files？您需要提供更多上下文。
mySHP要仅打开（例如）列表中的第一个文件，请使用：
mySHP保存输出是否应在循环中使用类似assign/sappy/lappy的函数？（只要我的进一步目标是使用选定的形状文件来制作砖）“制作砖”=合并形状文件？这取决于形状文件是什么。对于点文件，循环中的
rbind（）
将逐一将它们组合在一起，然后在循环后，您将
writeOGR（）
保存组合文件
input_folder<- "C:/Users/Data_Analysis/R data processing/points_rastervalue"

output_folder<- "C:/Users/Data_Analysis/R data processing/output"

setwd("C:/Users/Data_Analysis/R data processing/points_rastervalue")

shps <- list.files(path=".", pattern="50m.shp", ignore.case = TRUE, recursive = FALSE, include.dirs = FALSE)

for( shp in shps ){
  mySHP <- readOGR('.', layer = ?? )
}