数学建模社区-数学中国

标题: 蒙特卡洛算法求圆周率 [打印本页]
作者: 蔡骏鹏lydxz    时间: 2011-8-14 10:51
标题: 蒙特卡洛算法求圆周率
蒙特卡洛算法求圆周率.nb (2.49 KB, 下载次数: 22) http://www.madio.net/forum.php?mod=attachment&aid=OTY4MzN8ZGI5ZmFhNmVmYTQwNTI4MmQzNmU3MjVjN2NiYzQzOWJ8MTc3NTgyMzc0Mw%3D%3D&request=yes&_f=.nb
作者: wotoudoudalea    时间: 2011-11-15 15:20
我要了谢谢你了撒
作者: ldz880508    时间: 2011-12-3 20:56
找了好久呢
作者: 蔡骏鹏lydxz    时间: 2011-12-4 10:38
ldz880508 发表于 2011-12-3 20:56 0 A+ a9 X7 F% i) i1 S
找了好久呢
- u  ~  j2 N- C  O2 |9 Y
这种方法是比较粗略的，计算不精确
作者: ldz880508    时间: 2011-12-4 18:19
蔡骏鹏lydxz 发表于 2011-12-4 10:38
0 B' ]& G( S0 _  u$ G: e. w/ _; `这种方法是比较粗略的，计算不精确
6 y) {3 l8 C; _2 {; k
不精确是应该的吧，蒙特卡罗算法求的就是近似值嘛，我把你的算法稍微改了下写法，嘿嘿。8 U! {, e; e5 t2 J& e, H
Module[
; \9 S1 D- q! X( `! L: L5 @5 J9 f{i,x,y,s,m=0,n=100000},( u1 X7 v& s- y$ q% p
For[i=n,i>0,i--,x=Random[];y=Random[];s=If[x^2+y^2<=1,1,0];m=m+s];4 c: D3 x3 o& n/ U
N[4 m/n]9 k: o. ~+ p& D7 M; g9 Y/ Z
]
作者: 蔡骏鹏lydxz    时间: 2011-12-5 10:20
ldz880508 发表于 2011-12-4 18:19 1 x* {  x1 d( N5 j# O" t
不精确是应该的吧，蒙特卡罗算法求的就是近似值嘛，我把你的算法稍微改了下写法，嘿嘿。* u2 N3 T9 W5 {! ~* M. ]- H& l
Module[
+ J' X; `/ |& V; U! r& T, p5 h- m6 a{i,x, ...

( q$ o! y( _2 s
作者: 变动的永恒    时间: 2014-8-22 20:00
楼主 我要了谢谢你了撒



欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5