将R目录中的所有shapefile读入内存
Read in all shapefiles in a directory in R into memory
我想将目录中的所有 shapefile 读入全局环境但是,当我在工作目录中获得文件列表时,该列表包括 .shp 和 .shp.xml 文件,后者我不想要的。我的代码草稿读取 .shp 和 .shp.xml 文件。我怎样才能阻止它这样做?
草稿代码如下:
图书馆(地图工具)
# get all files with the .shp extension from working directory
setwd("N:/Dropbox/_BonesFirst/139_Transit_Metros_Points_Subset_by_R")
shps <- dir(getwd(), "*.shp")
# the assign function will take the string representing shp
# and turn it into a variable which holds the spatial points data
for (shp in shps) {
cat("now loading", shp, "...", '\n\r')
assign(shp, readOGR(shp))
}
编辑:问题似乎出在 readShapePoints 中。 readOGR(来自 rgdal)或 shapefile(来自栅格)效果更好。
根据您 post 的标题,我相信您想列出当前 directory.You 可能要使用的所有形状文件。
list.files(, pattern="*.shp", full.names=TRUE)
获取所有文件:
# replace with your folder name:
dir <- "c:/files/shpfiles"
ff <- list.files(dir, pattern="\.shp$", full.names=TRUE)
现在阅读它们。 raster::shapefile
最简单。不要使用 readShapefile(过时且不完整)
library(raster)
# first file
shapefile(ff[1])
# all of them into a list
x <- lapply(ff, shapefile)
我想将目录中的所有 shapefile 读入全局环境但是,当我在工作目录中获得文件列表时,该列表包括 .shp 和 .shp.xml 文件,后者我不想要的。我的代码草稿读取 .shp 和 .shp.xml 文件。我怎样才能阻止它这样做?
草稿代码如下:
图书馆(地图工具)
# get all files with the .shp extension from working directory
setwd("N:/Dropbox/_BonesFirst/139_Transit_Metros_Points_Subset_by_R")
shps <- dir(getwd(), "*.shp")
# the assign function will take the string representing shp
# and turn it into a variable which holds the spatial points data
for (shp in shps) {
cat("now loading", shp, "...", '\n\r')
assign(shp, readOGR(shp))
}
编辑:问题似乎出在 readShapePoints 中。 readOGR(来自 rgdal)或 shapefile(来自栅格)效果更好。
根据您 post 的标题,我相信您想列出当前 directory.You 可能要使用的所有形状文件。
list.files(, pattern="*.shp", full.names=TRUE)
获取所有文件:
# replace with your folder name:
dir <- "c:/files/shpfiles"
ff <- list.files(dir, pattern="\.shp$", full.names=TRUE)
现在阅读它们。 raster::shapefile
最简单。不要使用 readShapefile(过时且不完整)
library(raster)
# first file
shapefile(ff[1])
# all of them into a list
x <- lapply(ff, shapefile)