使用坐标R查找网格块编号

时间:2017-05-05 10:45:24

标签: r geospatial

我正在尝试找到提供的坐标的网格块编号(MeshblockN)。所以我有两个数据集。 1.具有唯一ID和坐标的数据集A. 2.具有网格块编号和其他详细信息的形状文件 - 数据集B。

到目前为止,我使用readOGR()函数将形状文件 - 数据集B加载到R中。并加载了具有lat和long的数据集A.然后将coordinates()函数应用于数据集A.现在我有pts.poly <- point.in.poly(A,B)所需的两个输入。但是我收到了这个错误 -

Error in data.frame(z@data, stats::na.omit(sp::over(pts, polys))) : 
  arguments imply differing number of rows: 1, 0

> head(A@data)
  row_names unique_id
1         1    2837061
> head(A@coords)
  longitude  latitude
1  170.5065 -45.86696

> head(B@data, n = 1)
   Meshblock MeshblockN AreaUnitCo AreaUnitNa      
0 MB 0352700    0352700     510402    Chelsea  



 > head(B@polygons, n = 1)
[[1]]
An object of class "Polygons"
Slot "Polygons":
[[1]]
An object of class "Polygon"
Slot "labpt":
[1] 174.72094 -36.82045

Slot "area":
[1] 2.858646e-05

Slot "hole":
[1] FALSE

Slot "ringDir":
[1] 1

Slot "coords":
           [,1]      [,2]
  [1,] 174.7181 -36.81820
  [2,] 174.7184 -36.81831
  [3,] 174.7188 -36.81824
  .
  .
[500,] 174.7241 -36.82205
 [ reached getOption("max.print") -- omitted 363 rows ]



Slot "plotOrder":
[1] 1

Slot "labpt":
[1] 174.72094 -36.82045

Slot "ID":
[1] "0"

Slot "area":
[1] 2.858646e-05

任何人都可以帮我继续吗?不知道这有什么不对。

1 个答案:

答案 0 :(得分:0)

由于到目前为止没有人回答这个问题,我正在更新我自己的版本,我使用sp包中的over函数解决了它。 over(A,B)