空间权重矩阵的那些事(八)-球面距离权重矩阵

前段时间有人向我咨询了根据经纬度计算球面距离的方法,希望我出一篇文章,所以就有了这篇文章。必要文件可通过后台回复地理经纬度获取。

我首先想到的是matlab的jplv7工具箱里的distance函数,下面是具体的程序内容:

function D = distance(xc,yc)
% PURPOSE: Computes the list of pairwise distances for a given set of locations (loc).
% ----------------------------------------------------------
% Usage: D = distance(xc,yc)
% where: xc,yc are vectors of latt-long coordinates for each location
% ----------------------------------------------------------
% Returns: D = (n x n)-matrix of pairwise distances

% Written by: TONY E. SMITH, 2/10/98

n = length(xc) ;  %number of locations
% Start procedure.
X = xc ; %column vector
Y = yc ; %column vector
U = ones(n,1) ; %column vector
XX = X*U' - U*X' ;
YY = Y*U' - U*Y' ;
D = (XX.^2 + YY.^2) ;

根据程序内容,距离计算公式是:
D=\,\,\left( x1-x2 \right) ^2+\left( y1-y2 \right) ^2

其中,(x1, y1) 是点 A 的坐标,(x2, y2) 是点 B 的坐标。这明显不是球面距离。实际上,如果经纬度数据如果是未投影的数据(即空间坐标,单位为 °),经过上面的函数计算得到的距离仍然不是地理矩阵,因为其单位不是 m 或者 km 等距离单位。使用该函数时需要特别注意!总之,只有平面坐标通过上面的函数计算的结果还是真实的地理距离。

通过查找资料,发现matlab本身就存在可以计算球面距离的函数,而且函数名也是distance。这样,如果在matlab中已经导入了jplv7包的情况下再想使用matlab自带的distance函数,就可能存在冲突。解决方法是,调正函数的优先级。具体操作是:主页 > 设置路径,选中jplv7的所有路径,点击移至底端保存

image

这样再使用distance函数时,系统就会自动调用matlab本身的函数,而不是jplv7下的distance函数。

具体的计算原理:

image

图中,空间坐标系 A(x1, y1), B(x2, y2),我们需要计算的球面距离为弧长\hat{AB}。可以通过公式:半径 × \angle \text{AOB} 来完成。地球赤道半径 6378.140km,地球极地半径 6356.755km 。那么,现在面临的问题就是 \angle \text{AOB} 的计算了。

matlab本身自带的distance函数就可以解决这个问题。这里,取赤道半径6378.1km,下面展示计算过程:

>> D = distance(23.0, 101.1, 23.06, 113.34)

D =

   11.2613

>> 11.2613/180*pi*6378.1

ans =

  1.2536e+003

或者

>> D = distance(23.0, 101.1, 23.06, 113.34, 6378.1)

D =

   1.2536e+03

可以看到。两种方式计算的结果是一致的。

下面,我们将演示怎样用matlab自带的这个函数进行空间权重矩阵的构建。首先,使用ArcGis导出地理坐标系下的经纬度数据(单位为 °),排好序后以列向量的格式导入matlab。具体过程不再演示,相关经纬度数据可通过后台回复地理经纬度获取,下面直接贴出代码内容:

% 球面距离空间权重矩阵
E = zeros(33, 33);
for i = 1:32;
    for j = 1 + i:33;
        E(i, j) = E(i, j) + distance(X(i), Y(i), X(j), Y(j), 6378.1);
    end;
end;
wd= E + E';

下面给出了,基于赤道半径的球面距离和欧几里得距离法下的空间权重矩阵(这两份数据也已上传到百度云,回复可获得)的部分结果:

球面距离空间权重矩阵


欧几里得距离空间权重矩阵

可见,两者存在一定差距。毕竟,地球并不是标准的球体,以赤道半径作为地球半径本身存在一定误差。所以,在没有特殊要求的情况下,还是建议使用投影后的平面坐标来计算地理距离。






往期回顾

  1. R中空间权重矩阵的处理
  2. 使用R进行地图可视化
  3. 使用QGIS进行地图可视化
  4. 南海九段线可以这样处理
  5. Stata 绘图也可以很好看
image
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 214,377评论 6 496
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 91,390评论 3 389
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 159,967评论 0 349
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 57,344评论 1 288
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 66,441评论 6 386
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 50,492评论 1 292
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 39,497评论 3 412
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 38,274评论 0 269
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 44,732评论 1 307
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 37,008评论 2 328
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 39,184评论 1 342
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 34,837评论 4 337
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 40,520评论 3 322
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 31,156评论 0 21
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 32,407评论 1 268
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 47,056评论 2 365
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 44,074评论 2 352

推荐阅读更多精彩内容