{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }1 0 0 0 8 4 0 0 0 0 0 0 -1 0 }} {SECT 0 {SECT 0 {PARA 3 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(stats):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 101 "# By changing the seed value, you can get different \+ simulations\n# Try seed:=6 for example\nseed:=200: " }{MPLTEXT 1 0 32 "u:=stats[random, uniform](9999):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 112 "t[0]:=0:\nfor i from 1 by 1 while i < 10000 do \n \+ x[i]:=i: \n y[i]:=2*round(u[i])-1:\n t[i]:=t[i-1]+y[i]:\nod:\n" }} }}{PARA 3 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "with(plots):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "listp lot([seq([i,t[i]],i=0..9999)] );\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "# There probably is a more efficient way to simulate \+ this - I'm not a MAPLE expert" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }