Question

我正在处理一些地理数据，查看波士顿社区的边界，并试图确定某些建筑许可是针对哪些社区的。

到目前为止，我已经：

使用maptools软件包中的 readshapePoly 读取shapefile并将其转换为纬度和经度的数据框。
将名称与附近的每个边界（布莱顿，唐人街等）相关联。

           long      lat order  hole piece id group                    name
1     -71.12593 42.27201     1 FALSE     1  0   0.1              Roslindale
2     -71.12575 42.27235     2 FALSE     1  0   0.1              Roslindale
3     -71.12566 42.27248     3 FALSE     1  0   0.1              Roslindale
4     -71.12555 42.27258     4 FALSE     1  0   0.1              Roslindale
5     -71.12573 42.27249     5 FALSE     1  0   0.1              Roslindale
6     -71.12638 42.27217     6 FALSE     1  0   0.1              Roslindale
7     -71.12652 42.27210     7 FALSE     1  0   0.1              Roslindale
8     -71.12660 42.27218     8 FALSE     1  0   0.1              Roslindale
9     -71.12666 42.27224     9 FALSE     1  0   0.1              Roslindale
10    -71.12691 42.27210    10 FALSE     1  0   0.1              Roslindale
11    -71.12726 42.27200    11 FALSE     1  0   0.1              Roslindale
12    -71.12740 42.27196    12 FALSE     1  0   0.1              Roslindale

....

为我所有的建筑许可生成了很长的经度和纬度列表-最初不是shapefile，这意味着我不知道是否可以使用“ sf”覆盖这两个集合

Latitude Longitude
      <dbl>     <dbl>
 1     42.3     -71.1
 2      0         0  
 3     42.4     -71.1
 4     42.3     -71.1
 5     42.4     -71.1
 6     42.4     -71.1
 7     42.4     -71.1
 8     42.4     -71.1
 9      0         0  
10     42.4     -71.1

我的问题是我拥有所有这些建筑许可证，但它们没有相关的社区，这是我想要学习的。从概念上讲，我知道我想做这样的事情：

使用步骤1和2中的多边形来确定每个坐标所处的多边形
使用第一步中的标识将多边形“名称”附加到坐标邻域。

Answer 1

这可以使用sf软件包来完成。假设已将点和多边形存储为shapefile，则可以执行以下操作：

library('sf')

polygonSF <- read_sf(dsn = 'polygonShapeFile')
pointSF <- read_sf(dsn = 'pointShapeFile')

st_intersection(pointSF, polygonSF)

如果还没有形状文件，则需要执行一些中间步骤。

例如，假设点（示例中的许可）存储在具有经度和纬度列的数据帧（pointDF）中。您需要将数据框转换为shapefile，然后告诉R对点使用与多边形边界相同的坐标参考系统（CRS）：

pointSF <- st_as_sf(x = pointDF,                         
                    coords = c("longitude", "latitude"),
                    crs = "+init=epsg:4326")
pointSF <- st_transform(pointSF, crs = st_crs(poloygonSF))

我有邻里的shapefile边界。如何确定一个点位于哪个边界？

1 个答案: