我需要覆盖超过100,000个多边形的40,000个点。多边形使用:
创建polygon <- gBuffer(pc, width=500, byid=TRUE)
使用以下方式创建叠加层:
test <- over(pts, polygon)
因此,我有一个数据框,其中每个多边形中的点属性(均值)。我的问题是有可能cbind()多边形的gps坐标(质心)到我的数据框?
我已经查看了google和stackoverflow,但我没有找到关于该主题的任何内容。解决方案可能很简单,但我无法看到它:)
任何帮助将不胜感激!
谢谢你 马丁修改: 那么如果我想选择那些多边形呢? 有(一个或多个)点。我用了
test <- over(polygons, pts, returnList = TRUE)
如何将多边形的坐标绑定到数据框列表(每个对应一个多边形)。我需要这些信息。作为列表,因为我需要计算距离驱动。 谢谢 微米。
答案 0 :(得分:3)
在您的示例中,var permission = 0;
setInterval(function() {size()}, 5000);
function size(){
if (permission == true){
if (turn == 0){
$(document).ready(function(){
$('img#me').css('transform', 'rotateX(360deg)');
turn = 1;
});
}
else{
$(document).ready(function(){
$('img#contact').css('transform', 'rotateY(360deg)');
turn = 0;
});
}
}
不是test
,而是具有data.frame
中每个点的多边形索引的向量。尝试
pts
这会将pts$polygon_id = over(pts, polygon)
对象从pts
对象提升为SpatialPoints
。