{VERSION 3 0 "IBM INTEL NT" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "" -1 256 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" 
-1 0 1 {CSTYLE "" -1 -1 "Times" 1 14 0 0 0 0 2 2 2 0 0 0 0 0 0 }0 0 0 
-1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 
-1 "Helvetica" 1 14 0 0 0 0 2 1 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 
0 0 -1 0 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 
14 0 0 0 0 2 2 2 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }
{PSTYLE "" 0 258 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }
3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "restart:\nread `a:st
atvr4.m`:\nwith(plots):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 57 "Elliot
 Tanis\nSeptember 4, 2000\nFigure 1.6-3  (F1_6-3.mws)" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 97 "L4 := [.8,1.35,1,1.25,.85,.85,1.2,.
6,.8,1.1,.9,1.3];\nL4a := [seq([k, L4[k]], k = 1 .. nops(L4))];" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "TimePlot(L4);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "read `a:ScatPlotCirc.txt`:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 472 "P1 := plot(L4a, x = 0 .. 14
, y = 0 .. 2,labels=[``,``], color=black, thickness=2, title = `Averag
e output of worker (y)  vs  month (t)`, titlefont=[TIMES, BOLD, 12]):
\nP2 := plot([[0,1],[15,1]], tickmarks=[3,4],labels=[``,``], color=bla
ck, thickness=2):\nP3 := ScatPlotCirc(L4a):\ntxt1 := textplot([14, 0.0
5, `t`], font=[TIMES, BOLD, 12], align=\{ABOVE, RIGHT\}):\ntxt2 := tex
tplot([0.2, 2., `y`], font=[TIMES, BOLD, 12], align=\{ABOVE, RIGHT\}):
\ndisplay(\{P1, P2,P3, txt1, txt2\});" }}}{EXCHG {PARA 258 "" 0 "" 
{TEXT -1 32 "Figure 1.6-3: Output of worker (" }{TEXT 256 1 "y" }
{TEXT -1 16 ") versus month (" }{TEXT 257 1 "t" }{TEXT -1 1 ")" }
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "0 0 0" 8 }{VIEWOPTS 1 1 0 1 1 1803 }