http://www.sufeinet.com/plugin.php?id=keke_group

苏飞论坛

 找回密码
 马上注册

QQ登录

只需一步,快速开始

分布式系统框架(V2.0) 轻松承载百亿数据,千万流量!讨论专区 - 源码下载 - 官方教程

HttpHelper爬虫框架(V2.7-含.netcore) HttpHelper官方出品,爬虫框架讨论区 - 源码下载 - 在线测试和代码生成

HttpHelper爬虫类(V2.0) 开源的爬虫类,支持多种模式和属性 源码 - 代码生成器 - 讨论区 - 教程- 例子

查看: 3951|回复: 1

[综合] 地图上两点之间的实际直线距离单位M

[复制链接]
发表于 2014-5-5 17:09:00 | 显示全部楼层 |阅读模式
[C#] 纯文本查看 复制代码
#region 【地图上两点之间的实际直线距离单位M】
        /// <summary>
        /// 地球半径米 
        /// </summary>
        private const double EARTH_RADIUS = 6378137.0;
        private static double Rad(double d)
        {
            return d * Math.PI / 180.0;
        }

        /// <summary>
        /// 地图上两点之间的直线距离单位M
        /// </summary>
        /// <param name="lat1">A点经度</param>
        /// <param name="lng1">A点纬度</param>
        /// <param name="lat2">B点经度</param>
        /// <param name="lng2">B点纬度</param>
        /// <returns>两点直线距离</returns>
        /**
         * 1、公式中经纬度均用弧度表示;
         * 2、Lat1 Lng1 分别表示A点经、纬度,Lat2 Lng2 分别表示B点经纬度;
         * 3、a=Lng1 -Lng2 为两点纬度之差 b=Lat1 – Lat2 为两点经度之差;
         * 4、6378.137为地球半径(公里);
         * 返回单位米
         * */
        public static double GetDistance(double lat1, double lng1, double lat2, double lng2)
        {
            double radLat1 = Rad(lat1);
            double radLat2 = Rad(lat2);
            double a = radLat1 - radLat2;
            double b = Rad(lng1) - Rad(lng2);
            double s = 2 * Math.Asin(Math.Sqrt(Math.Pow(Math.Sin(a / 2), 2) +
            Math.Cos(radLat1) * Math.Cos(radLat2) * Math.Pow(Math.Sin(b / 2), 2)));
            s = s * EARTH_RADIUS;
            s = Math.Round(s * 10000) / 10000;
            return s;
        }
        #endregion


1. 开通SVIP会员,免费下载本站所有源码,不限次数据,不限时间
2. 加官方QQ群,加官方微信群获取更多资源和帮助
3. 找站长苏飞做网站、商城、CRM、小程序、App、爬虫相关、项目外包等点这里
发表于 2014-5-5 17:33:04 | 显示全部楼层
我只是路过看看的。
您需要登录后才可以回帖 登录 | 马上注册

本版积分规则

QQ|手机版|小黑屋|手机版|联系我们|关于我们|广告合作|苏飞论坛 ( 豫ICP备18043678号-2)

GMT+8, 2024-12-19 12:19

© 2014-2021

快速回复 返回顶部 返回列表