全部版块 我的主页
论坛 经济学论坛 三区 区域经济学
6248 9
2016-12-07
##读取含有地名、经纬度的excel文件
city_wmat <- read.table("clipboard",header=TRUE)
genW <- function (coords, labels)
   {
    W <- as.matrix(dist(coords))
    colnames(W) <- labels
    rownames(W) <- labels
    W[which(W == Inf)] <- 0
    return(W)
    }
##注意这时的距离单位是:百公里
##距离倒数
genW <- function (coords, labels)
    {
    W <- 1/ as.matrix(dist(coords))
    colnames(W) <- labels
    rownames(W) <- labels
    W[which(W == Inf)] <- 0
    return(W)
    }

wmat <- genW(cbind(city_wmat$weidu,city_wmat$jingdu),city_wmat$cityname)


附件列表
二维码

扫码加我 拉你入群

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

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

全部回复
2017-3-4 12:35:26
你好,请问楼主城市的经纬度取得是城市几何中心的点还是市ZF所在地?
二维码

扫码加我 拉你入群

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

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

2017-3-21 21:53:40
感谢楼主,正在做空间计量,快晕了,顺便想请问楼主,有关于经济距离权重矩阵的资料吗?
二维码

扫码加我 拉你入群

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

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

2017-3-24 08:31:47
学习一下
二维码

扫码加我 拉你入群

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

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

2017-7-5 20:35:52
感谢楼主分享的资料,地级市经纬度有些不准
二维码

扫码加我 拉你入群

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

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

2020-2-1 21:58:01
直接用dist函数不对吧,假如用经纬度的话
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群