Monte Carlo methods: Difference between revisions
add RPL
m (correct percent versus ratio) |
(add RPL) |
||
Line 2,688:
monteCarlo(10000) = 3.00320000
monteCarlo(100000) = 2.99536000
</pre>
=={{header|RPL}}==
≪ 0 1 3 PICK '''START'''
RAND SQ RAND SQ '''IF''' + 1 < '''THEN''' 1 + '''END NEXT'''
SWAP / 4 *
≫ ''''MCARL'''' STO
100 '''MCARL'''
10000 '''MCARL'''
10000 '''MCARL'''
500000 '''MCARL'''
{{out}}
<pre>
4: 3.16
3: 3.166
2: 3.1228
1: 3.143712
</pre>
|