{VERSION 5 0 "APPLE_PPC_MAC" "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 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 132 "with(stats):\n### W ARNING: persistent store makes one-argument readlib obsolete\nseed := \+ readlib(randomize)():\nrandomize(abs(seed))():" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 9 "n := 100;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "L :=[stats[random, normald ](n)];" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "S := transform[ apply[x -> x^2 ] ](L);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 205 "### WARNING: the statplots \+ sub-package has been completely rewritten; see the help pages for deta ils\nstatplots[histogram](S):plot(stats[statevalf,pdf,chisquare[1]],0. .6,colour=red): plots[display](\{%,%%\});" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}}{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }