r语言spdep包中nbdists求出的欧式距离明显不符合实际，都太小了

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题，怎么解决？是我搞错了吗？

1. library(rgdal)
   
2. library(sp)         ## 绘制地图
   
3. library(spdep)        ## 空间自相关计算
   
4. library(maptools)
   
5. china_map <- readOGR("H:\\R\\data", "cy2",stringsAsFactors=F,encoding = "UTF-8",verbose=FALSE)# 读取地图空间数据
   
6. #plot一下看看，是一幅中国地图，有重庆，还包括南海的岛屿，ZF数据就是严谨一些：
   
7. plot(china_map)
   
8. ## 提取每个小区域的图心
   
9. map_crd <-coordinates(china_map)
   
10. nbk1 <- knn2nb(knearneigh(china_map, k = 2, longlat = T))
    
11. dlist <- nbdists(nbk1, map_crd[,c(1,2)])#求距离
    
12. max(sapply(dlist, function(x) max(x)))#看最大距离

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：欧式距离 NBD PDE IST BDI library 空间

lijianguo531 发表于 2016-12-16 15:13
如题，怎么解决？是我搞错了吗？

是不是单位不同