(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 4.0, MathReader 4.0, or any compatible application. The data for the notebook starts with the line containing stars above. To get the notebook into a Mathematica-compatible application, do one of the following: * Save the data starting with the line of stars above into a file with a name ending in .nb, then open the file inside the application; * Copy the data starting with the line of stars above to the clipboard, then use the Paste menu command inside the application. Data for notebooks contains only printable 7-bit ASCII and can be sent directly in email or through ftp in text mode. Newlines can be CR, LF or CRLF (Unix, Macintosh or MS-DOS style). NOTE: If you modify the data for this notebook not in a Mathematica- compatible application, you must delete the line below containing the word CacheID, otherwise Mathematica-compatible applications may try to use invalid cache data. For more information on notebooks and Mathematica-compatible applications, contact Wolfram Research: web: http://www.wolfram.com email: info@wolfram.com phone: +1-217-398-0700 (U.S.) Notebook reader applications are available free of charge from Wolfram Research. ***********************************************************************) (*CacheID: 232*) (*NotebookFileLineBreakTest NotebookFileLineBreakTest*) (*NotebookOptionsPosition[ 76424, 1720]*) (*NotebookOutlinePosition[ 77135, 1745]*) (* CellTagsIndexPosition[ 77091, 1741]*) (*WindowFrame->Normal*) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ \(Correlation\ \ and\ Regression\ analysis, \ \((part\ two)\)\)], "Title",\ FontFamily->"Arial"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[29]:=", FontFamily->"Arial"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[30]:=", FontFamily->"Arial"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[31]:=", FontFamily->"Arial"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[32]:=", FontFamily->"Arial"], Cell[BoxData[ \(Needs["\"]\)], "Input", CellLabel->"In[33]:=", FontFamily->"Arial"], Cell[CellGroupData[{ Cell[BoxData[ \(Let' s\ take\ the\ data\ from\ the\ lecture\ \(notes . \)\)], "Section"], Cell[BoxData[ \(\(MH = {\n\t{"\", \ 18045, 83.53}, \n\t\t{"\", \ 14449.80, \ 71.38}, \n\t\t{"\", \ 19842.15, 64.79}, \n\t\t{"\", \ 17670.15, 41.21}, \n\t\t{"\", \ 7563.70, 9.17}, \n\t\t{"\", \ 19763.63, 54.98}\n\t};\)\)], "Input",\ CellLabel->"In[34]:="], Cell[CellGroupData[{ Cell[BoxData[ \(TableForm[MH]\)], "Input", CellLabel->"In[35]:="], Cell[BoxData[ TagBox[GridBox[{ {"\<\"Finland\"\>", "18045", "83.53`"}, {"\<\"The Netherlands\"\>", "14449.8`", "71.38`"}, {"\<\"Denmark\"\>", "19842.15`", "64.79`"}, {"\<\"USA\"\>", "17670.15`", "41.21`"}, {"\<\"Spain\"\>", "7563.7`", "9.17`"}, {"\<\"Japan\"\>", "19763.63`", "54.98`"} }, RowSpacings->1, ColumnSpacings->3, RowAlignments->Baseline, ColumnAlignments->{Left}], (TableForm[ #]&)]], "Output", CellLabel->"Out[35]//TableForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(ListPlot[Column[MH, {3, 2}], \ AxesLabel \[Rule] {"\", \ "\"}, \n Prolog\ -> \ AbsolutePointSize[5]]\)], "Input", CellLabel->"In[36]:=", FontFamily->"Arial"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations -0.0936371 0.0128077 -0.347873 4.7938e-005 [ [.03444 .02313 -6 -9 ] [.03444 .02313 6 0 ] [.16252 .02313 -6 -9 ] [.16252 .02313 6 0 ] [.29059 .02313 -6 -9 ] [.29059 .02313 6 0 ] [.41867 .02313 -6 -9 ] [.41867 .02313 6 0 ] [.54675 .02313 -6 -9 ] [.54675 .02313 6 0 ] [.67483 .02313 -6 -9 ] [.67483 .02313 6 0 ] [.8029 .02313 -6 -9 ] [.8029 .02313 6 0 ] [.93098 .02313 -6 -9 ] [.93098 .02313 6 0 ] [1.025 .03563 0 -6.28125 ] [1.025 .03563 82 6.28125 ] [-0.00368 .13151 -30 -4.5 ] [-0.00368 .13151 0 4.5 ] [-0.00368 .22738 -30 -4.5 ] [-0.00368 .22738 0 4.5 ] [-0.00368 .32326 -30 -4.5 ] [-0.00368 .32326 0 4.5 ] [-0.00368 .41913 -30 -4.5 ] [-0.00368 .41913 0 4.5 ] [-0.00368 .51501 -30 -4.5 ] [-0.00368 .51501 0 4.5 ] [-0.00368 .61089 -30 -4.5 ] [-0.00368 .61089 0 4.5 ] [.00882 .64303 -11 0 ] [.00882 .64303 11 12.5625 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .03444 .03563 m .03444 .04188 L s [(10)] .03444 .02313 0 1 Mshowa .16252 .03563 m .16252 .04188 L s [(20)] .16252 .02313 0 1 Mshowa .29059 .03563 m .29059 .04188 L s [(30)] .29059 .02313 0 1 Mshowa .41867 .03563 m .41867 .04188 L s [(40)] .41867 .02313 0 1 Mshowa .54675 .03563 m .54675 .04188 L s [(50)] .54675 .02313 0 1 Mshowa .67483 .03563 m .67483 .04188 L s [(60)] .67483 .02313 0 1 Mshowa .8029 .03563 m .8029 .04188 L s [(70)] .8029 .02313 0 1 Mshowa .93098 .03563 m .93098 .04188 L s [(80)] .93098 .02313 0 1 Mshowa .125 Mabswid .06006 .03563 m .06006 .03938 L s .08567 .03563 m .08567 .03938 L s .11129 .03563 m .11129 .03938 L s .1369 .03563 m .1369 .03938 L s .18813 .03563 m .18813 .03938 L s .21375 .03563 m .21375 .03938 L s .23936 .03563 m .23936 .03938 L s .26498 .03563 m .26498 .03938 L s .31621 .03563 m .31621 .03938 L s .34182 .03563 m .34182 .03938 L s .36744 .03563 m .36744 .03938 L s .39306 .03563 m .39306 .03938 L s .44429 .03563 m .44429 .03938 L s .4699 .03563 m .4699 .03938 L s .49552 .03563 m .49552 .03938 L s .52113 .03563 m .52113 .03938 L s .57236 .03563 m .57236 .03938 L s .59798 .03563 m .59798 .03938 L s .62359 .03563 m .62359 .03938 L s .64921 .03563 m .64921 .03938 L s .70044 .03563 m .70044 .03938 L s .72606 .03563 m .72606 .03938 L s .75167 .03563 m .75167 .03938 L s .77729 .03563 m .77729 .03938 L s .82852 .03563 m .82852 .03938 L s .85413 .03563 m .85413 .03938 L s .87975 .03563 m .87975 .03938 L s .90536 .03563 m .90536 .03938 L s .95659 .03563 m .95659 .03938 L s .98221 .03563 m .98221 .03938 L s .25 Mabswid 0 .03563 m 1 .03563 L s gsave 1.025 .03563 -61 -10.2813 Mabsadd m 1 1 Mabs scale currentpoint translate /MISOfy { /newfontname exch def /oldfontname exch def oldfontname findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end newfontname exch definefont pop } def 0 20.5625 translate 1 -1 scale 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (Mental) show 105.000 12.813 moveto (Health) show 141.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore .00882 .13151 m .01507 .13151 L s [(10000)] -0.00368 .13151 1 0 Mshowa .00882 .22738 m .01507 .22738 L s [(12000)] -0.00368 .22738 1 0 Mshowa .00882 .32326 m .01507 .32326 L s [(14000)] -0.00368 .32326 1 0 Mshowa .00882 .41913 m .01507 .41913 L s [(16000)] -0.00368 .41913 1 0 Mshowa .00882 .51501 m .01507 .51501 L s [(18000)] -0.00368 .51501 1 0 Mshowa .00882 .61089 m .01507 .61089 L s [(20000)] -0.00368 .61089 1 0 Mshowa .125 Mabswid .00882 .0596 m .01257 .0596 L s .00882 .08357 m .01257 .08357 L s .00882 .10754 m .01257 .10754 L s .00882 .15548 m .01257 .15548 L s .00882 .17944 m .01257 .17944 L s .00882 .20341 m .01257 .20341 L s .00882 .25135 m .01257 .25135 L s .00882 .27532 m .01257 .27532 L s .00882 .29929 m .01257 .29929 L s .00882 .34723 m .01257 .34723 L s .00882 .3712 m .01257 .3712 L s .00882 .39517 m .01257 .39517 L s .00882 .4431 m .01257 .4431 L s .00882 .46707 m .01257 .46707 L s .00882 .49104 m .01257 .49104 L s .00882 .53898 m .01257 .53898 L s .00882 .56295 m .01257 .56295 L s .00882 .58692 m .01257 .58692 L s .00882 .01166 m .01257 .01166 L s .25 Mabswid .00882 0 m .00882 .61803 L s gsave .00882 .64303 -72 -4 Mabsadd m 1 1 Mabs scale currentpoint translate /MISOfy { /newfontname exch def /oldfontname exch def oldfontname findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end newfontname exch definefont pop } def 0 20.5625 translate 1 -1 scale 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (GDP) show 81.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath 5 Mabswid .97619 .51717 Mdot .82058 .34482 Mdot .73617 .60332 Mdot .43417 .4992 Mdot .02381 .01472 Mdot .61053 .59955 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", CellLabel->"From In[36]:=", ImageSize->{288, 177.938}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg"], ImageRangeCache->{{{0, 431}, {265.875, 0}} -> {-6.71937, 3576.2, 0.458088, \ 122.388}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output", CellLabel->"Out[36]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(r = Correlation[Column[MH, 2], Column[MH, 3]]\)], "Input", CellLabel->"In[37]:=", FontFamily->"Arial"], Cell[BoxData[ \(0.707608490871064`\)], "Output", CellLabel->"Out[37]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(b = r*\((StandardDeviation[Column[MH, 2]]/ StandardDeviation[Column[MH, 3]])\)\)], "Input", CellLabel->"In[38]:=", FontFamily->"Arial"], Cell[BoxData[ \(125.611745126651`\)], "Output", CellLabel->"Out[38]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(a\ = \ Mean[Column[MH, 2]]\ - \ b*Mean[Column[MH, 3]]\)], "Input", CellLabel->"In[39]:=", FontFamily->"Arial"], Cell[BoxData[ \(9417.179354855138`\)], "Output", CellLabel->"Out[39]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(Predict = Table[{x, a + b*x}, {x, 10, 80, 10}]\)], "Input", CellLabel->"In[41]:="], Cell[BoxData[ \({{10, 10673.296806121647`}, {20, 11929.414257388158`}, {30, 13185.531708654667`}, {40, 14441.649159921177`}, {50, 15697.766611187688`}, {60, 16953.8840624542`}, {70, 18210.00151372071`}, {80, 19466.118964987218`}}\)], "Output", CellLabel->"Out[41]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(TableForm[Predict]\)], "Input", CellLabel->"In[42]:="], Cell[BoxData[ TagBox[GridBox[{ {"10", "10673.296806121647`"}, {"20", "11929.414257388158`"}, {"30", "13185.531708654667`"}, {"40", "14441.649159921177`"}, {"50", "15697.766611187688`"}, {"60", "16953.8840624542`"}, {"70", "18210.00151372071`"}, {"80", "19466.118964987218`"} }, RowSpacings->1, ColumnSpacings->3, RowAlignments->Baseline, ColumnAlignments->{Left}], (TableForm[ #]&)]], "Output", CellLabel->"Out[42]//TableForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ \(MultipleListPlot[Column[MH, {3, 2}], Predict, \ \ \n\t\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ PlotJoined\ -> \ {False, \ True}, \n\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ AxesLabel\ \[Rule] \ {"\", \ "\"}]\)], "Input", CellLabel->"In[46]:=", FontFamily->"Arial"], Cell[GraphicsData["PostScript", "\<\ %! %%Creator: Mathematica %%AspectRatio: .61803 MathPictureStart /Mabs { Mgmatrix idtransform Mtmatrix dtransform } bind def /Mabsadd { Mabs 3 -1 roll add 3 1 roll add exch } bind def %% Graphics %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.0114017 -0.347873 4.7938e-005 [ [.25184 .02313 -6 -9 ] [.25184 .02313 6 0 ] [.47988 .02313 -6 -9 ] [.47988 .02313 6 0 ] [.70791 .02313 -6 -9 ] [.70791 .02313 6 0 ] [.93594 .02313 -6 -9 ] [.93594 .02313 6 0 ] [1.025 .03563 0 -6.28125 ] [1.025 .03563 82 6.28125 ] [.01131 .13151 -30 -4.5 ] [.01131 .13151 0 4.5 ] [.01131 .22738 -30 -4.5 ] [.01131 .22738 0 4.5 ] [.01131 .32326 -30 -4.5 ] [.01131 .32326 0 4.5 ] [.01131 .41913 -30 -4.5 ] [.01131 .41913 0 4.5 ] [.01131 .51501 -30 -4.5 ] [.01131 .51501 0 4.5 ] [.01131 .61089 -30 -4.5 ] [.01131 .61089 0 4.5 ] [.02381 .64303 -11 0 ] [.02381 .64303 11 12.5625 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid [ ] 0 setdash .25184 .03563 m .25184 .04188 L s [(20)] .25184 .02313 0 1 Mshowa .47988 .03563 m .47988 .04188 L s [(40)] .47988 .02313 0 1 Mshowa .70791 .03563 m .70791 .04188 L s [(60)] .70791 .02313 0 1 Mshowa .93594 .03563 m .93594 .04188 L s [(80)] .93594 .02313 0 1 Mshowa .125 Mabswid .08082 .03563 m .08082 .03938 L s .13783 .03563 m .13783 .03938 L s .19483 .03563 m .19483 .03938 L s .30885 .03563 m .30885 .03938 L s .36586 .03563 m .36586 .03938 L s .42287 .03563 m .42287 .03938 L s .53688 .03563 m .53688 .03938 L s .59389 .03563 m .59389 .03938 L s .6509 .03563 m .6509 .03938 L s .76492 .03563 m .76492 .03938 L s .82193 .03563 m .82193 .03938 L s .87893 .03563 m .87893 .03938 L s .99295 .03563 m .99295 .03938 L s .25 Mabswid 0 .03563 m 1 .03563 L s gsave 1.025 .03563 -61 -10.2813 Mabsadd m 1 1 Mabs scale currentpoint translate /MISOfy { /newfontname exch def /oldfontname exch def oldfontname findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end newfontname exch definefont pop } def 0 20.5625 translate 1 -1 scale 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (Mental) show 105.000 12.813 moveto (Health) show 141.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore .02381 .13151 m .03006 .13151 L s [(10000)] .01131 .13151 1 0 Mshowa .02381 .22738 m .03006 .22738 L s [(12000)] .01131 .22738 1 0 Mshowa .02381 .32326 m .03006 .32326 L s [(14000)] .01131 .32326 1 0 Mshowa .02381 .41913 m .03006 .41913 L s [(16000)] .01131 .41913 1 0 Mshowa .02381 .51501 m .03006 .51501 L s [(18000)] .01131 .51501 1 0 Mshowa .02381 .61089 m .03006 .61089 L s [(20000)] .01131 .61089 1 0 Mshowa .125 Mabswid .02381 .0596 m .02756 .0596 L s .02381 .08357 m .02756 .08357 L s .02381 .10754 m .02756 .10754 L s .02381 .15548 m .02756 .15548 L s .02381 .17944 m .02756 .17944 L s .02381 .20341 m .02756 .20341 L s .02381 .25135 m .02756 .25135 L s .02381 .27532 m .02756 .27532 L s .02381 .29929 m .02756 .29929 L s .02381 .34723 m .02756 .34723 L s .02381 .3712 m .02756 .3712 L s .02381 .39517 m .02756 .39517 L s .02381 .4431 m .02756 .4431 L s .02381 .46707 m .02756 .46707 L s .02381 .49104 m .02756 .49104 L s .02381 .53898 m .02756 .53898 L s .02381 .56295 m .02756 .56295 L s .02381 .58692 m .02756 .58692 L s .02381 .01166 m .02756 .01166 L s .25 Mabswid .02381 0 m .02381 .61803 L s gsave .02381 .64303 -72 -4 Mabsadd m 1 1 Mabs scale currentpoint translate /MISOfy { /newfontname exch def /oldfontname exch def oldfontname findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse} forall /Encoding ISOLatin1Encoding def currentdict end newfontname exch definefont pop } def 0 20.5625 translate 1 -1 scale 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 63.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor (GDP) show 81.000 12.813 moveto %%IncludeResource: font Courier %%IncludeFont: Courier /Courier findfont 10.000 scalefont [1 0 0 -1 0 0 ] makefont setfont 0.000 0.000 0.000 setrgbcolor 0.000 0.000 rmoveto 1.000 setlinewidth grestore 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .0001 w .97619 .51717 -1.875 0 Mabsadd m .97619 .51717 0 2.5 Mabsadd L .97619 .51717 1.875 0 Mabsadd L .97619 .51717 0 -2.5 Mabsadd L .97619 .51717 -1.875 0 Mabsadd L closepath F .83766 .34482 -1.875 0 Mabsadd m .83766 .34482 0 2.5 Mabsadd L .83766 .34482 1.875 0 Mabsadd L .83766 .34482 0 -2.5 Mabsadd L .83766 .34482 -1.875 0 Mabsadd L closepath F .76252 .60332 -1.875 0 Mabsadd m .76252 .60332 0 2.5 Mabsadd L .76252 .60332 1.875 0 Mabsadd L .76252 .60332 0 -2.5 Mabsadd L .76252 .60332 -1.875 0 Mabsadd L closepath F .49367 .4992 -1.875 0 Mabsadd m .49367 .4992 0 2.5 Mabsadd L .49367 .4992 1.875 0 Mabsadd L .49367 .4992 0 -2.5 Mabsadd L .49367 .4992 -1.875 0 Mabsadd L closepath F .12836 .01472 -1.875 0 Mabsadd m .12836 .01472 0 2.5 Mabsadd L .12836 .01472 1.875 0 Mabsadd L .12836 .01472 0 -2.5 Mabsadd L .12836 .01472 -1.875 0 Mabsadd L closepath F .65067 .59955 -1.875 0 Mabsadd m .65067 .59955 0 2.5 Mabsadd L .65067 .59955 1.875 0 Mabsadd L .65067 .59955 0 -2.5 Mabsadd L .65067 .59955 -1.875 0 Mabsadd L closepath F .001 w [ .5 3 ] 0 Mabsdash .13783 .16378 m .25184 .224 L .36586 .28421 L .47988 .34443 L .59389 .40465 L .70791 .46486 L .82193 .52508 L .93594 .58529 L s .0001 w [ ] 0 setdash .13783 .16378 0 2.5 Mabsadd m .13783 .16378 -0.56518 .7779 Mabsadd L .13783 .16378 -2.37764 .77254 Mabsadd L .13783 .16378 -0.91448 -0.29713 Mabsadd L .13783 .16378 -1.46946 -2.02254 Mabsadd L .13783 .16378 0 -0.96154 Mabsadd L .13783 .16378 1.46946 -2.02254 Mabsadd L .13783 .16378 .91448 -0.29713 Mabsadd L .13783 .16378 2.37764 .77254 Mabsadd L .13783 .16378 .56518 .7779 Mabsadd L .13783 .16378 0 2.5 Mabsadd L closepath F .25184 .224 0 2.5 Mabsadd m .25184 .224 -0.56518 .7779 Mabsadd L .25184 .224 -2.37764 .77254 Mabsadd L .25184 .224 -0.91448 -0.29713 Mabsadd L .25184 .224 -1.46946 -2.02254 Mabsadd L .25184 .224 0 -0.96154 Mabsadd L .25184 .224 1.46946 -2.02254 Mabsadd L .25184 .224 .91448 -0.29713 Mabsadd L .25184 .224 2.37764 .77254 Mabsadd L .25184 .224 .56518 .7779 Mabsadd L .25184 .224 0 2.5 Mabsadd L closepath F .36586 .28421 0 2.5 Mabsadd m .36586 .28421 -0.56518 .7779 Mabsadd L .36586 .28421 -2.37764 .77254 Mabsadd L .36586 .28421 -0.91448 -0.29713 Mabsadd L .36586 .28421 -1.46946 -2.02254 Mabsadd L .36586 .28421 0 -0.96154 Mabsadd L .36586 .28421 1.46946 -2.02254 Mabsadd L .36586 .28421 .91448 -0.29713 Mabsadd L .36586 .28421 2.37764 .77254 Mabsadd L .36586 .28421 .56518 .7779 Mabsadd L .36586 .28421 0 2.5 Mabsadd L closepath F .47988 .34443 0 2.5 Mabsadd m .47988 .34443 -0.56518 .7779 Mabsadd L .47988 .34443 -2.37764 .77254 Mabsadd L .47988 .34443 -0.91448 -0.29713 Mabsadd L .47988 .34443 -1.46946 -2.02254 Mabsadd L .47988 .34443 0 -0.96154 Mabsadd L .47988 .34443 1.46946 -2.02254 Mabsadd L .47988 .34443 .91448 -0.29713 Mabsadd L .47988 .34443 2.37764 .77254 Mabsadd L .47988 .34443 .56518 .7779 Mabsadd L .47988 .34443 0 2.5 Mabsadd L closepath F .59389 .40465 0 2.5 Mabsadd m .59389 .40465 -0.56518 .7779 Mabsadd L .59389 .40465 -2.37764 .77254 Mabsadd L .59389 .40465 -0.91448 -0.29713 Mabsadd L .59389 .40465 -1.46946 -2.02254 Mabsadd L .59389 .40465 0 -0.96154 Mabsadd L .59389 .40465 1.46946 -2.02254 Mabsadd L .59389 .40465 .91448 -0.29713 Mabsadd L .59389 .40465 2.37764 .77254 Mabsadd L .59389 .40465 .56518 .7779 Mabsadd L .59389 .40465 0 2.5 Mabsadd L closepath F .70791 .46486 0 2.5 Mabsadd m .70791 .46486 -0.56518 .7779 Mabsadd L .70791 .46486 -2.37764 .77254 Mabsadd L .70791 .46486 -0.91448 -0.29713 Mabsadd L .70791 .46486 -1.46946 -2.02254 Mabsadd L .70791 .46486 0 -0.96154 Mabsadd L .70791 .46486 1.46946 -2.02254 Mabsadd L .70791 .46486 .91448 -0.29713 Mabsadd L .70791 .46486 2.37764 .77254 Mabsadd L .70791 .46486 .56518 .7779 Mabsadd L .70791 .46486 0 2.5 Mabsadd L closepath F .82193 .52508 0 2.5 Mabsadd m .82193 .52508 -0.56518 .7779 Mabsadd L .82193 .52508 -2.37764 .77254 Mabsadd L .82193 .52508 -0.91448 -0.29713 Mabsadd L .82193 .52508 -1.46946 -2.02254 Mabsadd L .82193 .52508 0 -0.96154 Mabsadd L .82193 .52508 1.46946 -2.02254 Mabsadd L .82193 .52508 .91448 -0.29713 Mabsadd L .82193 .52508 2.37764 .77254 Mabsadd L .82193 .52508 .56518 .7779 Mabsadd L .82193 .52508 0 2.5 Mabsadd L closepath F .93594 .58529 0 2.5 Mabsadd m .93594 .58529 -0.56518 .7779 Mabsadd L .93594 .58529 -2.37764 .77254 Mabsadd L .93594 .58529 -0.91448 -0.29713 Mabsadd L .93594 .58529 -1.46946 -2.02254 Mabsadd L .93594 .58529 0 -0.96154 Mabsadd L .93594 .58529 1.46946 -2.02254 Mabsadd L .93594 .58529 .91448 -0.29713 Mabsadd L .93594 .58529 2.37764 .77254 Mabsadd L .93594 .58529 .56518 .7779 Mabsadd L .93594 .58529 0 2.5 Mabsadd L closepath F % End of Graphics MathPictureEnd \ \>"], "Graphics", CellLabel->"From In[46]:=", ImageSize->{288, 177.938}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHg0?ooo`00H`3oool00d000000oooo 0?ooo`020?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`0^0?ooo`03 @000003oool0oooo0080oooo00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`0[0?ooo`03 @000003oool0oooo0080oooo00A000000?ooo`3ooom00000103oool00d000000oooo0?ooo`0Z0?oo o`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0 oooo08/0oooo001T0?ooo`03@000003oool0oooo00D0oooo00=000000?ooo`3oool00P3oool00d00 0000oooo0?ooo`0^0?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool00P3oool00d00 0000oooo0?ooo`0[0?ooo`03@000003oool0oooo0080oooo00A000000?ooo`3ooom00000103oool0 0d000000oooo0?ooo`0Z0?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@000 00040?ooo`03@000003oool0oooo08/0oooo001U0?ooo`03@000003oool0oooo00@0oooo00=00000 0?ooo`3oool00P3oool00d000000oooo0?ooo`0Z0?ooo`I000000`3oool00d000000oooo0?ooo`02 0?ooo`03@000003oool0oooo02/0oooo0T0000030?ooo`04@000003oool0oooo@00000@0oooo00=0 00000?ooo`3oool0:P3oool00d000000oooo0?ooo`020?ooo`05@000003oool0oooo0?oood000000 103oool00d000000oooo0?ooo`2;0?ooo`00IP3oool00d000000oooo0?ooo`030?ooo`03@000003o ool0oooo0080oooo00=000000?ooo`3oool0:`3oool014000000oooo0?oood0000040?ooo`03@000 003oool0oooo0080oooo00=000000?ooo`3oool0:`3oool00d000000oooo@0000002@00000<0oooo 00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`0[0?ooo`A00000103oool00d000000oooo 0?ooo`020?ooo`03@000003oool0oooo08/0oooo001W0?ooo`03@000003oool0oooo0080oooo00=0 00000?ooo`3oool00P3oool00d000000oooo0?ooo`0[0?ooo`04@000003oool0oooo@00000@0oooo 00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`0[0?ooo`03@000003oool0oooo00D0oooo 00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`0Z0?ooo`03@000003oool0oooo0080oooo 00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0oooo08/0oooo000`0?ooo`030000 003oool0oooo0300oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000@0 oooo00=000000?ooo`3oool0;03oool00d000000oooo@00000040?ooo`03@000003oool0oooo0080 oooo00=000000?ooo`3oool0;03oool00d000000oooo0?ooo`040?ooo`03@000003oool0oooo0080 oooo00=000000?ooo`3oool0:P3oool00d000000oooo0?ooo`020?ooo`05@000003oool0oooo0?oo od000000103oool00d000000oooo0?ooo`2;0?ooo`00<03oool00`000000oooo0?ooo`0`0?ooo`03 @000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0oooo 02`0oooo00=000000?oood000000103oool00d000000oooo0?ooo`020?ooo`03@000003oool0oooo 02d0oooo00=000000?ooo`3oool00`3oool00d000000oooo0?ooo`020?ooo`03@000003oool0oooo 02X0oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000@0oooo00=00000 0?ooo`3oool0R`3oool00300oooo00<000000?ooo`3oool05`3oool2000001P0oooo140000050?oo o`A00000<03oool2@00000D0oooo1400000a0?ooo`=000000`3oool4@00002h0oooo140000050?oo o`A00000SP3oool00300oooo00<00000@000003oool05P3oool400000?l0ooooI03oool00300oooo 00<000000?ooo`3oool05@3oool600000?l0ooooH`3oool00300oooo00<000000?ooo`3oool05P3o ool400000?l0ooooI03oool00300oooo00<000000?ooo`3oool05`3oool300000?l0ooooI03oool0 0300oooo00<000000?ooo`3oool05`3oool200000>/0oooo0d0000030?ooo`=000000`3oool4@000 00<0oooo0d0000020?ooo`=00000103oool4@00000@0oooo1D0000020?ooo`M000002`3oool3@000 0080oooo0d0000030?ooo`A000001@3oool5@0000080oooo1d0000050?ooo`A000000P3oool3@000 0080oooo0d0000040?ooo`00<03oool00`000000oooo0?ooo`3o0?ooo`H0oooo00=000000?ooo`3o ool00`3oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@0000004 0?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool00P3oool014000000oooo0?oood00 00030?ooo`03@000003oool0oooo00@0oooo00=000000?ooo`3oool03@3oool00d000000oooo0?oo o`020?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0000000<0 oooo00=000000?ooo`3oool0103oool00d000000oooo0?ooo`050?ooo`03@000003oool0oooo0080 oooo00A000000?ooo`3ooom00000103oool00d000000oooo0?ooo`030?ooo`00<03oool00`000000 oooo0?ooo`3o0?ooo`H0oooo00A000000?ooo`3ooom000000P3oool01D000000oooo0?ooo`3ooom0 000000P0oooo00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`020?ooo`03@000003oool0 oooo00D0oooo00E000000?ooo`3oool0oooo@00000060?ooo`03@000003oool0oooo00d0oooo00=0 00000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000P0oooo00E000000?ooo`3oool0 oooo@00000060?ooo`03@000003oool0oooo00D0oooo00=000000?ooo`3oool01@3oool00d000000 oooo0?ooo`020?ooo`03@000003oool0oooo00<0oooo000Z0?ooool00000100000000d000000oooo 0?ooo`080?ooo`07@000003ooom000000?oood000000oooo@00000030?ooo`I000000`3oool00d00 0000oooo0?ooo`020?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool01P3oool4@000 00H0oooo00=000000?ooo`3oool03@3oool00d000000oooo0?ooo`020?ooo`04@000003oool0oooo 0?ooo`I00000103oool4@00000H0oooo00=000000?ooo`3oool01@3oool00d000000oooo0?ooo`05 0?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool00`3oool00300oooo00<000000?oo o`3oool0303oool00d000000oooo0?ooo`0;0?ooo`03@000003oool0oooo00`0oooo00=000000?oo o`3oool0303oool00d000000oooo0?ooo`0<0?ooo`03@000003oool0oooo00/0oooo00=000000?oo o`3oool0303oool00d000000oooo0?ooo`0<0?ooo`03@000003oool0oooo00`0oooo00=000000?oo o`3oool0303oool00d000000oooo0?ooo`0;0?ooo`03@000003oool0oooo00`0oooo00=000000?oo o`3oool0303oool00d000000oooo0?ooo`0<0?ooo`03@000003oool0oooo00`0oooo00=000000?oo o`3oool02`3oool00d000000oooo0?ooo`0<0?ooo`03@000003oool0oooo00X0oooo00M000000?oo od000000oooo@000003ooom0000000<0oooo00=000000?ooo`3oool00P3oool014000000oooo0?oo o`3oool2@00000<0oooo00=000000?ooo`3oool00P3oool00d000000oooo0?ooo`050?ooo`05@000 003oool0oooo0?oood0000001P3oool00d000000oooo0?ooo`0=0?ooo`I000000`3oool00d000000 oooo0?ooo`020?ooo`05@000003oool0oooo0?oood0000000`3oool00d000000oooo0?ooo`040?oo o`03@000003oool0oooo00D0oooo00=000000?ooo`3oool01@3oool2@00000<0oooo00=000000?oo o`3oool00`3oool00300oooo00<000000?ooo`3oool0o`3oool60?ooo`07@000003ooom000000?oo od000000oooo@00000040?ooo`A000000`3oool2@00000040?oood0000100000@00000<0oooo1d00 00040?ooo`=000001`3oool00d000000oooo0?ooo`0=0?ooo`03@000003oool0oooo0080oooo00=0 00000?ooo`3oool00P3oool4@00000D0oooo0d0000070?ooo`03@000003oool0oooo00<0oooo1d00 00030?ooo`03@000003ooom00000009000001P3oool00300oooo00<000000?ooo`3oool0o`3oool6 0?ooo`9000000`3oool2@00001H0oooo00=000000?ooo`3oool0403oool00d000000oooo0?ooo`0= 0?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool05@3oool00d000000oooo0?ooo`05 0?ooo`03@000003oool0oooo00D0oooo00=000000?ooo`3oool0203oool00300oooo00<000000?oo o`3oool0o`3oool50?ooo`=000000`3oool3@00001D0oooo00=000000?ooo`3oool0403oool00d00 0000oooo0?ooo`0<0?ooo`=000000P3oool3@00001H0oooo00=000000?ooo`3oool01@3oool00d00 0000oooo0?ooo`050?ooo`03@000003oool0oooo00P0oooo000`0?ooo`030000003oool0oooo0?l0 oooo=03oool3@00002X0oooo0d00000>0?ooo`9000002P3oool00300oooo00<00000@000003oool0 o`3ooomn0?ooo`00<03oool00`000000oooo0?ooo`3o0?ooogh0oooo000`0?ooo`030000003oool0 oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00<03oool00`000000 oooo0?ooo`3o0?ooogh0oooo000`0?ooo`030000003oool0oooo0?l0ooooOP3oool00300oooo00<0 0000@000003oool0o`3ooomn0?ooo`00<03oool00`000000oooo0?ooo`3o0?ooogh0oooo000`0?oo o`030000003oool0oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00 <03oool00`000000oooo0?ooo`3o0?ooogh0oooo000`0?ooo`030000003oool0oooo0?l0ooooOP3o ool00300oooo00<00000@000003oool0o`3ooomn0?ooo`00<03oool00`000000oooo0?ooo`3o0?oo ogh0oooo000`0?ooo`030000003oool0oooo0?l0ooooOP3oool000030?oood000010000000E00000 0`3oool4@00000D0oooo140000050?ooo`A000001@3oool4@00000H0oooo00<000000?ooo`3oool0 o`3ooomn0?ooo`00103oool00d000000oooo0?ooo`030?ooo`03@000003oool0oooo0080oooo00E0 00000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool01D000000 oooo0?ooo`3ooom0000000@0oooo00=000000?ooo`3oool00`3oool00`000000oooo0?ooo`3o0?oo ogh0oooo00040?ooo`03@000003oool0oooo00<0oooo00=000000?ooo`3oool00P3oool01D000000 oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0 oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo0?l0ooooOP3o ool000@0oooo00=000000?ooo`3oool00`3oool00d000000oooo0?ooo`020?ooo`05@000003oool0 oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0 oooo@00000040?ooo`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00 103oool00d000000oooo0?ooo`030?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0 oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0 000000@0oooo00=000000?ooo`3oool00`3oool00`00001000000?ooo`3o0?ooogh0oooo00040?oo o`03@000003oool0oooo00<0oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0 000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000 103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo0?l0ooooOP3oool000@0oooo00=0 00000?ooo`3oool00`3oool00d000000oooo0?ooo`020?ooo`05@000003oool0oooo0?oood000000 103oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?oo o`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0o`3ooomn0?ooo`000P3oool3@00000D0 oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?oo o`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?oo o`030?ooo`030000003oool0oooo0?l0ooooOP3oool000@0oooo00=000000?ooo`3oool0103oool4 @00000D0oooo140000050?ooo`A000001@3oool4@00000H0oooo00<000000?ooo`3oool0o`3ooomn 0?ooo`00<03oool00`000000oooo0?ooo`3o0?ooogh0oooo000`0?ooo`03000004000000oooo01P0 oooo00D000000?ooo`3oool0oooo0000003o0?ooof40oooo000`0?ooo`030000003oool0oooo01T0 oooo0`00003o0?ooof80oooo000`0?ooo`030000003oool0oooo01T0oooo0`00003o0?ooof80oooo 000`0?ooo`030000003oool0oooo01L0oooo1`00003o0?ooof00oooo000`0?ooo`030000003oool0 oooo01T0oooo0P0000040?ooo`030000003oool0oooo0?l0ooooG03oool00300oooo00<000000?oo o`3oool0803oool00d000000oooo0?ooo`3o0?oooe/0oooo000`0?ooo`03000004000000oooo0?l0 ooooOP3oool00300oooo00<000000?ooo`3oool0903oool00d000000oooo0?ooo`3o0?oooeL0oooo 000`0?ooo`030000003oool0oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3oool0:03oool0 0`000000oooo0?ooo`3o0?oooe<0oooo000`0?ooo`030000003oool0oooo02T0oooo00=000000?oo o`3oool0o`3ooomB0?ooo`00<03oool00`000000oooo0?ooo`3o0?ooogh0oooo000`0?ooo`030000 04000000oooo02d0oooo00<00000@000003oool0o`3ooom>0?ooo`00<03oool00`000000oooo0?oo o`3o0?ooogh0oooo000`0?ooo`030000003oool0oooo0380oooo00<000000?ooo`3oool0o`3ooom9 0?ooo`0000<0oooo@000040000001D0000020?ooo`I00000103oool4@00000D0oooo140000050?oo o`A000001P3oool00`000000oooo0?ooo`0b0?ooo`03@000003oool0oooo0?l0ooooB@3oool000@0 oooo00=000000?ooo`3oool00`3oool00d000000oooo0?ooo`020?ooo`05@000003oool0oooo0?oo od000000103oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@000 00040?ooo`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0=`3oool300000?l0ooooA03o ool000@0oooo00=000000?ooo`3oool0103oool00d000000oooo0?ooo`050?ooo`03@000003oool0 oooo0080oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000 103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo03H0oooo0`00003o0?ooodD0oooo 00040?ooo`03@000003oool0oooo00D0oooo00=000000?ooo`3oool0103oool00d000000oooo0?oo o`020?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0000000@0 oooo00=000000?ooo`3oool00`3oool00`00001000000?ooo`0f0?ooo`@00000o`3ooom40?ooo`00 103oool00d000000oooo0?ooo`060?ooo`03@000003oool0oooo00<0oooo00=000000?ooo`3oool0 0P3oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?oo o`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0=03oool800000?l0oooo@P3oool000@0 oooo00=000000?ooo`3oool01`3oool00d000000oooo0?ooo`020?ooo`03@000003oool0oooo0080 oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool0 0d000000oooo0?ooo`030?ooo`030000003oool0oooo03P0oooo00@000000?ooo`3ooom00000o`3o oom20?ooo`00103oool00d000000oooo0?ooo`030?ooo`03@000003oool0oooo0080oooo00E00000 0?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo 0?ooo`3ooom0000000@0oooo00=000000?ooo`3oool00`3oool00`000000oooo0?ooo`3o0?ooogh0 oooo00020?ooo`=000001@3oool00d000000oooo0?ooo`020?ooo`05@000003oool0oooo0?oood00 0000103oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@0000004 0?ooo`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0?`3oool00`00001000000?ooo`3o 0?oooc`0oooo00040?ooo`03@000003oool0oooo00@0oooo140000050?ooo`A000001@3oool4@000 00D0oooo140000060?ooo`030000003oool0oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3o ool0A03oool00`00001000000?ooo`3o0?ooocL0oooo000`0?ooo`03000004000000oooo0?l0oooo OP3oool00300oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00<03oool00`000000oooo0?ooo`19 0?ooo`03@000003oool0oooo0?l0oooo0?ooo`050000003oool0oooo0?ooo`000000jP3oool00300oooo00<000000?ooo`3oool0 SP3oool400000>/0oooo000`0?ooo`030000003oool0oooo08l0oooo0`00003[0?ooo`0000<0oooo @000040000001D0000040?ooo`A00000103oool4@00000D0oooo140000050?ooo`A000001P3oool0 0`000000oooo0?ooo`2>0?ooo`D00000jP3oool000@0oooo00=000000?ooo`3oool0103oool00d00 0000oooo0?ooo`020?ooo`04@000003oool0oooo@00000@0oooo00E000000?ooo`3oool0oooo@000 00040?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000 003oool0oooo08d0oooo1`0000000d000000oooo0?ooo`3V0?ooo`00103oool00d000000oooo0?oo o`040?ooo`03@000003oool0oooo0080oooo00A000000?ooo`3ooom00000103oool01D000000oooo 0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0oooo 00<0oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00103oool00d000000oooo0?ooo`040?ooo`90 00000`3oool014000000oooo0?oood0000040?ooo`05@000003oool0oooo0?oood000000103oool0 1D000000oooo0?ooo`3ooom0000000@0oooo00=000000?ooo`3oool00`3oool00`00001000000?oo o`2H0?ooo`030000003oool0oooo0>80oooo00040?ooo`03@000003oool0oooo00@0oooo00=00000 0?oood0000000T0000030?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@000 00040?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000 003oool0oooo09P0oooo00=000000?ooo`3oool0hP3oool000@0oooo00=000000?ooo`3oool0103o ool00d000000oooo0?ooo`050?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo @00000040?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`03 0000003oool0oooo0?l0ooooOP3oool000@0oooo00=000000?ooo`3oool01@3oool00d000000oooo 0?ooo`040?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@00000040?ooo`05 @000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo 09`0oooo00<00000@000003oool0gP3oool00080oooo0d0000080?ooo`03@000003oool0oooo00<0 oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?oo o`3oool0oooo@00000040?ooo`03@000003oool0oooo00<0oooo00<000000?ooo`3oool0o`3ooomn 0?ooo`00103oool00d000000oooo0?ooo`070?ooo`=000000`3oool4@00000D0oooo140000050?oo o`A000001P3oool00`000000oooo0?ooo`2Q0?ooo`03000004000000oooo0=T0oooo000`0?ooo`03 000004000000oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3oool0o`3ooomn0?ooo`00<03o ool00`000000oooo0?ooo`2V0?ooo`03@000003oool0oooo0=@0oooo000`0?ooo`030000003oool0 oooo0?l0ooooOP3oool00300oooo00<000000?ooo`3oool0ZP3oool00`0000100000000000020?oo o`030000003oool0oooo00?ooo`00<03oool00`00 0000oooo0?ooo`2d0?ooo`03@000003oool0oooo080oooo00<000000?ooo`3oool0V03o ool00300oooo00<000000?ooo`3oool0h`3oool00d000000oooo0?ooo`2G0?ooo`00<03oool00`00 0000oooo0?ooo`3W0?ooo`050000003oool0oooo0?ooo`000000T@3oool00300oooo00<000000?oo o`3oool0i`3oool014000000000000000000002B0?ooo`00<03oool00`000000oooo0?ooo`3X0?oo o`<00000TP3oool00300oooo00<00000@000003oool0W`3oool00`000000oooo0?ooo`140?ooo`L0 0000T03oool00300oooo00<000000?ooo`3oool0WP3oool3000001/0oooo00<000000?ooo`3oool0 :P3oool00`000000oooo0?ooo`2A0?ooo`0000<0oooo@00004000000140000040?ooo`A000001@3o ool4@00000D0oooo140000050?ooo`A000001P3oool00`000000oooo0?ooo`2N0?ooo`<000006P3o ool300000;l0oooo00000`3ooom000000?ooo`030?ooo`05@000003oool0oooo0?oood000000103o ool01D000000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`05 @000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo 09d0oooo1@00000I0?ooo`<00000_`3oool00080oooo00=000000?ooo`3oool01@3oool00d000000 oooo0?ooo`020?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0 000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0oooo00<0oooo00<0 00000?ooo`3oool0WP3oool3000001T0oooo1@00002n0?ooo`000`3oool00d000000oooo0?ooo`04 0?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003o ool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom0000000@0oooo00=000000?ooo`3o ool00`3oool00`000000oooo0?ooo`2N0?ooo`<000006P3oool300000;l0oooo00040?ooo`03@000 003oool0oooo00<0oooo00=000000?ooo`3oool00P3oool01D000000oooo0?ooo`3ooom0000000@0 oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000103oool0 0d000000oooo0?ooo`030?ooo`03000004000000oooo09l0oooo00<000000?ooo`3oool06@3oool3 00000;l0oooo00050?ooo`03@000003oool0oooo0080oooo00=000000?ooo`3oool00P3oool01D00 0000oooo0?ooo`3ooom0000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003o ool0oooo0?oood000000103oool00d000000oooo0?ooo`030?ooo`030000003oool0oooo0;`0oooo 00<000000?ooo`3oool0_P3oool000030?oood000000oooo00<0oooo00E000000?ooo`3oool0oooo @00000040?ooo`05@000003oool0oooo0?oood000000103oool01D000000oooo0?ooo`3ooom00000 00@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`03@000003oool0oooo00<0oooo00=00000 0?ooo`3oool0o`3ooomn0?ooo`0000<0oooo@000003oool00`3oool01D000000oooo0?ooo`3ooom0 000000@0oooo00E000000?ooo`3oool0oooo@00000040?ooo`05@000003oool0oooo0?oood000000 103oool01D000000oooo0?ooo`3ooom0000000@0oooo00=000000?ooo`3oool0o`3ooon40?ooo`00 0P3oool4@00000D0oooo140000050?ooo`A000001@3oool4@00000D0oooo1400003o0?ooohL0oooo 003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo 003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo 000U0?ooo`A000000`3oool5@00000@0oooo1D00003o0?ooogL0oooo000T0?ooo`03@000003oool0 oooo0080oooo00E000000?ooo`3oool0oooo@00000030?ooo`03@000003oool0oooo0080oooo00=0 00000?ooo`3oool0o`3ooomh0?ooo`008`3oool00d000000oooo0?ooo`030?ooo`05@000003oool0 oooo0?oood000000103oool01D000000oooo0?ooo`3ooom000000?l0ooooNP3oool002<0oooo00=0 00000?ooo`3oool01D0000020?ooo`03@000003oool0oooo0080oooo00A000000?ooo`3oool0oooo 1D00003o0?ooogH0oooo000S0?ooo`03@000003oool0oooo00L0oooo00=000000?ooo`3oool00P3o ool01D000000oooo0?ooo`3ooom0000000@0oooo00=000000?ooo`3oool0o`3ooomc0?ooo`008`3o ool00d000000oooo0?ooo`070?ooo`03@000003oool0oooo0080oooo00E000000?ooo`3oool0oooo @00000040?ooo`03@000003oool0oooo0?l0ooooL`3oool002@0oooo00A000000?ooo`3oool0oooo 0T0000030?ooo`05@000003oool0oooo0?oood000000103oool00d000000oooo0?ooo`020?ooo`03 @000003oool0oooo0?l0ooooL`3oool002D0oooo0d000000103ooom000000?ooo`3oool5@00000@0 oooo1T00003o0?ooogH0oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oook40oooo003o0?oo ok40oooo003o0?oook40oooo003o0?oook40oooo0000\ \>"], ImageRangeCache->{{{0, 431}, {265.875, 0}} -> {-16.3091, 3731.08, 0.507079, \ 120.605}}], Cell[BoxData[ TagBox[\(\[SkeletonIndicator] Graphics \[SkeletonIndicator]\), False, Editable->False]], "Output", CellLabel->"Out[46]="] }, Open ]] }, Open ]] }, Open ]] }, FrontEndVersion->"4.0 for Microsoft Windows", ScreenRectangle->{{0, 800}, {0, 527}}, WindowSize->{791, 500}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification->1.5, StyleDefinitions -> "TutorialBook.nb" ] (*********************************************************************** Cached data follows. If you edit this Notebook file directly, not using Mathematica, you must remove the line containing CacheID at the top of the file. The cache data will then be recreated when you save this file from within Mathematica. ***********************************************************************) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[1739, 51, 117, 3, 172, "Title"], Cell[1859, 56, 127, 3, 48, "Input"], Cell[1989, 61, 122, 3, 48, "Input"], Cell[2114, 66, 132, 3, 48, "Input"], Cell[2249, 71, 112, 3, 48, "Input"], Cell[2364, 76, 120, 3, 48, "Input"], Cell[CellGroupData[{ Cell[2509, 83, 92, 1, 137, "Section"], Cell[2604, 86, 386, 8, 318, "Input"], Cell[CellGroupData[{ Cell[3015, 98, 71, 2, 46, "Input"], Cell[3089, 102, 553, 14, 185, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[3679, 121, 217, 5, 120, "Input"], Cell[3899, 128, 33638, 722, 279, 6262, 379, "GraphicsData", "PostScript", \ "Graphics"], Cell[37540, 852, 155, 4, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[37732, 861, 126, 3, 48, "Input"], Cell[37861, 866, 77, 2, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[37975, 873, 178, 5, 120, "Input"], Cell[38156, 880, 76, 2, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[38269, 887, 136, 3, 48, "Input"], Cell[38408, 892, 77, 2, 42, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[38522, 899, 104, 2, 46, "Input"], Cell[38629, 903, 299, 5, 100, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[38965, 913, 76, 2, 46, "Input"], Cell[39044, 917, 562, 16, 237, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[39643, 938, 415, 8, 156, "Input"], Cell[40061, 948, 36165, 761, 279, 9691, 429, "GraphicsData", "PostScript", \ "Graphics"], Cell[76229, 1711, 155, 4, 42, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)