(*********************************************************************** Mathematica-Compatible Notebook This notebook can be used on any computer system with Mathematica 3.0, MathReader 3.0, or any compatible application. The data for the notebook starts with the line of 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[ 72497, 2374]*) (*NotebookOutlinePosition[ 73393, 2405]*) (* CellTagsIndexPosition[ 73349, 2401]*) (*WindowFrame->Normal*) Notebook[{ Cell[TextData["\n"], "Text", Evaluatable->False], Cell["Function FITS to data", "Section", Evaluatable->False], Cell[TextData["\n"], "Text", Evaluatable->False], Cell["\<\ data = Table[ Sin[x]+0.3(Random[]-0.5), {x,0,2Pi,2Pi/100} ] ;\ \>", "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell["dataplot = ListPlot[ data, PlotStyle-> PointSize[0.005] ];", "Input", PageWidth->Infinity], 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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00942951 0.311314 0.264071 [ [.2124 .29881 -6 -9 ] [.2124 .29881 6 0 ] [.40099 .29881 -6 -9 ] [.40099 .29881 6 0 ] [.58958 .29881 -6 -9 ] [.58958 .29881 6 0 ] [.77817 .29881 -6 -9 ] [.77817 .29881 6 0 ] [.96676 .29881 -9 -9 ] [.96676 .29881 9 0 ] [.01131 .04724 -12 -4.5 ] [.01131 .04724 0 4.5 ] [.01131 .17928 -24 -4.5 ] [.01131 .17928 0 4.5 ] [.01131 .44335 -18 -4.5 ] [.01131 .44335 0 4.5 ] [.01131 .57538 -6 -4.5 ] [.01131 .57538 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid .2124 .31131 m .2124 .31756 L s [(20)] .2124 .29881 0 1 Mshowa .40099 .31131 m .40099 .31756 L s [(40)] .40099 .29881 0 1 Mshowa .58958 .31131 m .58958 .31756 L s [(60)] .58958 .29881 0 1 Mshowa .77817 .31131 m .77817 .31756 L s [(80)] .77817 .29881 0 1 Mshowa .96676 .31131 m .96676 .31756 L s [(100)] .96676 .29881 0 1 Mshowa .125 Mabswid .07096 .31131 m .07096 .31506 L s .1181 .31131 m .1181 .31506 L s .16525 .31131 m .16525 .31506 L s .25955 .31131 m .25955 .31506 L s .30669 .31131 m .30669 .31506 L s .35384 .31131 m .35384 .31506 L s .44814 .31131 m .44814 .31506 L s .49529 .31131 m .49529 .31506 L s .54243 .31131 m .54243 .31506 L s .63673 .31131 m .63673 .31506 L s .68388 .31131 m .68388 .31506 L s .73102 .31131 m .73102 .31506 L s .82532 .31131 m .82532 .31506 L s .87247 .31131 m .87247 .31506 L s .91961 .31131 m .91961 .31506 L s .25 Mabswid 0 .31131 m 1 .31131 L s .02381 .04724 m .03006 .04724 L s [(-1)] .01131 .04724 1 0 Mshowa .02381 .17928 m .03006 .17928 L s [(-0.5)] .01131 .17928 1 0 Mshowa .02381 .44335 m .03006 .44335 L s [(0.5)] .01131 .44335 1 0 Mshowa .02381 .57538 m .03006 .57538 L s [(1)] .01131 .57538 1 0 Mshowa .125 Mabswid .02381 .07365 m .02756 .07365 L s .02381 .10006 m .02756 .10006 L s .02381 .12646 m .02756 .12646 L s .02381 .15287 m .02756 .15287 L s .02381 .20569 m .02756 .20569 L s .02381 .23209 m .02756 .23209 L s .02381 .2585 m .02756 .2585 L s .02381 .28491 m .02756 .28491 L s .02381 .33772 m .02756 .33772 L s .02381 .36413 m .02756 .36413 L s .02381 .39053 m .02756 .39053 L s .02381 .41694 m .02756 .41694 L s .02381 .46976 m .02756 .46976 L s .02381 .49616 m .02756 .49616 L s .02381 .52257 m .02756 .52257 L s .02381 .54898 m .02756 .54898 L s .02381 .02084 m .02756 .02084 L s .02381 .60179 m .02756 .60179 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .005 w .03324 .32223 Mdot .04267 .36223 Mdot .0521 .33622 Mdot .06153 .39843 Mdot .07096 .36087 Mdot .08039 .35686 Mdot .08982 .43779 Mdot .09925 .38834 Mdot .10868 .4594 Mdot .1181 .45337 Mdot .12753 .47208 Mdot .13696 .44866 Mdot .14639 .47532 Mdot .15582 .47719 Mdot .16525 .48293 Mdot .17468 .48549 Mdot .18411 .55119 Mdot .19354 .56851 Mdot .20297 .54893 Mdot .2124 .59421 Mdot .22183 .56223 Mdot .23126 .563 Mdot .24069 .53531 Mdot .25012 .59726 Mdot .25955 .60332 Mdot .26898 .57657 Mdot .27841 .58727 Mdot .28784 .59924 Mdot .29727 .57567 Mdot .30669 .56471 Mdot .31612 .58521 Mdot .32555 .57858 Mdot .33498 .57395 Mdot .34441 .57939 Mdot .35384 .51187 Mdot .36327 .53806 Mdot .3727 .51563 Mdot .38213 .5275 Mdot .39156 .46192 Mdot .40099 .49259 Mdot .41042 .49007 Mdot .41985 .49032 Mdot .42928 .4493 Mdot .43871 .43894 Mdot .44814 .39269 Mdot .45757 .3949 Mdot .467 .38354 Mdot .47643 .39163 Mdot .48586 .33973 Mdot .49529 .28909 Mdot .50471 .34508 Mdot .51414 .26002 Mdot .52357 .30819 Mdot .533 .26501 Mdot .54243 .21704 Mdot .55186 .21287 Mdot .56129 .18077 Mdot .57072 .205 Mdot .58015 .21752 Mdot .58958 .17949 Mdot .59901 .16153 Mdot .60844 .16504 Mdot .61787 .15452 Mdot .6273 .15514 Mdot .63673 .12934 Mdot .64616 .12183 Mdot .65559 .06195 Mdot .66502 .06143 Mdot .67445 .0701 Mdot .68388 .04834 Mdot .69331 .06682 Mdot .70273 .04584 Mdot .71216 .01472 Mdot .72159 .03107 Mdot .73102 .06026 Mdot .74045 .03264 Mdot .74988 .0202 Mdot .75931 .0675 Mdot .76874 .0534 Mdot .77817 .01817 Mdot .7876 .02633 Mdot .79703 .03823 Mdot .80646 .08005 Mdot .81589 .07248 Mdot .82532 .08869 Mdot .83475 .08768 Mdot .84418 .13115 Mdot .85361 .11467 Mdot .86304 .14899 Mdot .87247 .14846 Mdot .8819 .16619 Mdot .89132 .14453 Mdot .90075 .16521 Mdot .91018 .18218 Mdot .91961 .17794 Mdot .92904 .25374 Mdot .93847 .22435 Mdot .9479 .22378 Mdot .95733 .26916 Mdot .96676 .29375 Mdot .97619 .27798 Mdot % End of Graphics MathPictureEnd \ \>"], "Graphics", PageWidth->Infinity, Evaluatable->False, ImageSize->{300, 185}, ImageMargins->{{100, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgAoo`03001oogoo02Mo o`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`2ZOol00`00Oomoo`1QOol001]oo`03001o ogoo0?moo`moo`006goo0P00Z7oo00<007ooOol0=goo00<007ooOol0:Woo000KOol00`00Oomoo`3o Ool?Ool001]oo`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3^ Ool00`00Oomoo`0MOol001]oo`03001oogoo0>Ioo`04001oogoo000TOol001]oo`03001oogoo0?mo o`moo`006goo0P00Xgoo00@007ooOol006Qoo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomo o`2MOol00`00Oomoo`1^Ool001]oo`03001oogoo09moo`03001oogoo04Uoo`03001oogoo00=oo`03 001oogoo01Yoo`006goo00<007ooOol0ogoo3goo000;Ool00`00Oomoo`02Ool00`00Oomoo`02Ool0 0`00Oomoo`03Ool00`00Oomoo`3oOol?Ool000Yoo`03001oo`0000Moo`03001oo`0000Aoo`03001o ogoo0?Ioo`03001oogoo01Eoo`001Goo0`000Woo00<007oo00002Goo00<007ooOol00Woo0`00TWoo 00<007ooOol01Goo00<007ooOol0EWoo00<007ooOol067oo000:Ool00`00Ool00007Ool20005Ool0 0`00Oomoo`3oOol?Ool000Yoo`03001oo`0000Moo`03001oogoo00Aoo`03001oogoo0?moo`moo`00 2goo00<007ooOol01Woo0`0017oo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]o o`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`2EOol00`00Oomo o`1fOol001]oo`800?mooa1oo`006goo00<007ooOol0T7oo00<007ooOol0Ngoo000KOol00`00Oomo o`2=Ool00`00Oomoo`08Ool00`00Oomoo`1cOol001]oo`03001oogoo0?moo`moo`006goo00<007oo Ool0ngoo00@007ooOol000moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool0 01]oo`800?mooa1oo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`03 001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3iOol00`00Oomoo`0B Ool001]oo`03001oogoo0?moo`moo`006goo0P00QWoo00<007ooOol0QWoo000KOol00`00Oomoo`2: Ool00`00Oomoo`21Ool001]oo`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo0Goo00<007oo Ool02goo000KOol00`00Oomoo`0]Ool30003Ool00`00Oomoo`0]Ool30002Ool00`00Oomoo`0[Ool2 0004Ool00`00Oomoo`0]Ool00`00Oomoo`02Ool00`00Oomoo`0XOol50002Ool00`00Oomoo`02Ool0 0`00Oomoo`03Ool001]oo`03001oogoo02eoo`03001oogoo009oo`03001oo`0002moo`06001oogoo 001oo`00;7oo00<007oo00000Woo00<007oo0000;Goo00<007oo00000Woo00<007oo0000:goo00P0 07ooOomoo`00Ool007oo0P0000=oo`00Ool00goo000KOol00`00Oomoo`0^Ool01`00Oomoogoo001o o`0002eoo`@00004Ool007oo000/Ool00`00Ool00002Ool00`00Ool0000]Ool00`00Ool00002Ool0 0`00Ool0000[Ool01`00Oomoogoo001oo`00009oo`03001oo`0000Aoo`006goo00<007ooOol0;Woo 00L007ooOomoo`00Ool0000]Ool00`00Ool00002Ool00`00Ool0000/Ool20003Ool00`00Ool0000^ Ool01`00Oomoogoo001oo`0002]oo`07001oogooOol007oo00000Woo00<007oo000017oo000KOol2 000^Ool00`00Ool00002Ool00`00Ool0000^Ool20002Ool00`00Ool0000FOol00`00Oomoo`0COol0 0`00Oomoo`02Ool00`00Ool0000]Ool00`00Ool00002Ool00`00Ool0000[Ool01`00Oomoogoo001o o`00009oo`03001oo`0000Aoo`006goo00<007ooOol0;Woo00<007ooOol00Woo00<007ooOol0;Woo 00D007ooOomoo`0002ioo`8000=oo`03001oogoo02eoo`03001oogoo009oo`03001oogoo02Uoo`80 00Aoo`03001oogoo009oo`03001oogoo00=oo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomo o`3oOol?Ool001]oo`03001oogoo0?moo`moo`006goo00<007ooOol0R7oo00<007ooOol0Pgoo000K Ool00`00Oomoo`3oOol?Ool001Aoool001T000006goo00<007ooOol02Woo00<007ooOol02Woo00<0 07ooOol02Woo00<007ooOol02Woo00<007ooOol02goo00<007ooOol02Woo00<007ooOol02Woo00<0 07ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<0 07ooOol02Woo00<007ooOol02goo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<0 07ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol027oo000KOol00`00Ool0000a Ool00`00Oomoo`0bOol00`00Oomoo`0aOol00`00Oomoo`0bOol00`00Oomoo`0aOol00`00Oomoo`08 Ool001]oo`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol? Ool001]oo`03001oogoo00Eoo`03001oogoo0?moo`Moo`006goo0P00OWoo00<007ooOol0SWoo000K Ool00`00Oomoo`3oOol?Ool001]oo`03001oogoo08=oo`03001oogoo08Qoo`006goo00<007ooOol0 ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`03001oogoo00eoo`03001oogoo0?ioo`006goo 00<007ooOol00Woo00<007ooOol01Goo00<007ooOol0ogoo0Woo000KOol00`00Oomoo`3oOol?Ool0 01]oo`800?mooa1oo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`03 001oogoo0?moo`moo`006goo00<007ooOol0N7oo00<007ooOol0Tgoo000KOol00`00Oomoo`3oOol? Ool001]oo`03001oogoo019oo`03001oogoo0?Uoo`006goo0P00M7oo00<007ooOol01Goo00<007oo Ool0T7oo000KOol00`00Oomoo`1eOol00`00Oomoo`2FOol001]oo`03001oogoo00Moo`03001oogoo 0?moo`Eoo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`03001oogoo 0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`800?mooa1o o`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]oo`03001oogoo0?moo`mo o`006goo00<007ooOol0ogoo3goo000;Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`03 Ool00`00Oomoo`0?Ool00`00Oomoo`1NOol00`00Oomoo`2KOol000Yoo`03001oo`0000Moo`03001o o`0000Aoo`03001oogoo0?moo`moo`002Woo00<007oo00002Goo00<007ooOol00Woo0`00ogoo3goo 000:Ool00`00Ool00007Ool20005Ool00`00Oomoo`0LOol00`00Oomoo`1?Ool00`00Oomoo`2MOol0 00Yoo`03001oo`0000Moo`03001oogoo00Aoo`03001oogoo01Moo`03001oogoo0?Aoo`002goo00<0 07ooOol01Woo0`0017oo00<007ooOol0ogoo3goo000KOol00`00Oomoo`0DOol00`00Oomoo`1"], ImageRangeCache->{{{0, 299}, {184, 0}} -> {-10.4768, -1.26127, 0.381279, 0.0136148}}] }, Open ]], Cell[CellGroupData[{ Cell["polyfit = Fit[ data, {1,x,x^2,x^3}, x ]", "Input", PageWidth->Infinity], Cell[BoxData[ \(\(-0.319393935510092852`\) + 0.127242929110863478`\ x - 0.00353706605345787084`\ x\^2 + 0.0000229744948645909463`\ x\^3\)], "Output"] }, Open ]], Cell["\<\ fitplot = Plot[ polyfit, {x,0,100}, PlotStyle -> Dashing[{0.02,0.02}], DisplayFunction -> Identity ] ;\ \>", "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell["?DisplayFunction", "Input", PageWidth->Infinity], Cell[BoxData[ \("DisplayFunction is an option for graphics and sound functions that \ specifies the function to apply to graphics and sound objects in order to \ display them."\)], "Print"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ Show[ {dataplot,fitplot}, DisplayFunction -> $DisplayFunction ] ;\ \>", "Input", PageWidth->Infinity], 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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00942951 0.311314 0.264071 [ [.2124 .29881 -6 -9 ] [.2124 .29881 6 0 ] [.40099 .29881 -6 -9 ] [.40099 .29881 6 0 ] [.58958 .29881 -6 -9 ] [.58958 .29881 6 0 ] [.77817 .29881 -6 -9 ] [.77817 .29881 6 0 ] [.96676 .29881 -9 -9 ] [.96676 .29881 9 0 ] [.01131 .04724 -12 -4.5 ] [.01131 .04724 0 4.5 ] [.01131 .17928 -24 -4.5 ] [.01131 .17928 0 4.5 ] [.01131 .44335 -18 -4.5 ] [.01131 .44335 0 4.5 ] [.01131 .57538 -6 -4.5 ] [.01131 .57538 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid .2124 .31131 m .2124 .31756 L s [(20)] .2124 .29881 0 1 Mshowa .40099 .31131 m .40099 .31756 L s [(40)] .40099 .29881 0 1 Mshowa .58958 .31131 m .58958 .31756 L s [(60)] .58958 .29881 0 1 Mshowa .77817 .31131 m .77817 .31756 L s [(80)] .77817 .29881 0 1 Mshowa .96676 .31131 m .96676 .31756 L s [(100)] .96676 .29881 0 1 Mshowa .125 Mabswid .07096 .31131 m .07096 .31506 L s .1181 .31131 m .1181 .31506 L s .16525 .31131 m .16525 .31506 L s .25955 .31131 m .25955 .31506 L s .30669 .31131 m .30669 .31506 L s .35384 .31131 m .35384 .31506 L s .44814 .31131 m .44814 .31506 L s .49529 .31131 m .49529 .31506 L s .54243 .31131 m .54243 .31506 L s .63673 .31131 m .63673 .31506 L s .68388 .31131 m .68388 .31506 L s .73102 .31131 m .73102 .31506 L s .82532 .31131 m .82532 .31506 L s .87247 .31131 m .87247 .31506 L s .91961 .31131 m .91961 .31506 L s .25 Mabswid 0 .31131 m 1 .31131 L s .02381 .04724 m .03006 .04724 L s [(-1)] .01131 .04724 1 0 Mshowa .02381 .17928 m .03006 .17928 L s [(-0.5)] .01131 .17928 1 0 Mshowa .02381 .44335 m .03006 .44335 L s [(0.5)] .01131 .44335 1 0 Mshowa .02381 .57538 m .03006 .57538 L s [(1)] .01131 .57538 1 0 Mshowa .125 Mabswid .02381 .07365 m .02756 .07365 L s .02381 .10006 m .02756 .10006 L s .02381 .12646 m .02756 .12646 L s .02381 .15287 m .02756 .15287 L s .02381 .20569 m .02756 .20569 L s .02381 .23209 m .02756 .23209 L s .02381 .2585 m .02756 .2585 L s .02381 .28491 m .02756 .28491 L s .02381 .33772 m .02756 .33772 L s .02381 .36413 m .02756 .36413 L s .02381 .39053 m .02756 .39053 L s .02381 .41694 m .02756 .41694 L s .02381 .46976 m .02756 .46976 L s .02381 .49616 m .02756 .49616 L s .02381 .52257 m .02756 .52257 L s .02381 .54898 m .02756 .54898 L s .02381 .02084 m .02756 .02084 L s .02381 .60179 m .02756 .60179 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .005 w .03324 .32223 Mdot .04267 .36223 Mdot .0521 .33622 Mdot .06153 .39843 Mdot .07096 .36087 Mdot .08039 .35686 Mdot .08982 .43779 Mdot .09925 .38834 Mdot .10868 .4594 Mdot .1181 .45337 Mdot .12753 .47208 Mdot .13696 .44866 Mdot .14639 .47532 Mdot .15582 .47719 Mdot .16525 .48293 Mdot .17468 .48549 Mdot .18411 .55119 Mdot .19354 .56851 Mdot .20297 .54893 Mdot .2124 .59421 Mdot .22183 .56223 Mdot .23126 .563 Mdot .24069 .53531 Mdot .25012 .59726 Mdot .25955 .60332 Mdot .26898 .57657 Mdot .27841 .58727 Mdot .28784 .59924 Mdot .29727 .57567 Mdot .30669 .56471 Mdot .31612 .58521 Mdot .32555 .57858 Mdot .33498 .57395 Mdot .34441 .57939 Mdot .35384 .51187 Mdot .36327 .53806 Mdot .3727 .51563 Mdot .38213 .5275 Mdot .39156 .46192 Mdot .40099 .49259 Mdot .41042 .49007 Mdot .41985 .49032 Mdot .42928 .4493 Mdot .43871 .43894 Mdot .44814 .39269 Mdot .45757 .3949 Mdot .467 .38354 Mdot .47643 .39163 Mdot .48586 .33973 Mdot .49529 .28909 Mdot .50471 .34508 Mdot .51414 .26002 Mdot .52357 .30819 Mdot .533 .26501 Mdot .54243 .21704 Mdot .55186 .21287 Mdot .56129 .18077 Mdot .57072 .205 Mdot .58015 .21752 Mdot .58958 .17949 Mdot .59901 .16153 Mdot .60844 .16504 Mdot .61787 .15452 Mdot .6273 .15514 Mdot .63673 .12934 Mdot .64616 .12183 Mdot .65559 .06195 Mdot .66502 .06143 Mdot .67445 .0701 Mdot .68388 .04834 Mdot .69331 .06682 Mdot .70273 .04584 Mdot .71216 .01472 Mdot .72159 .03107 Mdot .73102 .06026 Mdot .74045 .03264 Mdot .74988 .0202 Mdot .75931 .0675 Mdot .76874 .0534 Mdot .77817 .01817 Mdot .7876 .02633 Mdot .79703 .03823 Mdot .80646 .08005 Mdot .81589 .07248 Mdot .82532 .08869 Mdot .83475 .08768 Mdot .84418 .13115 Mdot .85361 .11467 Mdot .86304 .14899 Mdot .87247 .14846 Mdot .8819 .16619 Mdot .89132 .14453 Mdot .90075 .16521 Mdot .91018 .18218 Mdot .91961 .17794 Mdot .92904 .25374 Mdot .93847 .22435 Mdot .9479 .22378 Mdot .95733 .26916 Mdot .96676 .29375 Mdot .97619 .27798 Mdot .5 Mabswid [ .02 .02 ] 0 setdash .02381 .22697 m .06206 .34831 L .08197 .40012 L .10378 .44846 L .14296 .51466 L .16234 .53825 L .18307 .55727 L .19318 .56432 L .20416 .5704 L .2092 .57265 L .21453 .57468 L .21953 .57625 L .2241 .57742 L .22888 .57836 L .23108 .5787 L .23342 .579 L .23591 .57924 L .23701 .57933 L .23821 .5794 L .23895 .57944 L .23963 .57947 L .24026 .5795 L .24096 .57952 L .24217 .57954 L .24344 .57954 L .24466 .57953 L .24581 .5795 L .24684 .57946 L .24797 .57941 L .25049 .57923 L .25282 .57901 L .25706 .57844 L .26156 .57763 L .27084 .57528 L .28084 .57175 L .29894 .5629 L .31878 .54979 L .33967 .5325 L .3774 .49347 L .41756 .44314 L .45622 .3887 L .49731 .32723 L .5369 .26725 L .57498 .21138 L .61549 .15666 L .65451 .11119 L .69202 .07658 L .71127 .06305 L .73196 .05217 L .74199 .04837 L Mistroke .74729 .04677 L .75292 .04539 L .75572 .04484 L .75834 .04439 L .7609 .04402 L .76325 .04375 L .76549 .04355 L .76663 .04347 L .76786 .0434 L .76908 .04334 L .77023 .04331 L .77093 .0433 L .77159 .04329 L .77283 .04329 L .77396 .0433 L .77518 .04333 L .77633 .04338 L .77739 .04343 L .77984 .04361 L .78241 .04388 L .78493 .04421 L .78727 .04459 L .79258 .0457 L .80141 .04832 L .81083 .05221 L .821 .05772 L .832 .06528 L .85197 .08337 L .87169 .10709 L .89253 .13885 L .9301 .21467 L .96676 .31362 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", PageWidth->Infinity, Evaluatable->False, ImageSize->{300, 185}, ImageMargins->{{100, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgQoo`03001oogoo 02=oo`006goo00<007ooOol0jGoo00<007ooOol08Woo000KOol00`00Oomoo`2/Ool2000kOol00`00 Oomoo`0ROol001]oo`03001oogoo0:]oo`03001oogoo03Ioo`03001oogoo02Moo`006goo00<007oo Ool0Zgoo00<007ooOol0H7oo000KOol00`00Oomoo`2ZOol00`00Oomoo`1QOol001]oo`03001oogoo 0:Yoo`03001oogoo065oo`006goo0P00Z7oo00<007ooOol0=goo00<007ooOol02Goo00<007ooOol0 7Woo000KOol00`00Oomoo`3^Ool00`00Oomoo`0MOol001]oo`03001oogoo0>ioo`03001oogoo01eo o`006goo00<007ooOol0YWoo00<007ooOol0AWoo00<007ooOol077oo000KOol00`00Oomoo`2UOol0 0`00Oomoo`16Ool2000NOol001]oo`03001oogoo0:Aoo`03001oogoo03moo`04001oogoo0005Ool0 0`00Oomoo`0LOol001]oo`03001oogoo0:=oo`03001oogoo06Qoo`006goo0P00Xgoo00@007ooOol0 06Qoo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`2MOol00`00Oomoo`1^Ool001]oo`03 001oogoo09moo`03001oogoo04Uoo`03001oogoo00=oo`8001]oo`006goo00<007ooOol0lWoo00<0 07ooOol06Goo000;Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`2O Ool00`00Oomoo`1AOol00`00Oomoo`0HOol000Yoo`03001oo`0000Moo`03001oo`0000Aoo`03001o ogoo09ioo`03001oogoo059oo`04001oogoo000GOol000Eoo`<0009oo`03001oo`0000Uoo`03001o ogoo009oo`<0099oo`03001oogoo00Eoo`04001oogoo001EOol2000IOol000Yoo`03001oo`0000Mo o`8000Eoo`03001oogoo09eoo`03001oogoo05Aoo`03001oogoo01Moo`002Woo00<007oo00001goo 00<007ooOol017oo00<007ooOol0W7oo00<007ooOol0Kgoo000;Ool00`00Oomoo`06Ool30004Ool0 0`00Oomoo`3oOol?Ool001]oo`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol0 0`00Oomoo`3gOol00`00Oomoo`0DOol001]oo`03001oogoo09Eoo`04001oogoo001NOol00`00Oomo o`0DOol001]oo`8009Qoo`03001oogoo05ioo`03001oogoo01=oo`006goo00<007ooOol0T7oo00<0 07ooOol00goo00<007ooOol0Ggoo00<007ooOol04goo000KOol00`00Oomoo`2=Ool00`00Oomoo`05 Ool01000Oomoo`00H7oo00<007ooOol04Woo000KOol00`00Oomoo`2EOol00`00Oomoo`1QOol00`00 Oomoo`0BOol001]oo`03001oogoo0?]oo`04001oogoo000?Ool001]oo`03001oogoo0?moo`moo`00 6goo00<007ooOol0ogoo3goo000KOol2003oOol@Ool001]oo`03001oogoo099oo`03001oogoo06Io o`03001oogoo011oo`006goo00<007ooOol0TGoo00<007ooOol0Igoo00<007ooOol047oo000KOol2 002AOol00`00Oomoo`1YOol00`00Oomoo`0?Ool001]oo`80095oo`03001oogoo06Uoo`03001oogoo 00moo`006goo00<007oo0000Sgoo00<007ooOol0Igoo00D007ooOomoo`00011oo`006goo00<007oo 0000oGoo00<007ooOol03Woo000KOol30025Ool00`00Oomoo`26Ool001]oo`04001oogoo0029Ool0 0`00Oomoo`21Ool001]oo`04001oogoo003oOol>Ool001]oo`03001oogoo08aoo`03001oogoo075o o`03001oogoo00]oo`006goo00<007ooOol0;Goo0`000goo00<007ooOol0;Goo0`000Woo00<007oo Ool087oo00<007ooOol027oo0P0017oo00<007ooOol0;Goo00<007ooOol00Woo00<007ooOol0:7oo 1@000Woo00<007ooOol00Woo00<007ooOol00goo000KOol00`00Oomoo`0]Ool00`00Oomoo`02Ool0 0`00Ool0000_Ool01P00Oomoo`00Ool0025oo`03001oogoo00Qoo`03001oo`00009oo`03001oo`00 02eoo`03001oo`00009oo`03001oo`0002]oo`80009oo`04001oo`00Ool200000goo001oo`03Ool0 01]oo`03001oogoo02ioo`07001oogooOol007oo0000;Goo100000Aoo`00Ool0021oo`03001oogoo 00Uoo`03001oo`00009oo`03001oo`0002eoo`03001oo`00009oo`03001oo`0002]oo`07001oo`00 Ool007oo00000Woo00<007oo000017oo000KOol00`00Oomoo`02Ool00`00Oomoo`0YOol01`00Oomo ogoo001oo`0002eoo`03001oo`00009oo`03001oo`00021oo`03001oogoo00Uoo`8000=oo`03001o o`0002ioo`07001oogooOol007oo0000:goo00L007oo001oo`00Ool00002Ool00`00Ool00004Ool0 01]oo`8000=oo`03001oogoo02Qoo`03001oo`00009oo`03001oo`0002ioo`80009oo`03001oo`00 01Ioo`03001oogoo00Ioo`03001oogoo00Yoo`03001oogoo009oo`03001oo`0002eoo`03001oo`00 009oo`03001oo`0002]oo`07001oo`00Ool007oo00000Woo00<007oo000017oo000KOol00`00Oomo o`02Ool00`00Oomoo`0YOol00`00Oomoo`02Ool00`00Oomoo`0^Ool01@00Oomoogoo0000;Woo0P00 0goo00<007ooOol0;Goo00<007ooOol00Woo00<007ooOol0:Goo0P000Woo00<007oo000017oo00<0 07ooOol00goo000KOol00`00Oomoo`03Ool00`00Oomoo`3kOol00`00Oomoo`0:Ool001]oo`03001o ogoo00=oo`03001oogoo0?moo`Uoo`006goo00<007ooOol00goo00<007ooOol0P7oo00<007ooOol0 QGoo000KOol00`00Oomoo`25Ool01000Oomoo`00QGoo000KOol00`00Oomoo`25Ool00`00Oomoo`26 Ool001Aoool001T000006goo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<007oo Ool02Woo00<007ooOol02goo00<007ooOol02Woo00<007ooOol02Woo00<007ooOol02Woo00<007oo Ool02Woo00<007ooOol02Woo00D007ooOomoo`0000Qoo`03001oogoo00Yoo`03001oogoo00Yoo`03 001oogoo00]oo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Yoo`03 001oogoo00Yoo`03001oogoo00Yoo`03001oogoo00Qoo`006goo00<007oo0000Ool00`00 Oomoo`1POol00`00Oomoo`2JOol001]oo`03001oogoo00ioo`03001oogoo061oo`03001oogoo09Yo o`006goo00<007ooOol03goo00<007ooOol0GWoo00<007ooOol0Vgoo000KOol2003oOol@Ool001]o o`03001oogoo0?moo`moo`006goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`3oOol?Ool001]o o`03001oogoo015oo`03001oogoo05Uoo`03001oogoo09ioo`002goo00<007ooOol00Woo00<007oo Ool00Woo00<007ooOol00goo00<007ooOol03goo00<007oo0000FWoo00D007ooOomoo`0009eoo`00 2Woo00<007oo00001goo00<007oo000017oo00<007ooOol04Woo00<007ooOol0EWoo00<007ooOol0 X7oo000:Ool00`00Ool00009Ool00`00Oomoo`02Ool3000BOol00`00Oomoo`1EOol00`00Oomoo`2Q Ool000Yoo`03001oo`0000Moo`8000Eoo`03001oogoo01=oo`03001oogoo00Ioo`03001oogoo04Yo o`03001oogoo009oo`03001oogoo09eoo`002Woo00<007oo00001goo00<007ooOol017oo00<007oo Ool057oo00@007ooOol00?Ioo`002goo00<007ooOol01Woo0`0017oo00<007ooOol0ogoo3goo000K Ool00`00Oomoo`0DOol00`00Oomoo`1Goo00<0 07oo0000/Woo000KOol00`00Oomoo`0MOol00`00Oomoo`0nOol00`00Oomoo`2]Ool001]oo`03001o ogoo01ioo`03001oogoo0>eoo`006goo00<007ooOol07goo00<007ooOol0k7oo000KOol2001HOol0 0`00Oomoo`06Ool00`00Oomoo`2[Ool001]oo`03001oogoo05Ioo`03001oogoo0;Eoo`006goo00<0 07ooOol0EWoo00<007ooOol0]Goo000KOol00`00Oomoo`0SOol00`00Oomoo`0COol00`00Oomoo`0I Ool00`00Oomoo`03Ool00`00Oomoo`2`Ool001]oo`03001oogoo02Aoo`03001oogoo02aoo`800;Uo o`006goo00<007ooOol09Goo00<007ooOol0iWoo000KOol00`00Oomoo`0VOol00`00Oomoo`06Ool0 0`00Oomoo`3LOol001]oo`8002Qoo`03001oo`000>Aoo`006goo00<007ooOol0Cgoo00<007ooOol0 _7oo000KOol00`00Oomoo`1=Ool2002oOol001]oo`03001oogoo03Aoo`03001oo`0001Aoo`800<5o o`006goo00<007ooOol0:goo00<007ooOol077oo0P00`Woo000KOol00`00Oomoo`0/Ool2003POol0 01=oo`D000=oo`03001oogoo02ioo`<001Aoo`03001oogoo00]oo`03001oogoo0;Qoo`005Goo00<0 07ooOol00goo00<007ooOol0@Goo00@007ooOol000Aoo`03001oogoo0<9oo`005Goo00<007ooOol0 0goo0`00=Goo0P002Goo10003Goo00<007ooOol00Woo00<007ooOol0]Goo000EOol00`00Oomoo`03 Ool00`00Oomoo`0gOol4003COol001Eoo`03001oogoo00=oo`03001oogoo04Aoo`03001oogoo00Mo o`03001oogoo0;eoo`0057oo0P001Goo00<007ooOol0ogoo3goo000KOol00`00Oomoo`0aOol00`00 Oomoo`3JOol001]oo`03001oogoo03aoo`03001oogoo00Moo`03001oogoo0"], ImageRangeCache->{{{0, 299}, {184, 0}} -> {-10.4768, -1.26127, 0.381279, 0.0136148}}] }, Open ]], Cell[CellGroupData[{ Cell["y''[x] == - kappa^2 y[t]", "Input", PageWidth->Infinity], Cell[BoxData[ RowBox[{ RowBox[{ SuperscriptBox["y", "\[DoublePrime]", MultilineFunction->None], "[", "x", "]"}], "==", \(\(-kappa\^2\)\ y[t]\)}]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["<Infinity], Cell[BoxData[ \(DSolve::"obslt" \( : \ \) "All DSolve functionality is now autoloaded. The package \ Calculus`DSolve` is obsolete."\)], "Message"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ soln = DSolve[ {y''[x] == - kappa^2 y[x], y[0] == 0, y'[0] == 1 }, y[x], x ]\ \>", "Input", PageWidth->Infinity], Cell[BoxData[ \({{y[x] \[Rule] Sin[kappa\ x]\/kappa}}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["y[x] /. soln[[1]]", "Input", PageWidth->Infinity], Cell[BoxData[ \(Sin[kappa\ x]\/kappa\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["ComplexExpand[%]", "Input", PageWidth->Infinity], Cell[BoxData[ \(Sin[kappa\ x]\/kappa\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ theoryfit = Fit[ data, {Sin[x 2 Pi / 100 ], Cos[x 2 Pi / 100 ]}, x ]\ \>", "Input", PageWidth->Infinity], Cell[BoxData[ \(\(-0.0894344877741153787`\)\ Cos[\(\[Pi]\ x\)\/50] + 1.0190193395681919`\ Sin[\(\[Pi]\ x\)\/50]\)], "Output"] }, Open ]], Cell["\<\ fitplot1 = Plot[ theoryfit, {x,0,100}, DisplayFunction -> Identity ] ;\ \>", "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell["\<\ Show[ {dataplot, fitplot, fitplot1}, DisplayFunction -> $DisplayFunction ];\ \>", "Input", PageWidth->Infinity], 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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00942951 0.311314 0.264071 [ [.2124 .29881 -6 -9 ] [.2124 .29881 6 0 ] [.40099 .29881 -6 -9 ] [.40099 .29881 6 0 ] [.58958 .29881 -6 -9 ] [.58958 .29881 6 0 ] [.77817 .29881 -6 -9 ] [.77817 .29881 6 0 ] [.96676 .29881 -9 -9 ] [.96676 .29881 9 0 ] [.01131 .04724 -12 -4.5 ] [.01131 .04724 0 4.5 ] [.01131 .17928 -24 -4.5 ] [.01131 .17928 0 4.5 ] [.01131 .44335 -18 -4.5 ] [.01131 .44335 0 4.5 ] [.01131 .57538 -6 -4.5 ] [.01131 .57538 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid .2124 .31131 m .2124 .31756 L s [(20)] .2124 .29881 0 1 Mshowa .40099 .31131 m .40099 .31756 L s [(40)] .40099 .29881 0 1 Mshowa .58958 .31131 m .58958 .31756 L s [(60)] .58958 .29881 0 1 Mshowa .77817 .31131 m .77817 .31756 L s [(80)] .77817 .29881 0 1 Mshowa .96676 .31131 m .96676 .31756 L s [(100)] .96676 .29881 0 1 Mshowa .125 Mabswid .07096 .31131 m .07096 .31506 L s .1181 .31131 m .1181 .31506 L s .16525 .31131 m .16525 .31506 L s .25955 .31131 m .25955 .31506 L s .30669 .31131 m .30669 .31506 L s .35384 .31131 m .35384 .31506 L s .44814 .31131 m .44814 .31506 L s .49529 .31131 m .49529 .31506 L s .54243 .31131 m .54243 .31506 L s .63673 .31131 m .63673 .31506 L s .68388 .31131 m .68388 .31506 L s .73102 .31131 m .73102 .31506 L s .82532 .31131 m .82532 .31506 L s .87247 .31131 m .87247 .31506 L s .91961 .31131 m .91961 .31506 L s .25 Mabswid 0 .31131 m 1 .31131 L s .02381 .04724 m .03006 .04724 L s [(-1)] .01131 .04724 1 0 Mshowa .02381 .17928 m .03006 .17928 L s [(-0.5)] .01131 .17928 1 0 Mshowa .02381 .44335 m .03006 .44335 L s [(0.5)] .01131 .44335 1 0 Mshowa .02381 .57538 m .03006 .57538 L s [(1)] .01131 .57538 1 0 Mshowa .125 Mabswid .02381 .07365 m .02756 .07365 L s .02381 .10006 m .02756 .10006 L s .02381 .12646 m .02756 .12646 L s .02381 .15287 m .02756 .15287 L s .02381 .20569 m .02756 .20569 L s .02381 .23209 m .02756 .23209 L s .02381 .2585 m .02756 .2585 L s .02381 .28491 m .02756 .28491 L s .02381 .33772 m .02756 .33772 L s .02381 .36413 m .02756 .36413 L s .02381 .39053 m .02756 .39053 L s .02381 .41694 m .02756 .41694 L s .02381 .46976 m .02756 .46976 L s .02381 .49616 m .02756 .49616 L s .02381 .52257 m .02756 .52257 L s .02381 .54898 m .02756 .54898 L s .02381 .02084 m .02756 .02084 L s .02381 .60179 m .02756 .60179 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .005 w .03324 .32223 Mdot .04267 .36223 Mdot .0521 .33622 Mdot .06153 .39843 Mdot .07096 .36087 Mdot .08039 .35686 Mdot .08982 .43779 Mdot .09925 .38834 Mdot .10868 .4594 Mdot .1181 .45337 Mdot .12753 .47208 Mdot .13696 .44866 Mdot .14639 .47532 Mdot .15582 .47719 Mdot .16525 .48293 Mdot .17468 .48549 Mdot .18411 .55119 Mdot .19354 .56851 Mdot .20297 .54893 Mdot .2124 .59421 Mdot .22183 .56223 Mdot .23126 .563 Mdot .24069 .53531 Mdot .25012 .59726 Mdot .25955 .60332 Mdot .26898 .57657 Mdot .27841 .58727 Mdot .28784 .59924 Mdot .29727 .57567 Mdot .30669 .56471 Mdot .31612 .58521 Mdot .32555 .57858 Mdot .33498 .57395 Mdot .34441 .57939 Mdot .35384 .51187 Mdot .36327 .53806 Mdot .3727 .51563 Mdot .38213 .5275 Mdot .39156 .46192 Mdot .40099 .49259 Mdot .41042 .49007 Mdot .41985 .49032 Mdot .42928 .4493 Mdot .43871 .43894 Mdot .44814 .39269 Mdot .45757 .3949 Mdot .467 .38354 Mdot .47643 .39163 Mdot .48586 .33973 Mdot .49529 .28909 Mdot .50471 .34508 Mdot .51414 .26002 Mdot .52357 .30819 Mdot .533 .26501 Mdot .54243 .21704 Mdot .55186 .21287 Mdot .56129 .18077 Mdot .57072 .205 Mdot .58015 .21752 Mdot .58958 .17949 Mdot .59901 .16153 Mdot .60844 .16504 Mdot .61787 .15452 Mdot .6273 .15514 Mdot .63673 .12934 Mdot .64616 .12183 Mdot .65559 .06195 Mdot .66502 .06143 Mdot .67445 .0701 Mdot .68388 .04834 Mdot .69331 .06682 Mdot .70273 .04584 Mdot .71216 .01472 Mdot .72159 .03107 Mdot .73102 .06026 Mdot .74045 .03264 Mdot .74988 .0202 Mdot .75931 .0675 Mdot .76874 .0534 Mdot .77817 .01817 Mdot .7876 .02633 Mdot .79703 .03823 Mdot .80646 .08005 Mdot .81589 .07248 Mdot .82532 .08869 Mdot .83475 .08768 Mdot .84418 .13115 Mdot .85361 .11467 Mdot .86304 .14899 Mdot .87247 .14846 Mdot .8819 .16619 Mdot .89132 .14453 Mdot .90075 .16521 Mdot .91018 .18218 Mdot .91961 .17794 Mdot .92904 .25374 Mdot .93847 .22435 Mdot .9479 .22378 Mdot .95733 .26916 Mdot .96676 .29375 Mdot .97619 .27798 Mdot .5 Mabswid [ .02 .02 ] 0 setdash .02381 .22697 m .06206 .34831 L .08197 .40012 L .10378 .44846 L .14296 .51466 L .16234 .53825 L .18307 .55727 L .19318 .56432 L .20416 .5704 L .2092 .57265 L .21453 .57468 L .21953 .57625 L .2241 .57742 L .22888 .57836 L .23108 .5787 L .23342 .579 L .23591 .57924 L .23701 .57933 L .23821 .5794 L .23895 .57944 L .23963 .57947 L .24026 .5795 L .24096 .57952 L .24217 .57954 L .24344 .57954 L .24466 .57953 L .24581 .5795 L .24684 .57946 L .24797 .57941 L .25049 .57923 L .25282 .57901 L .25706 .57844 L .26156 .57763 L .27084 .57528 L .28084 .57175 L .29894 .5629 L .31878 .54979 L .33967 .5325 L .3774 .49347 L .41756 .44314 L .45622 .3887 L .49731 .32723 L .5369 .26725 L .57498 .21138 L .61549 .15666 L .65451 .11119 L .69202 .07658 L .71127 .06305 L .73196 .05217 L .74199 .04837 L Mistroke .74729 .04677 L .75292 .04539 L .75572 .04484 L .75834 .04439 L .7609 .04402 L .76325 .04375 L .76549 .04355 L .76663 .04347 L .76786 .0434 L .76908 .04334 L .77023 .04331 L .77093 .0433 L .77159 .04329 L .77283 .04329 L .77396 .0433 L .77518 .04333 L .77633 .04338 L .77739 .04343 L .77984 .04361 L .78241 .04388 L .78493 .04421 L .78727 .04459 L .79258 .0457 L .80141 .04832 L .81083 .05221 L .821 .05772 L .832 .06528 L .85197 .08337 L .87169 .10709 L .89253 .13885 L .9301 .21467 L .96676 .31362 L Mfstroke [ ] 0 setdash .02381 .2877 m .06206 .35631 L .10378 .42767 L .14296 .48665 L .18064 .53221 L .20002 .55039 L .22075 .56543 L .23086 .57102 L .24184 .57576 L .24687 .57746 L .25221 .57893 L .25677 .57992 L .26178 .58073 L .26424 .58101 L .26554 .58114 L .26693 .58124 L .26826 .58132 L .26946 .58138 L .27068 .58142 L .27182 .58144 L .27293 .58144 L .27411 .58143 L .27512 .58141 L .27623 .58137 L .27742 .58131 L .2787 .58122 L .281 .58103 L .28366 .58072 L .28655 .58029 L .29181 .57925 L .29693 .57792 L .30167 .57642 L .3112 .57259 L .32015 .56804 L .34055 .55429 L .36053 .53647 L .37885 .51662 L .41809 .46427 L .45582 .40408 L .49598 .33369 L .53463 .26437 L .57572 .1942 L .61531 .13478 L .65339 .0891 L .67307 .07093 L .68312 .06323 L .69391 .05619 L .70403 .05078 L .71329 .04688 L .71774 .04536 L Mistroke .72259 .04397 L .72683 .04298 L .73142 .04216 L .73417 .04178 L .7367 .04152 L .73911 .04134 L .74033 .04127 L .74101 .04125 L .74166 .04122 L .74287 .0412 L .74398 .04119 L .74517 .04119 L .74646 .04122 L .74759 .04126 L .74879 .04131 L .75093 .04146 L .75339 .0417 L .75604 .04203 L .76082 .04285 L .76651 .04417 L .77171 .04573 L .78144 .04948 L .79049 .05395 L .811 .06753 L .83129 .08545 L .84971 .10528 L .88934 .15803 L .92748 .21887 L .96676 .2877 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgOol001]oo`8008Qoo`80 06Aoo`03001oogoo009oo`03001oogoo00eoo`006goo00<007oo0000Qgoo00<007ooOol0J7oo00<0 07ooOol03Goo000KOol00`00Ool0001oOol00`00Oomoo`04Ool00`00Oomoo`1ZOol00`00Oomoo`0< Ool001]oo`800003Ool007oo089oo`03001oo`0006eoo`03001oogoo00]oo`006goo00@007ooOol0 08Aoo`03001oogoo06aoo`03001oogoo00]oo`006goo00<007ooOol0:goo0`000goo00<007ooOol0 :Woo0`000Woo00<007ooOol07Woo0P002Goo0P0017oo00<007ooOol0:Woo00<007ooOol00Woo00<0 07ooOol09Woo1P0000=oo`00Ool00goo00<007ooOol00goo000KOol00`00Oomoo`0[Ool00`00Oomo o`02Ool00`00Ool0000/Ool01P00Oomoo`00Ool001moo`03001oogoo00Qoo`03001oo`00009oo`03 001oo`0002Yoo`03001oo`00009oo`03001oo`0002Uoo`80009oo`03001oo`00009oo`03001oo`00 00Aoo`006goo00<007ooOol0;7oo00L007ooOomoo`00Ool0000ZOol4000017oo001oo`007Woo00<0 07ooOol02Goo00<007oo00000Woo00<007oo0000:Woo00<007oo00000Woo00<007oo0000:Goo0P00 0Woo00@007oo001oo`800003Ool007oo00=oo`006goo00<007ooOol0;7oo00L007ooOomoo`00Ool0 000ZOol00`00Ool00002Ool00`00Ool0000NOol00`00Oomoo`09Ool20003Ool00`00Ool0000[Ool0 1`00Oomoogoo001oo`0002Uoo`04001oo`00Ool30002Ool00`00Ool00004Ool001]oo`05001oogoo Ool0000YOol00`00Ool00002Ool00`00Ool0000[Ool20002Ool00`00Ool0000MOol00`00Oomoo`0: Ool00`00Oomoo`02Ool00`00Ool0000ZOol00`00Ool00002Ool00`00Ool0000YOol01000Ool007oo 0`000Woo00<007oo000017oo000KOol20002Ool00`00Oomoo`0XOol00`00Oomoo`02Ool00`00Oomo o`0[Ool01@00Oomoogoo00005Woo00<007ooOol01Goo00<007ooOol02goo0P000goo00<007ooOol0 :Woo00<007ooOol00Woo00<007ooOol09goo0P000Woo00@007oo000000=oo`03001oogoo00=oo`00 6goo0P000goo00<007ooOol0O7oo00<007ooOol0LGoo00<007oo00002Woo000KOol20003Ool00`00 Oomoo`1kOol00`00Oomoo`1oOol001]oo`03001oo`0000=oo`03001oogoo07Yoo`03001oogoo07mo o`006goo00<007oo00000goo00<007ooOol0NGoo00<007ooOol0P7oo000KOol01000Oomoo`00OGoo 0P000Woo00<007ooOol0OGoo000KOol01000Oomoo`00O7oo0P00N7oo00<007ooOol027oo000DOooo 000<0001Ool001]oo`05001oogooOol00007Ool00`00Oomoo`0:Ool00`00Oomoo`09Ool00`00Oomo o`0:Ool00`00Oomoo`09Ool00`00Oomoo`0:Ool00`00Oomoo`0:Ool00`00Oomoo`09Ool00`00Oomo o`0:Ool00`00Oomoo`09Ool01000Ool000002Goo00<007ooOol02Goo00<007ooOol02Woo00<007oo Ool02Goo00<007ooOol02Woo00<007ooOol02Goo00<007ooOol02Woo00<007ooOol02Goo00<007oo Ool02Woo00<007ooOol02Woo00<007ooOol01goo000KOol00`00Ool00002Ool01000Oomoo`00MWoo 00<007ooOol0Pgoo000KOol00`00Oomoo`02Ool01000Oomoo`00MWoo00<007ooOol0Pgoo000KOol0 0`00Oomoo`03Ool00`00Ool0001eOol00`00Oomoo`24Ool001]oo`03001oogoo00=oo`800003Ool0 07oo07=oo`03001oogoo08Aoo`006goo00<007ooOol017oo00<007oo0000LGoo00<007oo0000Qgoo 000KOol20005Ool00`00Ool0001bOol00`00Oomoo`26Ool001]oo`03001oogoo00Eoo`03001oogoo 071oo`8000=oo`03001oogoo089oo`006goo00<007ooOol01Goo00<007ooOol0L7oo00<007ooOol0 Qgoo000KOol00`00Oomoo`06Ool00`00Oomoo`1^Ool20029Ool001]oo`03001oogoo00Ioo`03001o ogoo00=oo`03001oogoo06Qoo`03001oogoo08Qoo`006goo00<007ooOol00Woo00<007ooOol00Woo 0`00KGoo00<007ooOol0R7oo000KOol00`00Oomoo`08Ool00`00Oomoo`1[Ool00`00Oomoo`29Ool0 01]oo`8000Uoo`8006Yoo`03001oo`0008]oo`006goo00<007ooOol02Goo00<007ooOol0Igoo00<0 07oo0000S7oo000KOol00`00Oomoo`09Ool2001XOol2002=Ool001]oo`03001oogoo00Yoo`03001o ogoo06Eoo`03001oo`0008eoo`006goo00<007ooOol02Woo00<007ooOol0IGoo0P00SWoo000KOol0 0`00Oomoo`0;Ool00`00Oomoo`03Ool00`00Oomoo`1MOol00`00Ool0002>Ool001]oo`03001oogoo 00aoo`03001oogoo05moo`05001oogooOol00002Ool00`00Oomoo`2:Ool001]oo`8000eoo`03001o ogoo065oo`03001oo`0008moo`006goo00<007ooOol01goo00<007ooOol00Woo0P00Hgoo00<007oo Ool0SWoo000KOol00`00Oomoo`0Ool00`00Ool00002Ool00`00Oomoo`1AOol01@00Oomoogoo0000 UWoo000;Ool00`00Oomoo`02Ool00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`0@Ool01000 Oomoo`00Dgoo00<007ooOol00P00UWoo000:Ool00`00Ool00007Ool00`00Ool00004Ool00`00Oomo o`0AOol01000Oomoo`00DGoo00D007ooOomoo`0009Moo`002Woo00<007oo00002Goo00<007ooOol0 0Woo0P004Woo00D007ooOomoo`0000Eoo`03001oogoo04Qoo`04001oo`00002HOol000Yoo`03001o o`0000Moo`8000Eoo`03001oogoo019oo`05001oogooOol0001=Ool20002Ool00`00Oomoo`2GOol0 00Yoo`03001oo`0000Moo`03001oogoo00Aoo`03001oogoo019oo`05001oogooOol0001AOol00`00 Oomoo`2GOol000]oo`03001oogoo00Ioo`<000Aoo`03001oogoo01=oo`05001oogooOol0001?Ool0 0`00Oomoo`2HOol001]oo`03001oogoo01Qoo`03001oogoo04=oo`03001oogoo00Ioo`03001oogoo 09Qoo`006goo00<007ooOol06Goo00<007ooOol0AGoo00<007ooOol00Woo00<007ooOol0VGoo000K Ool00`00Oomoo`0EOol01@00Oomoogoo0000AWoo00<007ooOol00Woo00<007ooOol0VWoo000KOol2 000GOol01@00Ool007oo00000Woo00<007ooOol0@7oo00D007ooOomoo`0009eoo`006goo00<007oo Ool05Woo00<007ooOol00Woo00<007ooOol00Woo00<007ooOol0?7oo00<007ooOol00Woo00<007oo Ool0Vgoo000KOol00`00Oomoo`0GOol00`00Oomoo`02Ool00`00Oomoo`03Ool00`00Oomoo`0jOol0 1@00Oomoogoo0000WWoo000KOol00`00Oomoo`0GOol00`00Oomoo`02Ool00`00Oomoo`06Ool00`00 Oomoo`0fOol01@00Oomoogoo0000Wgoo000KOol00`00Oomoo`0HOol00`00Oomoo`02Ool00`00Oomo o`11Ool00`00Ool00002Ool00`00Oomoo`2IOol001]oo`03001oogoo01ioo`03001oogoo03moo`80 0:1oo`006goo00<007ooOol07goo00<007ooOol0?Woo00<007ooOol0Wgoo000KOol2000POol00`00 Oomoo`0hOol00`00Oomoo`02Ool00`00Oomoo`2POol001]oo`03001oogoo01]oo`03001oogoo009o o`03001oogoo03Ioo`03001oogoo009oo`03001oogoo0:5oo`006goo00<007ooOol06goo00<007oo Ool00goo00<007ooOol0=7oo00<007ooOol00Woo00<007ooOol0XWoo000KOol00`00Oomoo`0LOol0 0`00Oomoo`03Ool00`00Oomoo`0_Ool01000Oomoo`001Goo00<007ooOol0XWoo000KOol00`00Oomo o`0LOol00`00Oomoo`04Ool00`00Oomoo`0cOol01000Oomoo`00YGoo000KOol00`00Oomoo`0MOol0 0`00Oomoo`04Ool00`00Oomoo`0dOol00`00Oomoo`2TOol001]oo`03001oogoo01eoo`03001oogoo 00Aoo`03001oogoo03=oo`03001oogoo0:Eoo`006goo0P009Woo00<007ooOol0:goo00<007ooOol0 0goo00@007ooOol00:Eoo`006goo00<007ooOol09Woo00<007ooOol0:Goo00<007ooOol00goo00<0 07ooOol0Ygoo000KOol00`00Oomoo`0WOol00`00Oomoo`0Goo00<007ooOol01goo 00<007ooOol0_7oo000KOol00`00Oomoo`0kOol00`00Oomoo`34Ool001]oo`800?moo`Aoo`006goo 00<007ooOol0ogoo0goo000KOol00`00Oomoo`3oOol3Ool001]oo`03001oogoo0?moo`=oo`006goo 00<007ooOol0ogoo0goo003oOolQOol00?moob5oo`00ogoo8Goo003oOolQOol00?moob5oo`00ogoo 8Goo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-10.9002, -1.26893, 0.398923, 0.0142449}}] }, Open ]], Cell["<Infinity], Cell[CellGroupData[{ Cell["?NonlinearFit", "Input", PageWidth->Infinity], Cell[BoxData[ \("NonlinearFit[data, model, vars, params, (opts)] searches for a \ least-squares fit to a list of data according to the model containing the \ variables vars and the parameters params. Parameters may be expressed as a \ list of symbols or a list of lists, where each parameter is listed with \ starting value(s) and bounds in one of several different ways: {symbol, \ start} or {symbol, min, max} or {symbol, {start1, start2}} or {symbol, \ {start1, start2}, min, max}. The data can have the form {{x1, y1, ..., f1}, \ {x2, y2, ..., f2}, ...}, where the number of coordinates x, y, ... is equal \ to the number of variables in the list vars. The data can also be of the \ form {f1, f2, ...}, with a single coordinate assumed to take values 1, 2, \ .... Method specifies the LevenbergMarquardt or FindMinimum search methods. \ AccuracyGoal and PrecisionGoal specify the number of digits of absolute and \ relative error allowed in the residual sum of squares."\)], "Print"] }, Open ]], Cell["\<\ \ \>", "Input", PageWidth->Infinity], Cell["coords = Table[ i, {i,1,100} ] ;", "Input", PageWidth->Infinity], Cell["pairdata = Table[ {coords[[i]],data[[i]]}, {i,1,100} ] ;", "Input", PageWidth->Infinity], Cell[CellGroupData[{ Cell["\<\ bestfit = NonlinearFit[ pairdata, p1 Sin[ p2 2Pi x / 100 ], x, {p1,p2} ] // Timing\ \>", "Input", PageWidth->Infinity, FontFamily->"Courier New", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[0], Background->GrayLevel[1]], Cell[BoxData[ \({0.621000000000009322`\ Second, 1.01127727016927426`\ Sin[0.0615166850343448423`\ x]}\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ c1 = Part[bestfit,2,1]\ \>", "Input", PageWidth->Infinity], Cell[BoxData[ \(1.01127727016927426`\)], "Output"] }, Open ]], Cell[CellGroupData[{ Cell["c2 = 100 Part[bestfit,2,2,1,1] / ( 2 Pi )", "Input", PageWidth->Infinity], Cell[BoxData[ \(0.97906845058432026`\)], "Output"] }, Open ]], Cell["\<\ fitplot2 = Plot[ c1 Sin[ c2 2Pi x / 100 ], {x,0,100}, DisplayFunction -> Identity ] ;\ \>", "Input", PageWidth->Infinity, FontFamily->"Courier New", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[0], Background->GrayLevel[1]], Cell[CellGroupData[{ Cell["\<\ Show[ {dataplot, fitplot2}, DisplayFunction -> $DisplayFunction ];\ \>", "Input", PageWidth->Infinity, FontFamily->"Courier New", FontSize->12, FontWeight->"Bold", FontColor->GrayLevel[0], Background->GrayLevel[1]], 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 /Courier findfont 10 scalefont setfont % Scaling calculations 0.0238095 0.00942951 0.311314 0.264071 [ [.2124 .29881 -6 -9 ] [.2124 .29881 6 0 ] [.40099 .29881 -6 -9 ] [.40099 .29881 6 0 ] [.58958 .29881 -6 -9 ] [.58958 .29881 6 0 ] [.77817 .29881 -6 -9 ] [.77817 .29881 6 0 ] [.96676 .29881 -9 -9 ] [.96676 .29881 9 0 ] [.01131 .04724 -12 -4.5 ] [.01131 .04724 0 4.5 ] [.01131 .17928 -24 -4.5 ] [.01131 .17928 0 4.5 ] [.01131 .44335 -18 -4.5 ] [.01131 .44335 0 4.5 ] [.01131 .57538 -6 -4.5 ] [.01131 .57538 0 4.5 ] [ 0 0 0 0 ] [ 1 .61803 0 0 ] ] MathScale % Start of Graphics 1 setlinecap 1 setlinejoin newpath 0 g .25 Mabswid .2124 .31131 m .2124 .31756 L s [(20)] .2124 .29881 0 1 Mshowa .40099 .31131 m .40099 .31756 L s [(40)] .40099 .29881 0 1 Mshowa .58958 .31131 m .58958 .31756 L s [(60)] .58958 .29881 0 1 Mshowa .77817 .31131 m .77817 .31756 L s [(80)] .77817 .29881 0 1 Mshowa .96676 .31131 m .96676 .31756 L s [(100)] .96676 .29881 0 1 Mshowa .125 Mabswid .07096 .31131 m .07096 .31506 L s .1181 .31131 m .1181 .31506 L s .16525 .31131 m .16525 .31506 L s .25955 .31131 m .25955 .31506 L s .30669 .31131 m .30669 .31506 L s .35384 .31131 m .35384 .31506 L s .44814 .31131 m .44814 .31506 L s .49529 .31131 m .49529 .31506 L s .54243 .31131 m .54243 .31506 L s .63673 .31131 m .63673 .31506 L s .68388 .31131 m .68388 .31506 L s .73102 .31131 m .73102 .31506 L s .82532 .31131 m .82532 .31506 L s .87247 .31131 m .87247 .31506 L s .91961 .31131 m .91961 .31506 L s .25 Mabswid 0 .31131 m 1 .31131 L s .02381 .04724 m .03006 .04724 L s [(-1)] .01131 .04724 1 0 Mshowa .02381 .17928 m .03006 .17928 L s [(-0.5)] .01131 .17928 1 0 Mshowa .02381 .44335 m .03006 .44335 L s [(0.5)] .01131 .44335 1 0 Mshowa .02381 .57538 m .03006 .57538 L s [(1)] .01131 .57538 1 0 Mshowa .125 Mabswid .02381 .07365 m .02756 .07365 L s .02381 .10006 m .02756 .10006 L s .02381 .12646 m .02756 .12646 L s .02381 .15287 m .02756 .15287 L s .02381 .20569 m .02756 .20569 L s .02381 .23209 m .02756 .23209 L s .02381 .2585 m .02756 .2585 L s .02381 .28491 m .02756 .28491 L s .02381 .33772 m .02756 .33772 L s .02381 .36413 m .02756 .36413 L s .02381 .39053 m .02756 .39053 L s .02381 .41694 m .02756 .41694 L s .02381 .46976 m .02756 .46976 L s .02381 .49616 m .02756 .49616 L s .02381 .52257 m .02756 .52257 L s .02381 .54898 m .02756 .54898 L s .02381 .02084 m .02756 .02084 L s .02381 .60179 m .02756 .60179 L s .25 Mabswid .02381 0 m .02381 .61803 L s 0 0 m 1 0 L 1 .61803 L 0 .61803 L closepath clip newpath .005 w .03324 .32223 Mdot .04267 .36223 Mdot .0521 .33622 Mdot .06153 .39843 Mdot .07096 .36087 Mdot .08039 .35686 Mdot .08982 .43779 Mdot .09925 .38834 Mdot .10868 .4594 Mdot .1181 .45337 Mdot .12753 .47208 Mdot .13696 .44866 Mdot .14639 .47532 Mdot .15582 .47719 Mdot .16525 .48293 Mdot .17468 .48549 Mdot .18411 .55119 Mdot .19354 .56851 Mdot .20297 .54893 Mdot .2124 .59421 Mdot .22183 .56223 Mdot .23126 .563 Mdot .24069 .53531 Mdot .25012 .59726 Mdot .25955 .60332 Mdot .26898 .57657 Mdot .27841 .58727 Mdot .28784 .59924 Mdot .29727 .57567 Mdot .30669 .56471 Mdot .31612 .58521 Mdot .32555 .57858 Mdot .33498 .57395 Mdot .34441 .57939 Mdot .35384 .51187 Mdot .36327 .53806 Mdot .3727 .51563 Mdot .38213 .5275 Mdot .39156 .46192 Mdot .40099 .49259 Mdot .41042 .49007 Mdot .41985 .49032 Mdot .42928 .4493 Mdot .43871 .43894 Mdot .44814 .39269 Mdot .45757 .3949 Mdot .467 .38354 Mdot .47643 .39163 Mdot .48586 .33973 Mdot .49529 .28909 Mdot .50471 .34508 Mdot .51414 .26002 Mdot .52357 .30819 Mdot .533 .26501 Mdot .54243 .21704 Mdot .55186 .21287 Mdot .56129 .18077 Mdot .57072 .205 Mdot .58015 .21752 Mdot .58958 .17949 Mdot .59901 .16153 Mdot .60844 .16504 Mdot .61787 .15452 Mdot .6273 .15514 Mdot .63673 .12934 Mdot .64616 .12183 Mdot .65559 .06195 Mdot .66502 .06143 Mdot .67445 .0701 Mdot .68388 .04834 Mdot .69331 .06682 Mdot .70273 .04584 Mdot .71216 .01472 Mdot .72159 .03107 Mdot .73102 .06026 Mdot .74045 .03264 Mdot .74988 .0202 Mdot .75931 .0675 Mdot .76874 .0534 Mdot .77817 .01817 Mdot .7876 .02633 Mdot .79703 .03823 Mdot .80646 .08005 Mdot .81589 .07248 Mdot .82532 .08869 Mdot .83475 .08768 Mdot .84418 .13115 Mdot .85361 .11467 Mdot .86304 .14899 Mdot .87247 .14846 Mdot .8819 .16619 Mdot .89132 .14453 Mdot .90075 .16521 Mdot .91018 .18218 Mdot .91961 .17794 Mdot .92904 .25374 Mdot .93847 .22435 Mdot .9479 .22378 Mdot .95733 .26916 Mdot .96676 .29375 Mdot .97619 .27798 Mdot .5 Mabswid .02381 .31131 m .06206 .37727 L .10378 .4444 L .14296 .49861 L .18064 .53931 L .20002 .55502 L .22075 .56751 L .23086 .57193 L .23619 .57379 L .24184 .57543 L .24678 .57656 L .24939 .57705 L .25221 .57749 L .25479 .57782 L .25715 .57805 L .25829 .57814 L .25953 .57822 L .2607 .57828 L .26178 .57832 L .26306 .57835 L .2637 .57836 L .2644 .57836 L .26565 .57836 L .26681 .57833 L .26751 .57831 L .26818 .57829 L .26943 .57823 L .27078 .57814 L .27225 .57803 L .27473 .57778 L .27736 .57744 L .2821 .57662 L .28662 .57561 L .29086 .57445 L .30052 .57106 L .31026 .5666 L .32051 .56079 L .33883 .54765 L .37656 .51022 L .41672 .45728 L .45538 .39686 L .49647 .32681 L .53605 .25821 L .57414 .19548 L .61465 .13664 L .63481 .11167 L .65366 .09141 L .67291 .07417 L .69118 .06125 L .70079 .05587 L Mistroke .71126 .05115 L .71587 .04945 L .72079 .04791 L .72508 .04678 L .72962 .04582 L .73215 .04538 L .73494 .04498 L .73747 .04469 L .73982 .04449 L .74126 .0444 L .74196 .04436 L .74261 .04434 L .74383 .0443 L .74447 .04428 L .74515 .04427 L .74583 .04427 L .74655 .04427 L .74724 .04427 L .74786 .04428 L .74856 .0443 L .74932 .04432 L .75085 .04439 L .75221 .04447 L .75348 .04457 L .75587 .0448 L .75843 .04512 L .76121 .04555 L .76622 .04655 L .77084 .04772 L .78046 .05093 L .78945 .05485 L .8099 .06704 L .83003 .08327 L .84839 .10151 L .88781 .15043 L .92573 .20752 L .96608 .27511 L .96676 .27629 L Mfstroke % End of Graphics MathPictureEnd \ \>"], "Graphics", ImageSize->{288, 177.938}, ImageMargins->{{43, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, ImageCache->GraphicsData["Bitmap", "\<\ CF5dJ6E]HGAYHf4PAg9QL6QYHgGoo00<007ooOol097oo000KOol00`00Oomoo`2N Ool01@00Oomoogoo0000>7oo00<007ooOol097oo000KOol00`00Oomoo`2MOol00`00Oomoo`0lOol0 0`00Oomoo`0SOol001]oo`8009eoo`05001oogooOol0000lOol00`00Oomoo`0ROol001]oo`03001o ogoo09aoo`03001oogoo03Qoo`03001oogoo00Aoo`03001oogoo025oo`006goo00<007ooOol0Vgoo 00<007ooOol0@Goo00<007ooOol087oo000KOol00`00Oomoo`2JOol00`00Oomoo`13Ool00`00Oomo o`0OOol001]oo`03001oogoo09Uoo`03001oogoo04Aoo`04001oogoo000NOol001]oo`03001oogoo 09Uoo`03001oogoo049oo`04001oogoo000POol001]oo`03001oogoo09Qoo`03001oogoo045oo`03 001oogoo00=oo`03001oogoo01eoo`006goo00<007ooOol0Ugoo00L007ooOomoo`00Ool00015Ool0 0`00Oomoo`0LOol001]oo`8009Qoo`03001oogoo04Yoo`03001oogoo01]oo`006goo00<007ooOol0 UWoo00<007ooOol0Bgoo00<007ooOol06goo000KOol00`00Oomoo`2EOol01000Oomoo`00B7oo00@0 07ooOomoo`8001]oo`006goo00<007ooOol0U7oo00<007ooOol0Cgoo00<007ooOol06Goo000KOol0 0`00Oomoo`2DOol00`00Oomoo`1?Ool00`00Oomoo`0IOol000]oo`03001oogoo009oo`03001oogoo 009oo`03001oogoo00=oo`03001oogoo09=oo`03001oogoo055oo`05001oogooOol0000FOol000Yo o`03001oo`0000Moo`03001oo`0000Aoo`03001oogoo08aoo`03001oogoo00=oo`8005Aoo`03001o ogoo01Moo`001Goo0`000Woo00<007oo00002Goo00<007ooOol00Woo0P00Tgoo00<007ooOol0Dgoo 00<007ooOol05goo000:Ool00`00Ool00007Ool20005Ool00`00Oomoo`2AOol00`00Oomoo`1EOol0 0`00Oomoo`0FOol000Yoo`03001oo`0000Moo`03001oogoo00Aoo`03001oogoo091oo`03001oogoo 05Moo`03001oogoo01Eoo`002goo00<007ooOol01Woo0`0017oo00<007ooOol0T7oo00<007ooOol0 Egoo00<007ooOol05Goo000KOol00`00Oomoo`2?Ool00`00Oomoo`1IOol00`00Oomoo`0DOol001]o o`03001oogoo08ioo`03001oogoo05]oo`03001oogoo01=oo`006goo00<007ooOol0SWoo00<007oo Ool0Fgoo00<007ooOol04goo000KOol2002>Ool00`00Oomoo`1MOol00`00Oomoo`0BOol001]oo`03 001oogoo08Uoo`05001oogooOol0001POol00`00Oomoo`0AOol001]oo`03001oogoo08Moo`03001o ogoo009oo`03001oogoo009oo`03001oogoo05Yoo`03001oogoo015oo`006goo00<007ooOol0Rgoo 00<007ooOol0HGoo00@007ooOol000moo`006goo00<007ooOol0Rgoo00<007ooOol0HGoo0P004Goo 000KOol00`00Oomoo`2:Ool00`00Oomoo`1SOol00`00Oomoo`0?Ool001]oo`03001oogoo08Yoo`03 001oogoo06=oo`03001oogoo00moo`006goo0P00RWoo00<007ooOol0IGoo00<007ooOol03Woo000K Ool00`00Oomoo`29Ool00`00Oomoo`1UOol00`00Oomoo`0>Ool001]oo`03001oogoo08Qoo`03001o ogoo06Moo`03001oogoo00eoo`006goo00<007ooOol0Qgoo00<007ooOol0JGoo00<007ooOol037oo 000KOol00`00Oomoo`27Ool00`00Oomoo`1SOol00`00Oomoo`03Ool00`00Oomoo`07oo 00<007ooOol0Wgoo000KOol00`00Oomoo`0KOol00`00Oomoo`12Ool01000Oomoo`000Woo00<007oo Ool0VGoo000KOol00`00Oomoo`0KOol00`00Oomoo`11Ool00`00Ool0002POol001]oo`03001oogoo 01aoo`03001oogoo03moo`03001oogoo0:5oo`006goo0P007Woo00<007ooOol0?Woo00<007ooOol0 XGoo000KOol00`00Oomoo`0NOol00`00Oomoo`0lOol00`00Oomoo`2ROol001]oo`03001oogoo01mo o`03001oogoo03Yoo`03001oogoo0:=oo`006goo00<007ooOol087oo00<007ooOol0Goo00<007ooOol01goo00<007ooOol0_7oo000KOol00`00Oomoo`0kOol00`00Oomo o`34Ool001]oo`800?moo`Aoo`006goo00<007ooOol0ogoo0goo000KOol00`00Oomoo`3oOol3Ool0 01]oo`03001oogoo0?moo`=oo`006goo00<007ooOol0ogoo0goo003oOolQOol00?moob5oo`00ogoo 8Goo003oOolQOol00?moob5oo`00ogoo8Goo0000\ \>"], ImageRangeCache->{{{0, 287}, {176.938, 0}} -> {-10.9002, -1.26893, 0.398923, 0.0142449}}] }, Open ]] }, FrontEndVersion->"Microsoft Windows 3.0", ScreenRectangle->{{0, 1024}, {0, 740}}, WindowToolbars->{}, CellGrouping->Manual, WindowSize->{532, 597}, WindowMargins->{{17, Automatic}, {Automatic, 9}}, PrivateNotebookOptions->{"ColorPalette"->{RGBColor, -1}}, ShowCellLabel->True, ShowCellTags->False, RenderingOptions->{"ObjectDithering"->True, "RasterDithering"->False}, StyleDefinitions -> "Report.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[1709, 49, 50, 1, 46, "Text"], Cell[1762, 52, 62, 1, 67, "Section"], Cell[1827, 55, 50, 1, 46, "Text"], Cell[1880, 58, 123, 4, 53, "Input"], Cell[CellGroupData[{ Cell[2028, 66, 98, 1, 35, "Input"], Cell[2129, 69, 12701, 406, 201, 4690, 301, "GraphicsData", "PostScript", "Graphics"] }, Open ]], Cell[CellGroupData[{ Cell[14867, 480, 79, 1, 35, "Input"], Cell[14949, 483, 163, 3, 49, "Output"] }, Open ]], Cell[15127, 489, 183, 5, 71, "Input"], Cell[CellGroupData[{ Cell[15335, 498, 56, 1, 30, "Input"], Cell[15394, 501, 193, 3, 63, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[15624, 509, 119, 4, 48, "Input"], Cell[15746, 515, 16085, 517, 193, 6029, 387, "GraphicsData", "PostScript", "Graphics"] }, Open ]], Cell[CellGroupData[{ Cell[31868, 1037, 64, 1, 30, "Input"], Cell[31935, 1040, 191, 5, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[32163, 1050, 58, 1, 30, "Input"], Cell[32224, 1053, 158, 3, 44, "Message"] }, Open ]], Cell[CellGroupData[{ Cell[32419, 1061, 156, 5, 66, "Input"], Cell[32578, 1068, 71, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[32686, 1074, 57, 1, 30, "Input"], Cell[32746, 1077, 54, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[32837, 1083, 56, 1, 30, "Input"], Cell[32896, 1086, 54, 1, 44, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[32987, 1092, 140, 4, 48, "Input"], Cell[33130, 1098, 136, 2, 40, "Output"] }, Open ]], Cell[33281, 1103, 135, 4, 48, "Input"], Cell[CellGroupData[{ Cell[33441, 1111, 131, 4, 48, "Input"], Cell[33575, 1117, 19307, 622, 186, 7312, 469, "GraphicsData", "PostScript", "Graphics"] }, Open ]], Cell[52897, 1742, 66, 1, 30, "Input"], Cell[CellGroupData[{ Cell[52988, 1747, 53, 1, 30, "Input"], Cell[53044, 1750, 999, 13, 310, "Print"] }, Open ]], Cell[54058, 1766, 49, 4, 48, "Input"], Cell[54110, 1772, 72, 1, 30, "Input"], Cell[54185, 1775, 96, 1, 30, "Input"], Cell[CellGroupData[{ Cell[54306, 1780, 300, 10, 82, "Input"], Cell[54609, 1792, 126, 2, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[54772, 1799, 71, 4, 48, "Input"], Cell[54846, 1805, 54, 1, 29, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[54937, 1811, 81, 1, 30, "Input"], Cell[55021, 1814, 54, 1, 29, "Output"] }, Open ]], Cell[55090, 1818, 272, 9, 64, "Input"], Cell[CellGroupData[{ Cell[55387, 1831, 244, 9, 64, "Input"], Cell[55634, 1842, 16847, 529, 186, 6116, 392, "GraphicsData", "PostScript", "Graphics"] }, Open ]] } ] *) (*********************************************************************** End of Mathematica Notebook file. ***********************************************************************)