应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 物理 » 统计、非线性&软物质 » 如何用fortran编写高斯白噪声程序
71/1返回列表
查看: 3488  |  回复: 6
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

qhz1987

新虫 (初入文坛)

[求助] 如何用fortran编写高斯白噪声程序 已有1人参与

如何用fortran编写高斯白噪声程序，急啊，憋了好久了，因为刚刚接触fortran，所以感觉很困难，希望高手帮助一下，谢谢！
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2011-08-19 10:57:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

qhz1987

新虫 (初入文坛)
能不能解释一下，在激光场中到底怎么加入的白噪声？就是白噪声是怎么加进去的，也可以推荐一些相关的资料，谢谢
赞一下 回复此楼
2楼2011-08-22 19:22:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzkzju

金虫 (初入文坛)

【答案】应助回帖

为什么一定要用Fortran，Matlab不就直接有现成的randn以及wgn等函数产生高斯白噪声么？
赞一下 回复此楼
3楼2011-10-11 19:13:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzkzju

金虫 (初入文坛)
★
nono2009(金币+1): 鼓励交流 2011-10-12 07:18:50
激光场？没听过
不过我们做时程分析时，在原始响应信号里面是可以添加白噪声的，我用的是Matlab，直接用函数awgn就行，不怕麻烦也可以直接算信噪比，然后结合randn添加，当然它们原理是一样的。
赞一下(1人) 回复此楼
4楼2011-10-11 19:16:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

嘎子女

新虫 (初入文坛)
引用回帖:
109052楼: Originally posted by qhz1987 at 2011-08-19 10:57:29
如何用fortran编写高斯白噪声程序，急啊，憋了好久了，因为刚刚接触fortran，所以感觉很困难，希望高手帮助一下，谢谢！

请问楼主知道怎么写程序了吗？ 同求啊·
赞一下 回复此楼
5楼2012-10-14 16:45:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wswrpd

新虫 (初入文坛)

【答案】应助回帖

Integer        ::        NNN=12,        I,j
Real*8        ::        t,        s=0.0,        G=1.0,        Move=0.0

Do j=1,100
s=0.0
        Do I=1,NNN
                call random_number(t)
                s=s+t
        End Do
       
        write(7,*) Move+G*(s-NNN/2.0)
End Do

End


上面是产生100个高斯白噪声的程序
赞一下 回复此楼
6楼2014-04-06 12:45:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xuyubuxiu5

新虫 (初入文坛)
引用回帖:
3楼: Originally posted by xzkzju at 2011-10-11 19:13:14
为什么一定要用Fortran，Matlab不就直接有现成的randn以及wgn等函数产生高斯白噪声么？

原信号文件是Fortran程序运行出的文件，怎么用matlab做，求指教！
赞一下 回复此楼
7楼2014-05-21 11:42:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 qhz1987 的主题更新
71/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 8rmuugja8q 2026-02-22 8/400 2026-02-23 12:22 by alian_214
[基金申请] 体制内长辈说体制内绝大部分一辈子在底层，如同你们一样大部分普通教师忙且收入低 +10 瞬息宇宙 2026-02-20 13/650 2026-02-23 11:23 by holypower
[考研] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +3 khieu8v8m0 2026-02-22 8/400 2026-02-23 09:35 by w4l55oybr1
[论文投稿] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 khieu8v8m0 2026-02-22 8/400 2026-02-23 09:29 by w4l55oybr1
[考研] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +5 usprnugpzw 2026-02-21 11/550 2026-02-23 09:24 by w4l55oybr1
[教师之家] 为什么中国大学工科教授们水了那么多所谓的顶会顶刊，但还是做不出宇树机器人？ +5 欢乐颂叶蓁 2026-02-21 8/400 2026-02-23 09:19 by 欢乐颂叶蓁
[论文投稿] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +3 w89i99eaeh 2026-02-22 5/250 2026-02-23 08:04 by w4l55oybr1
[博后之家] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 khieu8v8m0 2026-02-22 6/300 2026-02-23 07:59 by w4l55oybr1
[博后之家] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +6 3dfhjxgsh7 2026-02-22 9/450 2026-02-23 07:49 by w4l55oybr1
[考博] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 khieu8v8m0 2026-02-22 4/200 2026-02-23 06:46 by jsjzfl
[公派出国] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +3 khieu8v8m0 2026-02-22 5/250 2026-02-23 06:29 by w4l55oybr1
[硕博家园] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 khieu8v8m0 2026-02-22 8/400 2026-02-23 06:24 by w4l55oybr1
[考博] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +5 3dfhjxgsh7 2026-02-22 6/300 2026-02-23 02:04 by 5jlh3qtdvx
[教师之家] 版面费该交吗 +7 苹果在哪里 2026-02-22 8/400 2026-02-22 22:37 by otani
[基金申请] 面上可以超过30页吧？ +4 阿拉贡aragon 2026-02-22 4/200 2026-02-22 21:22 by 山西悬空寺空悬�
[论文投稿] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +4 usprnugpzw 2026-02-21 6/300 2026-02-22 19:48 by w89i99eaeh
[考研] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +3 3dfhjxgsh7 2026-02-22 4/200 2026-02-22 16:52 by khieu8v8m0
[公派出国] 售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急 +3 usprnugpzw 2026-02-21 4/200 2026-02-22 16:27 by khieu8v8m0
[基金申请] 什么是人一生最重要的？ +4 瞬息宇宙 2026-02-21 4/200 2026-02-22 11:44 by huagongfeihu
[基金申请] 今年春晚有几个节目很不错，点赞！ +11 瞬息宇宙 2026-02-16 12/600 2026-02-21 21:14 by lq493392203
信息提示
关闭
请填处理意见
关闭