24小时热门版块排行榜

>论坛更新日志 (2507)
>虫友互识 (134)
>导师招生 (69)
>文献求助 (50)
>休闲灌水 (46)
>硕博家园 (40)
>考研 (25)
>考博 (22)
>博后之家 (17)
>基金申请 (17)
>论文投稿 (17)
>论文道贺祈福 (16)
>找工作 (15)
>教师之家 (13)
>公派出国 (13)
>金属 (4)

返回列表

当前主题已经存档。

xyz007

金虫 (小有名气)

应助: 0 (幼儿园)
金币: 771.8
红花: 1
帖子: 167
在线: 9.6小时
虫号: 578768
注册: 2008-07-04
专业: 凝聚态物性 II ：电子结构

[交流] 【求助】【求助】伪随机向量程序C代码

要求代码是空间向量的随机分布，向量固定在原点，大小不变，方向可以随机变化，随着点数的增多，可以组成一个球面

回复此楼

» 猜你喜欢

1楼 2009-05-02 10:03:19

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

panjunxing

木虫 (著名写手)

小学生

应助: 0 (幼儿园)
金币: 2994.8
散金: 948
红花: 2
帖子: 1103
在线: 69.8小时
虫号: 579223
注册: 2008-07-04
性别: MM
专业: 高分子组装与超分子结构

★ ★ ★ ★ ★ ★
xyz007(金币+6,VIP+0):感谢回复！ 5-5 10:35

c语言不太熟悉，这里有一个F程序，希望对你有帮助：
subroutine init2()
use base
integer::i
real::ra
do i=1,NL
ra=ran2(2469) r_old(i,1)=ra*N
ra=ran2(123)
r_old(i,2)=ra*N
ra=ran2(456)
angle_old(i)=PI*ra

end do
end subroutine

赞一下(1人)

回复此楼

人生旅途，可以休息，但别忘记奔跑

2楼2009-05-05 10:33:16

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 xyz007 的主题更新

返回列表