用R生成地级市经纬度空间权重矩阵的代码

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

##读取含有地名、经纬度的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)

扫码加我 拉你入群

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

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

分享0 收藏12 回帖

关键词：空间权重矩阵 空间权重 权重矩阵 地级市 经纬度 经纬度 空间

你好，请问楼主城市的经纬度取得是城市几何中心的点还是市ZF所在地？

感谢楼主，正在做空间计量，快晕了，顺便想请问楼主，有关于经济距离权重矩阵的资料吗？

学习一下

感谢楼主分享的资料，地级市经纬度有些不准

直接用dist函数不对吧，假如用经纬度的话

请问您的经纬度的数据来自哪

佳木上羽 发表于 2017-3-21 21:53
感谢楼主，正在做空间计量，快晕了，顺便想请问楼主，有关于经济距离权重矩阵的资料吗？

请问经济权重的您做出来了吗？

最后一句一直出错怎么解决呢

橘味仙女 发表于 2021-5-17 16:05
最后一句一直出错怎么解决呢

你好 请问你解决了吗 我也遇到了这个问题