登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

阿弥陀佛

街树飘影未见尘 潭月潜水了无声 般若观照心空静...

 
 
 

日志

 
 
关于我

一直从事气象预报、服务建模实践应用。 注重气象物理场、实况场、地理信息、本体知识库、分布式气象内容管理系统建立。 对Barnes客观分析, 小波,计算神经网络、信任传播、贝叶斯推理、专家系统、网络本体语言有一定体会。 一直使用Java、Delphi、Prolog、SQL编程。

计算两点间间距的平方  

2014-08-02 09:54:41|  分类: Scala |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
  import Math.{cos,  PI,sqrt,abs }
  def deg2km_Distance(lon1: Double, lat1: Double, lon2: Double, lat2: Double) = {
    val dAvgLat = (lat1 + lat2) / 2.0 * PI / 180.0
    val dKmx = abs(lon2 - lon1) / 1000.0 * ((111415.1 * cos(dAvgLat)) - (94.54999 * cos(3.0 * dAvgLat)) - (0.12 * cos(5.0d * dAvgLat)))
    val dKmy = abs(lat2 - lat1) / 1000.0 * (111132.1 - (566.05 * cos(2.0d * dAvgLat)) + (1.2 * cos(4.0d * dAvgLat)) - (0.003d * cos(6.0d * dAvgLat)))
    (dKmx,dKmy)
  }
  def sqr(x: Double) = x * x
  def get_r2(lon1: Double, lat1: Double, lon2: Double, lat2: Double) = {
    val dist_km = deg2km_Distance(lon1,lat1,lon2,lat2)
    sqr(dist_km._1) + sqr(dist_km._2)
  }
  评论这张
 
阅读(410)| 评论(0)

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018