24小时热门版块排行榜    

查看: 878  |  回复: 3

nirvana_fwl

新虫 (初入文坛)

[求助] 求助编程序,算雷击大地密度,用网格法。

求热心人帮忙,我需要计算地闪密度。把一片区域分割成经纬度为0.1*0.1的网格,然后判断每次闪电是否发生在这个网格里,如果是,就把发生在这个网格里的闪电次数累加起来,再除以面积,就得到每一个网格的地闪密度。我需要用程序实现它,求大神们帮帮我,不甚感激啊!毕业论文用的。
感觉我好像没讲清楚,我的算法和下面我从一篇文献里的算法基本一样,如下:
  格子的中心位置为评估点所在经纬度。每个格子边长为3km,每边共有9 个格子。算法具体步骤如下:
评估点附近网格分布图:网格是9*9的网格
(1)在程序中声明4个二维数组:①ArrayNg,②ArrayAvgLigCurt,③ArrayBoxsLng,④Array-BoxsLat。分别用来存放图1中每个格子的①Ng值,②雷电流平均强度,③格子中心点经度,④格子中心点纬度。
(2)已知用户输入的评估点经纬度,而且根据地球上任意两点的经纬度又可以得到两点间距离。计算公式如下:
d(x1,y1,x2,y2)=rarccos[sin(x1)sin(x2)+cos(x1)cos(x2)cos(y1-y2)]
其中:x1,y1是纬度、经度的弧度单位,r 为地球半径。
据此,可以经过计算得出每个格子的经纬度范围,ArrayBoxsLng,ArrayBoxsLat能够通过循环成功赋值。
(3)逐行读取经过处理的闪电定位系统(LLS)数据,取闪电的经纬度存入局部变量lngTmp、latTmp。
使用if语句判断该行闪电定位数据是否属于图1中所示9×9=81个格子。如果属于,则ArrayNg数组中第i行j列格子数据执行自加运算(ArrayNg[i,j]++;);同时,地闪强度也累加(ArrayAvgLigCurt[i,j]+= LightningCurrent;)。
(4)对数据源循环一遍后,使用for循环语句重新对81个格子进行循环赋值。使用公式为:平均电流强度= 总电流强度/闪击次数
                     Ng = 总地闪次数/资料年数/格子面积
经过以上4步,即可得出每个格子的Ng值和雷
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
xzhdty: 金币+1, 感谢参与谢谢骠骑将军 2013-05-15 22:52:50
ben_ladeng: 专家考核 2013-05-16 13:22:05
nirvana_fwl: 金币+6, ★有帮助 2013-05-21 13:24:44
你看的论文挺早的吧,看起来像纯c程序,这个设计很不OOP,
c++的做法是弄一个类叫Point,保存经纬度信息,2个属性,加一个方法计算距离
再弄一个类叫Grid,保存Ng,雷电强度,与一个Point变量(中心经纬度),加一个方法地闪加1
不过看你的描述,感觉格子光保存中心点经纬度不够方便,因为有宽度,虽然每次可以计算,但是由于格子一旦初始化完成就固定了,最好还是把每个格子的经纬度范围保存起来作为Grid的属性,用[x,y,w,h]这种顶点宽高法也行,用[x1,y1,x2,y2]这种两点法也行

这样程序就只需要用一个Gfid的二维数组来保存,9*9
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
2楼2013-05-15 21:59:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

nirvana_fwl

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by libralibra at 2013-05-15 21:59:54
你看的论文挺早的吧,看起来像纯c程序,这个设计很不OOP,
c++的做法是弄一个类叫Point,保存经纬度信息,2个属性,加一个方法计算距离
再弄一个类叫Grid,保存Ng,雷电强度,与一个Point变量(中心经纬度),加一个方法地闪加 ...

首先谢谢大神!我现在想做的是以经纬度画0.1*0.1的格子,每个格子的中心点为评估点,计算每个格子的Ng,请问你能可以编出程序来吗?我是初学者,什么都不懂,毕业论文老师让写这个,一点不会,急啊!!
3楼2013-05-16 13:29:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

deephill

铁杆木虫 (职业作家)

没有看懂
4楼2013-05-16 17:52:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 nirvana_fwl 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 某top大学教授说“能够在市场中兑现的能力才是真能力”无比同意! +10 zju2000 2026-09-26 13/650 2026-09-30 10:26 by yexuqing
[博后之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 IDs3scOF0tjC 2026-09-28 4/200 2026-09-29 19:27 by cqwQDCxMcL3I
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 ZYXdhzDAy9ZX 2026-09-28 4/200 2026-09-29 16:54 by yCO1Ll7aHtsw
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 ZYXdhzDAy9ZX 2026-09-28 4/200 2026-09-29 16:37 by etmYJ6d2rquH
[博后之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 ZYXdhzDAy9ZX 2026-09-28 3/150 2026-09-29 16:30 by etmYJ6d2rquH
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 ZYXdhzDAy9ZX 2026-09-28 3/150 2026-09-29 16:03 by etmYJ6d2rquH
[论文投稿] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +4 tqUTOxClQUMF 2026-09-28 4/200 2026-09-29 15:15 by etmYJ6d2rquH
[博后之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 tqUTOxClQUMF 2026-09-28 3/150 2026-09-29 15:04 by etmYJ6d2rquH
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 tqUTOxClQUMF 2026-09-28 3/150 2026-09-29 14:58 by etmYJ6d2rquH
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 GDBe8tDZqE8z 2026-09-28 3/150 2026-09-29 14:30 by etmYJ6d2rquH
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 CfXuS1rDhLYN 2026-09-28 3/150 2026-09-29 14:24 by etmYJ6d2rquH
[博后之家] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 IDs3scOF0tjC 2026-09-28 3/150 2026-09-29 13:56 by etmYJ6d2rquH
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 tqUTOxClQUMF 2026-09-28 3/150 2026-09-29 09:59 by JzYBbHIXWSrW
[找工作] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 ZYXdhzDAy9ZX 2026-09-28 3/150 2026-09-29 06:28 by ZvyPK8n6Nfki
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 tqUTOxClQUMF 2026-09-28 3/150 2026-09-28 23:46 by b8fCuTHqckEt
[考研] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 GDBe8tDZqE8z 2026-09-28 3/150 2026-09-28 23:12 by b8fCuTHqckEt
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 CfXuS1rDhLYN 2026-09-28 4/200 2026-09-28 22:55 by ez6fGg9abYaj
[找工作] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 IDs3scOF0tjC 2026-09-28 5/250 2026-09-28 22:32 by ez6fGg9abYaj
[论文投稿] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 CfXuS1rDhLYN 2026-09-28 3/150 2026-09-28 19:08 by 9lS3ad5oOymn
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 IDs3scOF0tjC 2026-09-28 4/200 2026-09-28 18:51 by 9lS3ad5oOymn
信息提示
请填处理意见