From ccc493d716b7ebae10d8890a585f74499db17dbd Mon Sep 17 00:00:00 2001 From: Alex Mikhalev Date: Sat, 13 Apr 2019 15:41:33 -0700 Subject: [PATCH] save mathematica nb --- calib/calib.nb | 1867 ++++++++++++++++++++++++++++++++++++++++-------- 1 file changed, 1577 insertions(+), 290 deletions(-) diff --git a/calib/calib.nb b/calib/calib.nb index a18f846..b822d93 100644 --- a/calib/calib.nb +++ b/calib/calib.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 38929, 850] -NotebookOptionsPosition[ 37210, 812] -NotebookOutlinePosition[ 37546, 827] -CellTagsIndexPosition[ 37503, 824] +NotebookDataLength[ 88290, 2139] +NotebookOptionsPosition[ 85571, 2084] +NotebookOutlinePosition[ 85907, 2099] +CellTagsIndexPosition[ 85864, 2096] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -323,223 +323,238 @@ Cell[BoxData[ Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"maghalfs", "=", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"Max", "[", "#", "]"}], "+", + RowBox[{"Min", "[", "#", "]"}]}], "2"], "&"}], "/@", + RowBox[{"Transpose", "[", "magdata", "]"}]}]}]], "Input", + CellChangeTimes->{{3.764182021637826*^9, 3.764182027880066*^9}, { + 3.764182084668315*^9, 3.76418215424312*^9}}, + CellLabel->"In[57]:=",ExpressionUUID->"ba904e9b-6ade-4303-bb25-888ab020ce48"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"7.796825999999998`", ",", + RowBox[{"-", "3.6735045`"}], ",", + RowBox[{"-", "32.3868135`"}]}], "}"}]], "Output", + CellChangeTimes->{{3.764182125716653*^9, 3.764182154478059*^9}}, + CellLabel->"Out[57]=",ExpressionUUID->"0485d706-ca56-4f1a-b521-d3934aeae8e2"] +}, Open ]], + +Cell[CellGroupData[{ + Cell[BoxData[{ RowBox[{ RowBox[{"magdata2", "=", RowBox[{ RowBox[{ - RowBox[{"#", "-", "magavgs"}], "&"}], "/@", "magdata"}]}], + RowBox[{"#", "-", "maghalfs"}], "&"}], "/@", "magdata"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"plotdata", "[", "magdata2", "]"}]}], "Input", CellChangeTimes->{{3.764181501987578*^9, 3.764181558842853*^9}, { - 3.764181623169281*^9, 3.764181639417089*^9}, {3.764181762202607*^9, - 3.7641818300440407`*^9}}, - CellLabel->"In[42]:=",ExpressionUUID->"bd9700b2-e7a8-4e50-89dd-94e26b677ce3"], + 3.764181623169281*^9, 3.764181639417089*^9}, {3.764181762202607*^9, + 3.7641818300440407`*^9}, 3.764182158698262*^9}, + CellLabel->"In[58]:=",ExpressionUUID->"bd9700b2-e7a8-4e50-89dd-94e26b677ce3"], Cell[BoxData[ GraphicsBox[{{}, {{}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.004583333333333334], AbsoluteThickness[1.6], PointBox[CompressedData[" -1:eJyl2Wk4lGsfAHDLhFJZT2HGMpZhBoOZMWPGMLcl2lQUSTqVVJQlqhM5JaF0 -lOqto1NR0qsVLSQ1mNuR0mmzJSWJhBRFRZ0s7/t+uOfD81znuq/38mXm+n15 -Zp7nev73f6OHRPutVVJQUJj634//fVu7rIwJiDaBgjbbnVVMR0i0R6rzEWG+ -/j/6S5OW8iptGszJq11/dYiL9di9IFlW20zo3kvdM/6OQ/K/rXpi98QZwfKl -fi9Xa3KxvqLvYFc1ywBSdVQrtA15JP+/12tvzyj60KYLb+8bZ1Z7OPyjFwZz -u/cdwttE+S/TRTo60HpJEt9PzZrk400ut+tVFEGn4Za0a69nYL1yROK6rnRM -FvNpJPJ7zCcJzt+sbwSt8dKFpu4NrcbNgyTXhucecDM1g/z0jweGalUBzhX+ -a+6FLrGFe/yakpRnOZLM+/NM5teXHPi564HhgVd4/5xUGLwz3BF+HGswHjDi -kPyt76r33Ug7WB2RmO4Yy8R6qDWRev7WoGyDZ9aTvUU0kvMH47JSJEzgV7SZ -2tKthbVWaBw7qtkOeEbuVT3ZZUhyBDeG0lXaJ4mMOi/rHxZgTStkPJjfZgAv -9X9w+VDrQjKKv5A1t25eF4iwRvEVer/+ck+e+YTdkPu0jqOiCvI12V1lAgrW -dN/x1VNzKGC5z/ihiywlOFGbHxPuPK5tDwKPzBdrDglJrnb+e5fDYRegvclv -i4vUFus7j7xaDlDdwHCZR1rA0FSSE5ovJHxvdJffD8710KZ97Ul3oBy0ac0J -mRnJXg8Z7dxSAaBcoDQpWguxnnI0jcNfZgWMpym5hPqSHbBlpeZmhjkYWDsa -J5nEnbDReTezqae79b091kt6LCr0K6fJ4xHnpk+zhq9o68O0xIyiWnM7kv07 -7r5vU6ND9H9wTnOnrW+Ko8K0W+MvfK35JD8cHxFtnmUIjc41v/lpoxPWbPXr -Zp+dTeH+M8PNfb1CklE8xJbXzHieLcZ63fvpscfdByR/2BanbksRkZyT6ho/ -R5sLfhM9TjxNEU7Y5zMGYbCaG7gvqnepd7XGulMrXrbuAgAjv7xfN5jQJyM6 -XFHX8/EKCRiQcks+9VtBnEtm6yYs0xIDlM+JPq9oQm2dDsD2tkLpKoYJwHnR -iRt/ZBVTQW3MuEGgGsDaskeqv9jZCsYEnC7/7aYzydpnnu10yxJCjuJWS5k6 -C2v/g7B12142VHheL+jxzJQRjfI1yr84Nxs5lG0BJqBgZk+NKJtD8n7XoFeC -zeag8eTQblmPK9ZFUY177sZrQyu/2tCbfW4ko/x77stAxYksJ6zZpZd/Sr9t -BznbtoFBNQuSw9QfyyIW2UO14VzJZMpkgPPGvKy+j6osef4gGsXr6DPdF/cv -O2CdX1N4ZLIhBwbmPXzSka1C8pfIvWvdLwqgwhX9spooFsT53NSOjptKQmiZ -amScXcXB+p5t/t8bPTiwJgR0ZtfaT9hU6+F2u2QeFA+Wv/nRbAGIVvKuMaby -BRDFK864582ffKDzY48mYLxsb0gOZGGdvk/1Rm2KEKzQ/WNVzWHHCTs79G2p -5x1XsGHPlUo/Jx7Jd42/fAqh6oHe4Pzbp4ZFWA+kHlx/7h0XBtnkhNjUO5A8 -1Hi14tBBJ+hRJVoarqyBdZI0bnR9mgWcv+LuQ4GXMcQZ1W/beIG6B58ySLaq -yqm90k0Da06JPOeXCLAuGPZ/0VDqABp4j5gxSq4kBzD4IMhIBMJUFbsdF+Jt -2jp55ptLYhBgY/amUkNIcl2BVodUIAatFjO6Cp7gPSozL8mf5QB8cpV3NVi5 -knw1ZEfl/kZrmCyjBCsM22P9vexCmc1CMTQpcU3bUUYnWeNW2668l45w3tuz -7xoCLQHOoWyfUgP3DtmJI4/iCwbNSfacFyjuesWT12s4P7HxcIn6WQgKxvw6 -FptaQqKfPWAVTpXZgidv2TCcOR3rwkvhjyV+I7Lbg9UrV/sYAJzj1rYaHSnh -wCaDvBUv63gkO7acMbaWMqEs6+DB0UE61lM2VDClfAc4UrH0l8w6RZJRfjsa -PffbMy99iHMHq2VWSRQDZr5Qmva6aUxC9DS/EsulQzzYtqjQZ66MAXCm1GTe -CdMQQVpmrKRQ35hkzrSFkRn9lvD1z6Y6Xr99luHceLpq+dA7e3n/TrTi61N3 -Hy7kQ6MfY9LClwKs/SojrVtu20CUf4k2oGWcu1WpClG84GxyKdS98LkZKO5+ -dieWJiK5uL2Xrm7tDBhGX6sXtDpgvVE94k+/MDegnhMSN0nMwNpsx7B0qpqn -vL8ietl0tutQqwsIWKCxb4sOFeuFvuEqDRYsgOYLROtZmBpqRDgA88wI1+RT -CgBnhp6aWfd7DtCT2int/r1RRvSffy06vrLbGCR498TfSxEAnDU5cTRlmjZo -urligOYPJuyEHXRGFYMOhh5XUZmnhCSjfHrSxYDV9tQM4hyUPrbkedJMwLr1 -vXxSozvJkhH+2x9O9vJ8gHNvW/iWd/vNgNB7vZiVZoM1Oi9RfUs0ms8czE0p -32TBBDij+I5b+SnBuppL8v2jTxffZnJh2KR22qSVDlhPpxxY6trPguERU35Z -PItD8urixQ5FIjZsV+/X1z9tj3X0tc/XmQWaMLas9Bq0YJDcrLsNNPkYy+sh -nFG9zx5/1mq2zJxklK8au90LL1KUsa5e9sy7pEcMUy1dDdb7W0Gi0fwvxjvq -zjwewPryIZuk1Hp7+flCtMtqxk66vxt4XVNrX5hvhPXNHkWT5CgP0Nx8eKOW -jyHAmdkV9DS5lAfGKY/Uj6Vbk7zc8Fh8xOkpAOVznDcEL1rOiNeD6Tndm5/G -mpE8b2CH3VlnC1jhHX4zNEkba5Svv79iwkMfTSHR7B/aRvcfAxDbVlyWfoaN -tY/UsdVb6gGK6XM+fDalkxwfk2h6ud9Nfv2Jmuu1+1pivbr8eeOM8r9Pzpsb -uU4OJJ817+2kejjC7LDrhxOq7bFG+bXL5NSc3a5skh/NnvNI3MiGy4/cl24v -5WB9N25ZHcXfEtIzatuvscRYn4k+Ji1ewoI6J3tbnl8SkQwUHDevi2JCNH/B -OS5x94Z/XeTJ+0+i0Tx6Rlfd1JbtWhDnyC1HQwLe8eEhvb1NZ03NSc7LK90X -TnOCKL5wTli/PYwd7gRXcUq3ZYZByUSN+qfOaelrin35gOg9gVXmG/k8eM9S -tpTix8UatF9/N1NJIr8+0ej3Uf7BGe0vHsx16hAe4mH9lTJ6zxyYAdRvE602 -w+3ayfcvZAfm8sxVA0yxrpm3Q32txlOJUa96jtZrGsnzVcv7B1OHZZd8X27y -bdfEGvXn33QUn9zZpQeIRvNJVJ/jrMLLXq4SbfaPRvNbVN/hjPZVeS3BzUV0 -W5LR/aD5Fc4XhFZvr1N/Arb9nZV7goUko/PJI9tqlwEdYM04Hb13X/4M6Kss -fh17nuz7XvnJZ+hMyFTpq+rNcsQanWe5eQn1baajMpwN7jxKa8/iwrEr57hj -+jRAtNPRwaaRV4Yw9MLQhgUG+li7f86NOpehAq1algQvKNCDRKP3LUPn95QR -4IY1mkdsLjxmeMKAbI1Mi1/r1Nny+gDnC/7srUmHRfJ9C9FonsOPo1hs9eBh -Pe+e8FV8ixtIcvEZyZv5QUK0hmdRW7SzO5j27bpWtLotwBn172j/RTTabyq7 -tfxa5OmEdcarygca2sbyfQLRs590DygurpOh/IOzRyf7zbFvXJA4J7UqROCC -Nerv0Hk6UdOGY1fMiLKBYX3LT/KDxZBoNH+sKxpLMWM6Y43e963xerPhVzHJ -aB+5dnZKudtRgDXaz2+IYoEURwnJqJ4oGHXf4XzJHuv/AKD0a0A= +1:eJyl2Xs4lNkfAHCl2kJFuUQlzLhfZsYMxhgzxyVh06aLobbWRtt2EduFzTYR +7ZKu0m+0lbY2Ue3WDhUqmrNd1q4s2rWskjZkJRWJtKF9e8eZP97z7HOe38Mf +PJ/nGa/3Pd7v5XyP5YrYBStHa2lp6VHf3v3khR15K5Pbw5b7mQV3z7pCpk/f +a5CZt1r/p5PH3NrHM7GFc3MFR8oTeESPkz9+Wj3Ihs/aky4br+ViDndWlvsH +28HVYUWTt2SS3XSq1rqFawPLDdZ22x/jYf5/r/dqp3b7KzkLVuqXXynZ6fyf +7rvk4ubLciFaYXbimzPZVjA1NCgnWccGc/Kewm18nja0443/fkbFBKLZ9E9T ++GdK03Q/rh4gefQPCi8+jwWV3/2yMCxqIuY6+nNOsKNi1RbzViOiVxRXO/B5 +fHh34YZ5nTc8MBdXqZb1RXnAOe2rOjYvExLdvKeSldTlCf204jobcgSYk1L7 +Olq8BTAmtpj9XpwL0Rn24S3rKozhffa47f+TsTDnNYgnpfIswLclLSHbWqYT +rfu++Pi6ChsQfPnNjFndLMwSk9riyl/04I+xfrvr40VEG8ZV9+TLbeDbBP8v +O2wBZhR/RdGLdxwpEhON4kuvUmf2lZP2I/buFLeqvKh/VHkT005tNzEkusu6 ++VwP560K1OpKfv2lUjpS+xh5rKfuB4w5oIy1TfCATPtyGi9zdTzBmhize2vL +7Igety/2uZnSGyijywMshrpVTIt+M522JRMA9DwkZ17JkT+SAfDdh6cHqOtj +vq4ab0bFAwg/c/zbjjNeRI/vOxS4WmEONk46NiGkBvfxooAxLVxjMHvV17Pt +driN2CjfranfcfGnNXyip2fdGpyzzUITjyRvMHiwMyLbGk7zibIJNXDF/OGb +0YkPjR0guh+Sg0UVP1LxBhuvHMkXnRVi7jx0xfGq0hZuyN+kHHosIlrAflbw +MsgR/vVt1qm61WLMKB5+uhbd8uMMKdGfvCtcCl3Y6TJ/QaS2N2bPFyA609gZ +NHmtmZue6jViq+uQNygx//JJqDmX6AA6/4gBjAhWZHFfS5lue9m79dc6EQhS +5zNIsqu470J4hgdA9Zzpyj7L2MsKL2DV3LbIlW0NSE6vSex35WmDxA0h2yvn ++BCt0BpYeDaXC2/JvDI2uktwn+ud7cuSwLva5+D+CRyiXRYNXSqt4MOn0XEH +Syu0MaN6jeovyYHqfA8ijOcOUOuPWY+uH8Yg+fCSIup9Izpyft6d1mAruC00 +Zcj3PMCM6u+CnsUvCma6E324vSc0IFoAMzZJ8y10LTA/Men8KqZeAGuTfX7L +lxsDkoUfdZb1Z/A09YNpFK+hDcq8QgcB0dw/Kpfo5LrDN7KwwweDjTB/nnjK +yY8rhuHfP7R6FWcNSXYw1TpLxQP8PTVlwUV/LtHq+3GH7dcDOWtOOo3YxzyM +zlD1CLbSceQAmP5qYVvb9DIviOKVZNJ6R9L94u+qqibTmMVhHKLH0/23ABQY +CZwL9IUjtll4ebeftwhcS3t/r1exO+b2ouehSYOvpJLlgWlp8d5EbzpwziU/ +TgjPO4s5RqECzIkPq77MNPaG3Z9MbJLJTYlOq724a7XCBQ6o3ydIMurfqnkW +X5TVW2IWWoV+GpE9FkzOOZYQ5eFG9MK6WJu8KAeQxOcto/I55nftRkS2GzAc +t9KMqv9EH6t58kEzSwhGO6YZN+x3xzzvRI/ZVaUH2MlONL0134PoHnqd7MHr +46suUP0J5ntljbZzPnOFy7feMed0ORH9rkwarwWwS73+mA9Q7UNelAj2/H0v +5VSYEyC5oX77xoBoQ+irGDs1qcseM5SINj+ScTX9GslzLazjqXwGxg6YBaWw +rSDTdwqfzdItYIPIopyigOiXKpJLjk7Rz+KawuHfByS/+ezNoyxvD+gww8eB +Wn/M5v88C1NE8+An35TbVXfZEL03vrHrapkbrGo9ErO+dQpmVN/S6fd8EiS5 +3Y964bdyYO9VpdvSAgPA9P7ltc9kck+YRucpR6LV15XAopDuktMZbMwz6H6S +C5er11NKsozO826a/TvTOzpL91D9C6x4veL5rWVuRDs9rf1wfasrRPWXaTOg +ev5gYCZE8UKygI5/IxDZ5tW/Mwf3cH0DuZ6FL26XuhC9SOdKWW6QBETlODzg +SyyJbo7/NHz3TR+A9ldM143ST+gN8wTjgr4Ju2NiAEkOEjp/fsfEEqD5AtP2 +dB9kDz6m+5QpRM+m86kTEE89zFZEj8K8jlfwukShC6oDdwQotUVEa9Ff7eLk +ku9kmQd9RuyOnys4qTx9EFzzUbvBTDFmVE/bNt+0nK6cCUkWrjRtDs/ulQ5f +H3PCA564L8pWUw9I/nnP0srqQWpf6s85GZ5hSzTKl6i/ZRrNZzxOlYb5slyI +RvFdGbk70NDfHfNcdX2Bpe8Gfff5RGfsbX0xa4gHy2LyfMU3BZgvtpV/tCSX +DwUTM9pGmfOJvtZ9aZUi2hKaqbqCD7AcMR+i64sOQP0QyajfV8eFPWZUr0Rb +Mif0y6cSzb6QmHavGKD5FGQazf/27gGl5x97E/3B+JmbJmTbafIL0/30XFIC +9t+IHNIpMCQ6vnlD6WhHH2D4XOuDJbksQLJ6fsYFtep+GvNW+n57VKiekyye +03r1YLA15J+cNTE/zg5zKJ3vXOCkkIbH78lnEI3q9fB8DzJ99/F7m6l+EVQ0 +bmVR/TTRepfytpQn+IBpEqs8/+BpmOPq/pIvDpNqrj9SV3o1Tpp4u0uF1ptk +VP9PnEhK2VXMx2xD52NP2LV63vJof7JRfR2er2PuUF53ntXNhz8cXJlO9btE +t9H5lAs371t3/vAZCdGLbj5mLy3gwVVHvzp93d4b88ndJVoCCU8zfyF5YNdx +XhbXU7P/ZBrNo6elpq1+MDCoIrkrudBeFucFaxyPJeYGmUOm7Qrr5q85KYYo +vkge2niIw+kSw1t0Hh8DRmq0fxJOtuXm1Agx66x8+GRtmRBOt1/KflrjRvRw +P6G5PtPo76P6QzI6v0gIOmoUauBKdJO6fgG032Y6xm93fWnFVFixr99ordKM +6PnL4G292/qoX8b810bbP5MGTeCndN/xRkUy2p/n0u+dJWAazSdRf06yHp3H +nP7TaH6L+juS0XnV4J9saTPLDjKNngfNr4gWJ8/eNvi3tKEzsDfnvjtmlJ9c +PS/x597wJvprej7FhvPGNvYMVEswt3Nept8x4cE/xoS+ouo90SifCR+kP4vI +fiQleXg/DfOX6F6o0WEBpq2iLr1OGrSFd8MuVPVnWBJ9jj53m4nO3yDT6H1r +nTLHPH0UIBrNIw4szVr/fpEU8wT1+SpA/QHJ7CD988k67przFqbRPEcd5zyi +DVMW977gSMHbiJ4WzqAOYProF4H9Tc+lYIl88+LjY3hEo/07Ov9iGp1vynyp +DHFDRHSIuj/SnCcwPYr+/FRN/SE56QdLoUuLC/g92HI/tf5Eo/0dyqcjtUF6 +fa/uNVdo2KmqCrnvCZlG80d54YoS6vnIHn7fLT/f+kV9vAgzOo+MVz8/0eh8 +3jhm70bq/4UZ9ROF/SEfU/0f0f8C7iR2IA== "]]}, {RGBColor[0.880722, 0.611041, 0.142051], PointSize[0.004583333333333334], AbsoluteThickness[1.6], PointBox[CompressedData[" -1:eJyl2Xk01GsfAPDJEi7eSMKEsQ3GOmY1Y5ZnkKWiKEulsr5JZYsS3ZIk5Vba -1M2SFCpRoZJtnm65V5ciCi1CCVGK7rWkeN/3j58/5nfued5z/DNzPufMec78 -lu/zXR79wAjPECkCgaD034//fbO7LPc+oDBh66ADiPTign+ycB/n9eQw3rn5 -zZtvjtGhnLv67b4qDtL2g0tSZj7QYHqJjap+oB3ONT6erwNU6FDjitEiZQMe -0kvU5GoX6jBgaLu2K+MM3tjvD/CINzOq0K48PEOpc7CZXV/SK/3o/YfTbeDK -Fy52el58pM3X7Gd5yptDx4UKPr/yAc69OjGpt7oXw2NTebengtCO+vJ9+2TU -FyHBnFTkVCVE2sC+tZPUMSq8MWW8k+SCNyvt89GxZjlAUzZIiHDhIZ3i2bZf -eikTvF56PCz2GwXnr30NOkffMAGM7nFzyFOAKH+ebiWN6NLA/Os1xveEVJzr -tu1LY0ZTAM+wtE9dUYB0mGNW06EybfAmY48d1dcRZ8+yHUte9auCgfTUuJN7 -0Xbcfkgus08H+GYftnU854Dz9vBC8fA4G/h+7ij4XUOI9LXhj/yPzXyQ/kQq -MLbMFOfAoHt3S9lcEEkqrCOO6wKUgx+1FA3kGwEsvubq6ypWfdVsGbCx0Uo0 -8UyA9Hq3mfSrZlKQrUZadTwbzNm+p1bwVMY4sJRFTjI8zMR5YaRnDL/KEv6W -zuhx/cxGerzaIdV7TAnmrnfee8OVijN2PbarF5RUjmsiLb0uMui82BDkWrW6 -yjlPiSUtc0WmbZ45B0Q+96hXICsClEnKUvxgDw644JtzUqXYGueRkB9xQlk6 -wK5/rtZoG+jvHKKCPdvMyjfy0MbicYCgt2rgOdqp+46VNRtZgwA5S7fv6nhj -/2cjibnS39sG6dR7My89zFmgPDw+L9XSHGfdgo536lttgc/jMKV2NQukf7k4 -3vFpkAOoCpU3r5JlcY6uqV/8IpsHrkW1f/BSokGUz1mWH9yVzAXecj1XzHzt -cD7CfbLvggwHaF4EOy2i2XP2I24Lv0VgDtLXLaY8MSMClL/vHPr3aMIncQXv -8RryNwucR6rod74Mm8KOApWR+xF0pLF8TthLvlfCo+Ec31VS5W+sB6pPRF43 -tSIj3Rw1Q/SVB8CFaHKlkKUOUY7yvlBz5K4dcEmqarsspYMzbV6siVjRDKQW -uLLe5UkjTXjRwh5wzBAXPFTW//UtC0gay7+58qJI53o+0sUaA/XcbNo/+lnm -WJJ4QADbyPYrYjKoSJt6Ngff/SSC/oSvZT4sTSjpgr9Gas9n2UJbu8qB3cu5 -SNN27QKj8mR41K2rUmFUhLP8eJ5QQUYBjH/q8KkrAkhj+aNYRjgZeBDvH+2L -Xj4qsgGR+yu++b5H2ze/selt9nwgD7ujLlwW4Ey4oVVdH24GaVv//ChqpCFt -clCXlP2ABrH3A+X6QNCb3UyFSl94RM47KpireaM176Y6yGCBPTslO94UZyxe -ByftSuWMbSDK2P294xBsTREIcTZ+3dN6wNcMVIw6MU+l2SO9YdE5//oTTOCn -QtvcEEKfs8NSbtz3tGUAi5GTBhOshTgP+l2vzBnnAtb2zazOvbZIr7PIDbRo -sQHUAH7Qb/sscXZ4wPXZIr0ArLA23ShVbwBQXrHh90a2EwkOrxQVtiRwkd7F -8F10/LkxDBM45SUl8HEOyuE6rrjDhlEBvOsGe9hItzIeU6KkBPB05fpeuwBj -nEPl5vUzVwpgM/VYOXGLNkTZ28Lw3f0FHBhMyewf0jLFuZO8uK+4iQNThVnX -RE26SLvlSSe2mgrgkG1spFu8OZD0AbGMH2GcCrH6AGW9O4LUn6v1YfOV58v8 -1hJwXv7+0odWXxMQLnv7juAcF6J8/tTj3cWjRmBPUDXTp8ERZ6xeyyJqx9zc -6IB08bTn29UGJjAo6clX96UinJveW8EtlH/B68pS8alvHJGuHK3bFOBGBP5n -z8QW1Dog3UbM3/D6KQPkvmg8NjbeK5a0OOv48R+j+gB7f1D+XuuzM+PpPKBH -c9w1JY/36YhlE+1OWrDioNMLZWsu0hkvpZS726aFBy85KLy/yMe5a1WJ2zKx -Mcjq9Bh+FaCHtHZGtLBEiwRK1jb1jzQwoaS7NxqoOR35KsaeJ8pY/551cpF1 -8IgAZ92p6aqS12xI2OD07KcwNaSx/Lsim+lls1ETSBqLl8NvROof3tKRLu9v -fxitzf1HG+v+XefeaTMbLygr5gbGyfKMocvL5Pkzp8yQxvorLL9J2tt9weEY -tSUQMoqHQhTtkMbmC1JbyjixRQ44G2VsExzIIYDogZ7VhQ0ipDWrrKWSzjwT -l0xwJ6gh9jgnOA/s/iOZDWy9NjF2C3hIt93dMKLtBUCjYWpoe6PZnD325MES -Sg4HYNcv6Uw+0azruSHE4hlls3uTNbLP7CHW70saywe3ck2+DPlTAMoc5808 -s1SL2Xkdylh9m3NRQ2Oyh4fz8bzkmkgyBRw9G/Iy098C6bhNXxLM6+gg0c/U -aWnipFDSobI92rKbbMBYr1S4eQgHorxl2087Vy+lAaNf5Girbglx7lEc1tK6 -QAUFq/ZSPGr5SEdXV9yCZGPAGrWc0iY74IzVQx8jav6Wf4+21Ux7p+Fao9n9 -W9LP+u1LrspIA2/9lL8oy/lIHzQREDd7mUJsv5d0lHP4w+UMALF+F2Vsf9Fe -tmL3Jlc6zt31zdSS67oQ669R7ug4sVXVTQc0f0gr7JVWhSjPyDxWPJtmDj4c -qhvfRgY4Y/ncs3ZN1WMbR6TTcvt3PI82BEomOozAOHuca5233A3evxAMJdwf -48qiPfmGAtM/G0As/0s6uqu8Ou2iFVxn31Vu9asN0uX6rh+/GujDiq1r/rRp -VscZW/9SsWhQrccEzNXY/cbmyyi75b67nWdrA/5M9i4llBjjnB1aeiKhjjob -ryj36eW4JgmsQEHC6aybxRQg6fWnHlXFV9Bm+xuU9Y8199wy44EJU2bOkywN -iLJa5uCrF9e4wG9t0VDZeT2csflL5ADLu66MjDTWf1anPHGpNVcFkl7c91Tp -VbwqpD28MpaiZo10uuahtksGRpDbn0MwWUTBeTa+vvgv3rXIGGl/WsWujFAo -xO7XXN2rnBZU7sECLS4fb9m/oEJJ/2Ei9pHxpIOfStZFrhllIo2tj/Wnksby -DzaPQrlhme1bTjoDPj1A7NeP4CCN9dvY+YSkjy5jGMl5G8Cq7YL2q8N8pHUH -FXNVu7Vn5zWSvubxOtKjRwW2tdgJlNQFSE+ozWt6mKgJMu+RtDYYcHDG6nPs -fOn/dZGaddyBVDucsfrOLZr09mk4D+n8V34dZfqWUGuB+/b18nycsfkVdj6H -suVw7/0UPw4c3Ox6lVXNwtkh2zSRqA9m8wvKHtK87uhCAP2bGOFjz2WgpCnz -Pz0YzGLCNmrvjTfnGEjn5Se0dBn8EJ8sdNsBSllIT98ooE9raYOK4JrPlr/Q -cQ6+MhbmTtQCD7XzP8xrECBt+mqNn3uxJgxMOxETk7MU52NqZ5K/AxG8lraH -6TVDR3pHyVmd80QR9D9ZcflyOglIGqsPzP+q+OZ+2gRp7Lzl5rZO30/xZJxZ -cTLkWAfG7H6H8n6+2/d8jY9C7HxQ0soTpaoRipbAdoJUoKAwH6KMnX8lNkZE -NEbb4CwterWnzNF2tp9EGTtPuByaYn57moMzln9i7u/fnF5KR3qf68EHgWz+ -7HwZZWw/XahyxJbrbAbm6tBP6zNZfjyY+K2oMkkshfPTsulkQ4odPNd4pOEu -UxeiHLtb0wX+zYOAujVij50yziEuyTWi02B2fZTDws1AMlMI454d70gLMMS5 -+If9z3bXqDDzyPLuHd2WSP8HJp4FAQ== +1:eJyl2Xs41FkfAHCim8vGhoTc1z0zY9yZmTODYkKpdUnlbRtdVMp2s7Umwka6 +LCV2a3VhGLQbSqglpyTrkqbLhkIX0mVVrpve0Pvr4fhjztNz3ufxz3g+zzPO +zO/MOed7OQZrti5dO0VGRkaJevn8t6Mtpehhvg38tKYk1D+AA77kTe/PyTx+ +h9tbZHuyJpIBmTcTWurL2US/fRl9WWMTHYbMvqsVxwCYwwJKZu1OoUPD5EU6 +u1PIrlHd1Gt+igHrxDUlSvW40fuDghe8ZrWT3aBSc6XswPyJ8aX97yVrO56R +NazIbSuYYsklOs7PKyNGwQQG+/JeKV7lYTZjzPhdp24mFDm0LtzSSXZzbLu2 +G10JpN3564V6CNmF52qXBQiUwZvL3j6xxrhf163frdupDgp4dYvzRYDoh8u2 ++XZXOQAt7SsteqMMzAtfrn+9c5UjABmh5+prhzkku8lEdLdk2ILi9WnyuUIT +KO3wraXG0yOsgco5znW6ghPRbcbT9h0PNAJ/BbvlVTRxMWeWdfjs7dAGd79d +3KU3Sjb/8kcdvV4jwPtuSc6dObivbXU71LTLGVhFrot9quFM9KdI959emwIQ +Ue5iEyCYh5nadfEnS1yBSkzZuUChOSBZqUHB40qWOUD7a7LOUU7I3jdHDXhk +Si68fc0lGtxXZN+qbeD4LA56JqvrNmnLHy3cahrpANvPp+fMSHLGvDFc69Gm +CjP4doZ4Kq3HlejC0JoF+qO9lQ33Lmem8u0wo+cZ+LX7tFhoQvS5lbnD1PhA +xSJ/b7ZAAXNQ3pnM13kuoHjthytK9fpEb//q1EwfiQuIEl0LD2+yxeyx/lcP +s3g7gJ5/st7YFF98cyMT5Hb+1uzGIhvtR7XdR3fcekC2Jldg4qdqAw5Hn/6e +Wu+Y0fdJShdv9wi0J7r1ykmxc74j2F9QsDMv3QbzNvGOwtFXzqC5XZwvUWAS +/STzWPaDMFfg+dxkY1iaLuabV0M7rulwwHBfbdJTDQtIcrf1kqWr5VjA4uct +8dT3xdzustE7Mc4FdJs1+i383mbSLtP96R8/XTo4My9iFWOOKSAZLuenHaN/ +4CRqtDS+FzIxe42dZ1BeL05dHOFINIrnVv+mtx1jOWA2fNb1rY3xN0At1n+w +j0Yjes82n30NC7kg5td7axmMe5UkVwe6JG23ZwO6W8cB/VFZKO2Hcn/A5Jk0 +0KzFf+MRKg9IfhMakVpeJwfuusZ47O1wwYzi77rPExfKJXq5hvcwNf9fdMyJ +4BJqvcEpp4ojlqfbEb3XL3aUdx5AuFeUqFTfUyntpf3+fUXz7KFS1cIb1HkG +SU7awRHrK+rDt4beftYdbMz3Y7h3xUINcF3AOZgd4Eo0ih/WKYqNT2bi9msp +zLlgQcXzpFFJQy3ZHwMDTqTy1QGV7fhcyXLCHPT7U8P3Ed9Apa6C5MtplkTf +i4tdWuxOh2h9kPzyuidtY5YVdNxQwNbttAOTdefAYNStBxbAdu6RF0w2AzPa +r1Fyx7Q9+GaQZDS/SfW9Cu4sZ8yN7XPD/QNoILNEOUtfERBdpG47v0jFEaym +R//UUGs1aV9NWHTEpdQegKEt/TdrWznSZod4JiTsYgGFwQHVISETknx+vitN +3c8WNEcEaQ0JjTD3rlNuDxTOBSI9ZTH1+YDk4bH1BLX+ulhfGsUh+jZD/8eK +JgO4aMXKDiabi3lWxqlIgYMdzGg5L5kudCU6mslYRZ3ncJf/GY04Bh2z2rS1 +WlT8h+BMoodSvQwkeYplgkZLsj3U3LaZ5UbXwXzAeM/c6iUOsLBCxAhOn0r0 +hzPrL1L5CcxU+6NV8aoNkHZI1B1dWo8VRPkByT1j8w81L9mW8ug6mPtfPIrN +DrACvMO8o9R5B0nmpU2dHd1jDtaZxmV18nmYUb62v/3ZU6qeI3rqsJZXrLEh +PHHIoqrsAAvz6pKMkgWhA5Xj9RTR4/8P+GPrg2gLHa4FNf8gyqOn8nioKpD2 +utM1Zrd7TABaPyQ3dp4M39L5NfDOLzlJnb+YE+8XHwxL+wp2jpSN9NE4RA/+ +WWi3okgVNCs/0ljrx8WcsKyrS7vCEgzcsnfIEVgQXeLTW5abZAxin66sUqqn +Q2mHjM0nB/2eJKP6PUIrUyG6xwlz3Yc176pX2UGZXRGFDowqDsko/o5eje5/ +RjcB0kb75VJAsVNjhyPRq7tchg5kfNkipwt99eXWE/uFZEGGxWMm2wAueV4s +7uTbEI3qKxTfpD3N63TAnTmqMLXcuSZGwZ5o1F/ottojnmLJxfy5LO7kfw3K +gvziwtLYRLvOPmGcFioL6LvlGqJqOZhve8YvKJRzBkpt3bNSWQ5Efy6LU1K5 +YAczS0+5Xn/S5kv+81J1nitAzy/trp03DLQL50G0n0keHx+iel/aKB7Ee+7X +WVHEACSnuNOygpJMJ/p1JKP89rlS9bytvQCzQ3Z5AM/IGvS5ZasyGUyiG1Yf +8lRztweS98s6sgVamMunCV+9aWOCus3JXgtCbSHJFeE5PNcbtmBo9nHlTYXO +mG2Vk7pkdZlgT7Pi1M0VjkRrVfbwjxpZAv2SgQ35IoAZ5UMPmPECKj8n+oGs +SuRggPnE+S1t590pM4eEs4FF3myJO9+R6PH+FETnvbSPHAbl51+xIKp3SUbn +i+f1qxnU+JiTq1aPKhSpQVRfk6z2TmZxsMgIyJS+84seecEh+f5YPg1y0jXr +B7xcoLRRPHeN1TZfUcQl+vM2FEeYge6/a9wev+Ng/sqn5dV0oQ7Ij1apTZ5J +9nh/D6L4L+261igjKp+GK1Nb9I/RzYnWZBvmuPM1YUxhbuK92tZKaaPxR32P +zd3aSweTNZpv1F8m+ezZ6NiDpUyQciVD+DyQjrknzDck1J05sV9JHu+vg0+X +yrdVNDEwF6SuTaTy3Yn6huSdP28+fyKPDQAvWCCp7a4kef1v+3Ovm7OAimju +wRyBApQ26r/Qe7K0/hXMIRrVnyVM7/C8dEMgbc24hLDHwyOVHg9vns5NsiVa +Ynlqj8hLF9b+c000lMTAjPbXip7MAn1FOtHVh1c03B6Rn5ivydpxlik9Q+II +vM/2a/1ZaAqlTe064zcSO9Bu93IRtd6IRuOj+lTaKP6gfhTJkV6/qfup2sCR +j4cUp0ewiUb1NrqfkHbdz0Pqmwq14MC2ZmFNJJfo8Xx5ol8j7Q2Mog9laR8r +930TWDSURLboUJmMLdsA1DCOsnhGbMwoP0f3S/+vu6uX+Ba740b5HWvQM+5R +KdkjzcacZ0ZmMNPtiecZeS5m1L9C93Mkt3R7Dma02UONJ3/e0q5wwWzjdInp +XcWaiC8k+05t7R++zYYyfSGXbBhymP+W93tPxXv47fcdGv00GiTZ8XHi2+Xp +zznraI98qfyJaHGw4kWJghHQbDmelqIxH/PDgIuNQ0kG4BeRTbVOnRPR4/dv +0HvsvgNz59cLdRNlARw2UTN8Mjyf6KMrjm1ZVMKBiU7ckzp15kDaKD/g9TWe +peorotF9y4xV18+WRtEwP9u1IejQDQZE5x3Jn5b3d9BGFCbuB6UdLNzpf0ae +Acxqtwv1RmWJRvdfubn/Pd7YYQalHcijTogq54l6kmR0n/BDz+zpkhFbzCj+ +JB/V3R8gmE/0Pb5BMjX/E/1lktF5ahdTCmKNbSZtte7KRp82J9jTpvfOXzAP +s/DCmjLq+aCkad/2BaHykGSDH6J+bNrlDIGh34bl6YMcae8ae/6J8UnWCD+y +nfq9oOTGDgNqvjBfGPL5jsr/4B7WL2p6vUyi/wcUthmI "]]}, {RGBColor[0.560181, 0.691569, 0.194885], PointSize[0.004583333333333334], AbsoluteThickness[1.6], PointBox[CompressedData[" -1:eJyl2Xk0lOsfAHDJtYTsWTO2GcYyZoYZxmzPzFhvKRVCJURStqRfpLSSrpKW -23JToUJZEnInikf7jbTZWhCpSKnURenWr98593XPed8/nvs7/pk5n3NmOe/7 -Pt/n+3y/X9OwuPkRsjIyMio/Xv73/vC1BMT7uQAb/tLV/nEmEG/hJs7Tz0Mu -QJLG3c8p0SdYYY7OhZe1HPCpTWNqiKYR0tllDA3TMC74djOoPqdbl2DdIgtt -VTMeOGXVn5CeZIz0inYjL8dfeeCcPsP+qpsBwdt4BuUHa//5PMrY7/f0ZFW+ -6dYmeO4jT66JH/9f21VTaeERPgAmU2+b+WhpEZw1nn9hfBkAR9r4NQ/kpwCU -ZWxIxe61QrD0q1CwXPqtHuVz45T/kDyFYMzmQtAyd22IN1PVLCXOkwfuReXv -FpmZI/3Ubc/KtV+ooM5v2c1wXzuCYUKPtyRfCTpeyTv451Mm0vIllykXhXQY -vKVscWoUi2CeecVLHWUBHHtb7nEjxh7proMbuPQAVzjSucmw8OJwPd792RlJ -+1JdYclwUs52IRWgHHBsp7PrYQnUCE+ixXbYE/2uo+CGrhBGO6yWeyl9K0Q5 -u1k2bG2lFTQqozTO7jaAeMeTCq8bjBpPxB/K/2/8oRzcRBONtQjAw/zW+0x5 -BYCykxbJZ88xAEznfQ9VyZWbtCvY5K3mO1nA4hAn9YgmneAr2Y49Xu+cwHXu -l82MvXykcxd5pJ7zooNrd9yf7DYUEey8QK2sZlQPpHQUpXxuESOdS3vopeAx -Xv8A2vZEHCU6vnXeLSWyMnBvovQ4SJ2QPhFwfJ96qT2YdiCDyQ60Ihi7fv/E -peprKBaT9oZo66pgHmtiv0O5X8bEp7+VBXz7yXX6DapIhyrYeX/VYYG2926j -5zT1CQ4mseaG+DOAX++NwW5FU6SrYtfnZ9jZgAyxUWRbkiHBC++sVGnXsgVN -37+6rHGbiTRdqab8DPknQFOuMP/INSP47Or2AT8VJsTiAWV/hZ4i6wAuXD44 -PeGI+IMQb7088B/bBCeYmyZI9tJ0AJN1dtAMarO1ASjMGoaLFUVIS3l3fMlf -bEGfRnL98iJAcEeB+oeGOAcQNUXbtXmJEGmZVPLFMh4TVHtqpwRq8Ai+tDe+ -xIpGBoVTTAw7pwOkPQ0siwrZOtDntwuHc6oM0d5a23ZKdia07K/VX8C1gnhn -FHixn+dPhZp57amiHA7SBddUTY/0soHfHti5bgeN4FxFUbzHLf5Evv637jBm -XEoEJgDvNrJ4duJBOtglCOpyWmOBdIjMx8qFbD1YGduSfiNZE+LtzK3pT57l -ArH8i/Ju7+4apWERpEmLdTJr7Akefdux8HoxgCuUm+ujfehIl8oJP4elAbjq -dM7bdwrWBMdvkX4JeAEgFq8oK8Jnq0+cEsCSW2X7lWYyCWauuv1G1PQj/mJ2 -RIjPOCGNrY8Cld7e32U5SKu85xlwntPBTbuSL6skzElbTeyUfmy9FTC0Ge2x -3+ZI8OvP3AoFCgPKetwiGbKdkK6WhNtTBcKJ+4u3dNidtT9TDNlKu/ve9asD -lBerMyMbIxxg5k6FC/e2cyZt2w/7zMbYmvBY+Aup6zUBweyYSHZnqjO8Qfr0 -PsxQD2l6KH/ZlU128EPansiCAQeI92x7q2DZW2ZgpKW8LnuPM9JDc0WFD1Jc -wJbapL8iM8hIrxS4529N4QPs/Ib36lBeidkGJ2B1NffeuVdGAOUDNYv6uKEU -UDrq9/ihlEHwPXpWlUHUj7xCYYMgYxekw6lHXw3qW0GzTiXd52d5BGcIc86K -7hrD+6UavbVOaA86r433Xm8D/qq3qC5xYxCMnQ/KwzY27GqxgSjfK2r9eXGg -DPh8qeiS7VwewbE/XagWHHaBahe7N59+ykJ6w7JLrIWNrjCc5i01EPfW451j -YJRYHiyBrrMCeC+7HAHKy7Y2f5zjJoJ3bSX82GAOwSWqsuszulxhe6N1mUq9 -HdIhh35dW1AngWVno5qF87/Wo5z7qClrZLSvPimi03h/NRPija0f1pM8kk0t -FWkTpuu6cUUnMG1lHbWWzSBYmub+SNXeZSK/oZx2UqL0Io8Peq2fuFXHUgjO -6Zw39CTUBKjOr7ZcOOKIdFng3VcfGllQ7tbBayvUXAjGnidTdW5M1pAl0jn7 -tO3DPwhgy4mri0YG6ATLLHFvmbZSC055dvxG01w20rOPsfwYwXpgfkOMzZMa -W4J3dol0BnodgIFRVsHFBoV/bZOz4eKyR+YAbyxeqnpemyrbcJH2fLxd/vt+ -a7BKOfrK/BUitP/Ob+YbR2tVFF0Jho6lgxHKXBg4nSYY6eQjLRtVyVlbLIFz -50XJPyRbE5zQ37OgsFEE9chmM9WiGUiXjbmM0SPEkKKnaP5qkEmws99Sx2QB -D1657XNk6SsS0k3mGSvam6yhOjPJaKqR5qSNXX/KRlPKVYopwVg8Y/kUZaze -D8r85vtoiy7B53Mt3w+GUIHwK/vFuDMdaaxf97o7KnFglznSx/N0dT/3/MgT -f++XeO8+FPH4aIgtwPozKG9ebOXutvmzEItvvEf6ZGNtIjjwjwOtC2qoDkhb -7FJg+pwXwulyuxcKhqwJLvBJpc6r48PQqgWMShca0uxhu3EjsgTGnf9YQS1V -J/hN3OU/FV9IYIf2OtDmTQIoY88TO+/j7W+a/ok6iz+Rr1DG9vvrge0e1f08 -grF6F+v/oWz08+zkpV4OoDjbdkvaAzrBWH3ND6WkmvqJkL43kFnYN1UD/t4/ -xWRbrATpgR3XR6PJAFJfBrVukzoSPL/Ot/YOwxUumnkoOfrENKRVLGc6hiWJ -4crFPosoyXoQ78GUhhGXn8Rw1oeN9ie5ZKSx/I/la7yDxN1VtCMMSBvXNP6j -GSAtXeV7m3FPB3rXsjo9aiUEnywVvdbqsQTJqzeZFQ+JJm2sv+zgvvX8pgfK -SN/e7l8hU0aZyP94Y/F60uJ1n6GEhXRByoGc8lIqwPIr3lh9c8fT6w6vhYb0 -mBXreHOOLryRFHhfzs8S6cWBxYOVv5nAvLhDtVW+1gTH97P9r1eSIZBhrVke -S0X6UnqzZ52NBkjatHXlvjOOBDOvFY2ka9kDrB+Nssur4zKW2lQQk3ggzH+A -TXDw+5AZ67Qp4PRp6c4oI2eksfuVErl+BS1q8n7g+ea8+BF9on7Ce1pZULzv -MAumB1y1WMV2RBqrT0FPxYCurJBgrB+F/T/K97cZvDKN40zML1DG5hN/yv11 -0wKYA7xrYwTtZ4b4QHGG6PzRwcf1KGP9mluzNipHqLUK8W57wBWo6AjAbIXL -Q8Npo/UoH71I0l9ixgFYfY43Nl/C+pMoF2vZJ23L4AJ5x2OL5OPMCfZOIPXe -j/1nnoWyvtqcmEWK/8yr8Mbmc9j1oPw60usM+xIbFHGsXlQY6gC8sfyC7U8o -h9x1jB1plYOUE3E7dpbMgHi30fvOdR12hH+4l2zLM6Uiva/Qew2oYENsP0NZ -Gn75nd0uB2hw7U5GT44DwdeMTg9MaRRA5wPDbV+7ZiIdlrk3MfG4GxR/zI8t -yJIn+GzmBpbfdweIrTeUQ/ZJT53KJk30I/C2+ST9MueAJVA7SN5wX5kGUC6P -7gx4u54Mivxoa7fsdSEY2++wfg7K2Hxw1k1OV/ITEcHOY6QCJSV5qOZa2R3H -FSO9uSkurimBMVG/443Vk9h8E+VTK9JtLnzjwKyuhkY1TRLBiQ1bIrMrHKDn -j69NWXC/HmWsvyzpoz0/NOYAUNZU/8XZxcN6or6brDd/Ka7ZWi8LjEYTlsyI -tYV4H276pfF3ljHE+o8oA/qquA1c1Yn1jjf2+9g8EuWklj0dmaHmE/N5vI/+ -MuvZmmd2E+cJlP8LBXbRtQ== +1:eJyl2WlUE9ceAHBUrAihD58YJKggsggCmSEgWyA3QRQRF54KiEv7GrS2brhU +K48IBWsRd9FgFytCBMQqqGwiy3UrQijiUoSKCAQpKgKytwJ2JnjTc2Y+3L6D +H/D8zslJMpP5r3f6J1v+s3a0lpYWh/pD///uk5zQ5YEiQAZ+/y5IZgOZ3tB3 +QetZuwikPakJmtZkybLg529qlAVeIEr7zhHSyBrrNRMf8GJIAD6QvXh9b9CC +ZfOjC6bsPgZAsH1myRy/mViXpZbkcJQA1J17ZKkirFgODpn70rPu79fjjN6/ +b/+Ylj7ZDJYL055mjJ4l/scOWSR5oVckAXLe2TPnE8xZVrjUztvcJAFRh67s +EZBjsJbfv/v7pDUSYEHq/DSlzBjr19f8F0ZbSMDoDLmHgJzBcoakbHG6AoCq +6DoTb8IOa55Jfo3pEAk+yb1nKyAFLIPToReUpQOi3Iri1b1SF6yzPpVrp8ms +YOOh8hmRHW4sG1wQ3SR03WBkTO9LlacT1ndDvM8XPhbDOJtg1cYyLssPli1u +Nh0Sw5Qa4YcxpBnAWfLfJSn3jcRQb4EwcWOZFct2u9ZFN3DdoZfRo9zyUg7E +OazAwzFQOhUaht3rSqWuk2mDqLwLVNxp4g/n/zf+cPZJqrzS9lIMDkY7V6RI +/yzGeeHi4MZR07xBh2XjxS7+uxG77lJCik6cOxBPctlMfR/AdJtO6lh+hxBI ++LXXqN8d6/KH15JO+DmDD45saedlerLc/W3rGeq+A/cHxpPpOMfZwDZ9zzmp +LjiWf1r2PIjtrLV/5HOUZuBmsQ6PigesIxQ3Nm167AR0ek/5fiafxjK6/sSc +udoqgjtipzX9UO3t6a7Jdzgb7j6+45cqd2ASf2dw3h4zrA9FntlKPe9g24Rn ++1ckWLIcl5C63SdoNlj1dnR4A9cW630ZGV+cT3AEfu5lN6h4Y7m6LjW9UlcA +Wk/lz7qeaY2173Orz+n76mTRdrl7/iyWBzpL4+jPRfGAs+2RzXup7wvXtbVE +XpPrsdw6syJg3lZH6NYJQo9x7cFInTg1bDUdB+UGJfl5+z2xjuXWVPTJBGCu +Ov8IWdY2jZmUGuYKmrt7IujfEWe73oSn8Z4uwFHYezU4zoVlw+jlPZ18Pijv +nb7lmtwD66hvH64lyYfFsZXh/Y7kGKwJb9V+s6FRUK41sDRdQUCmq3l+r31C +tYH8Yo+PZIYX1g+EUT57VB7AYdlQdkGZgOV1cIWfPFSsqdf/1L7D+R4wPfrH +rLAVCc6Ao64fXKzhHkUsR9lR/DFVdpr8zCHTnFvzblP5DKL6i3ObuX+Ag8oL +ftfSFTA31Inlm1LRgXOBQvjKqHUflYewdjimV1E/XghdP2ot7I8jWc6KG6qk +njOI4hVnqttZmJ/sBolfy0N0FbNZ5jRnHL0mnwW/DD9n500IsUbPh62xVjoV +D1i7rs/wmtbk/D6/zB6xnYwP/y7wIsGPLpPO030K0xFj4k18qDy7b2lzs0mh +B9Zxyje6czzdNfeX6aQc/WQzPQA/VveLD4tx/piI/Lq81A7qqPtvJzBSg/7N +XT+X1op4wSVv6DrCtG5P94R+mQC25LQHRA72iXCuDgvm9VN99I7jFx2oPASZ +Vpjqp1KfD8IbKr4+xvXEmnf3qjI3QgS+eZR14DO5A9YLVq5SCbzEAPVvTJ+u +uVQ5TiYEruYB61ckjAU471yeyI0hCbC0aotVitSWZZAY68NRakG63aDzAM6T +t2309CamwB8rXy1unOHKcmahggxJGAsXne3iXc90wTrJ8GKtXpEj6FqnX0f3 +mUyj/uBJYa01XZdwnpztlCshpoCiUNUN7gbAsuSQ5Dh1HfA41T6kSN2xXmcd +k9zkJ4E1j7/aPjfUkOV9dY0N1DwHoZf7F8+DCIDzdwdtb9Fx729muZPuu5h+ +P0/B+1faTPUuW2DtN/x8wLwf/m0QTxhDnCN8OopPhk4Ab7e+fU7VUZbR8zPt +z7ZAeSiJtX96zvdU/gWHd9Z2XC90ZrlpMG+wky/S1Decq/WfcNcGiEGLN/XA +R/BZ7v5ltgv93B5d86gtSOaGdXTDqlscJQFj1fHlxTL6Paeo+0kC6zBeki49 +Jwb91GDeF+bMstbOsEwX8pZob2vBIap/wXqoKLKrkaDmutePVm1ucmQ5OzDL +rULlCniguP3ZwNR/bCd1/E8CTKN4eV/fsF7yPCu1yc8RLNPNL1TM98Ia1bfG +neuDD94Ws3yiwL0kSnc2rBplsKsn0A3rVrvw1NGzxHC+q/2X942ms5wXHBBD +/4426v2DDdbE7jHlEaUi6KPOp3Ysc562/usEFQcbyct/5Mn1sN4hSDbVV5pB +LfW/FuFIja7/5d0yfgxpAJhG8YzqKc5o3ndda9wYnNAjYnqv774pKy+TYNcz +UtgrtQY4o33d3UMry+8NGmL9nHNn6pY3AKB8yXSn97kJ9FyK9jM4V/YtVZ2T +8jTxzXTZxqPz6b7Sf7i+YN0/8aT+hkx3GHe4qdN0iGQ5vFpv7MZCV5jVXPJR +iEKAtVlO9/p0BYBFb7I/lYdOZ7lKsFdK9efwlLq+6AKc0e+J+n2mbc9PrJzj +56qpVzijfG9xNfybJ7mAZTTvov0fzr43i05T7w8W60zdMT5hJmAazdf92Q7O +1PyDtVYu3Yf9LtrZuK2A3mvinJIwWdk93+P9/oxgWRhtYrPyshhGqL9vVzHO +rb+WeD9rF0HhvKbrJ/wsIdPpkQalR8eLYIA63zlgjeo/qtdMrzpRYxZP2MDf +Xoz7guoXsY7KTIt9WFpbzMlO2V2yS8zy0KJ44y1vCBBWVS+j43CkRvvlco/a +D/WpORDn4b0Uoan/TKN4tVLnYzes32UXbCt8TAJUX5lG883LzJv2pm8EWANJ +iLSytLW4WZ1PCawNFMYHqDiEy26/sKDyIMtERzKvV2oEkw/maTl54Z0j8N9E +xS0YOJBIxhNuLPv89vOZtDgngPbROJe+uqGg5jDQEXXFJijMg+WVHUkZZnoE +mHmlasnnyUKs0f0a2n6Kz+8YuYfzrLVmfmK6zrllAfW8Qd21Da82FOKN5tP3 +/QTLaB+FPh/nwbcH9caFeWnOL3BG5xN1w/ULMN29rVpGx+Em74OPC8omQpzR +vmbJaqjkKA1Y/soy6HJ/nBjUb7eujhw0wrqEPO5J51E0nzONzpfQfhLn1jtL +FmXNAYCzsObFOJkdy549vjFU3dDsb3FO8q73TdT++7yKaXQ+h64HZ2799V9M +Cj1APb1Ho+oC06i+oPyEs1bnmmx67/etej9lAZletlXF7eLzYQu/O/a+EYn1 +Ov6TRXSeQPkM58k1J+XHuPZonmb5lMLxDv06c2n2H5GD1lj7D593wIsXSpfS +fR/TA1aG5vUD9hA9bzjHuom/p/totI9gWtJZcZaar8D44fNVgLPO6ptnqbkO +WMw3uET1uSyjfIf2OTij88Hhva+I5Zml22WmQ6PAD//z7a9rxzst7c+TFaqZ +mvmdaTRPovNNnL/smDiuctAJLhzuj1g+enzavkCpPRylfv1ErNF+OTJjuquD +ygHg7ByVC6ItHDXz3Ujd8dS0fbl0KpgQ+7hHr8gRMl2pzovaEO0fcQbqObVH +hJ53ptH7o/NInCtv75hO3S/N+TzT4Z6nDKm+QNNP4PwXO72CZQ== + "]]}, {}}, {}, {}, {}, {}}, AspectRatio->1, Axes->{True, True}, @@ -562,8 +577,8 @@ MuvZmmd2E+cJlP8LBXbRtQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{-43.23792893511451, 40.062888618320606`}, {-43.23792893511451, - 40.062888618320606`}}, + PlotRange->{{-38.2344325, 38.234432500000004`}, {-38.2344325, + 38.234432500000004`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -571,8 +586,9 @@ MuvZmmd2E+cJlP8LBXbRtQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{{3.764181801868524*^9, 3.764181830670013*^9}}, - CellLabel->"Out[43]=",ExpressionUUID->"95e60565-77ed-4935-ba0d-34c22a07a34b"] + CellChangeTimes->{{3.764181801868524*^9, 3.764181830670013*^9}, + 3.764182159643732*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"fad353da-0c41-4f00-819d-068c9ccd8ca6"] }, Open ]], Cell[CellGroupData[{ @@ -582,14 +598,32 @@ Cell[BoxData[{ RowBox[{"Norm", "/@", "magdata2"}], ";"}], "\[IndentingNewLine]", RowBox[{"Histogram", "[", "%", "]"}]}], "Input", CellChangeTimes->{{3.764181851587598*^9, 3.764181901887018*^9}}, - CellLabel->"In[48]:=",ExpressionUUID->"6e2382e3-be00-4738-b380-b67947d32194"], + CellLabel->"In[60]:=",ExpressionUUID->"6e2382e3-be00-4738-b380-b67947d32194"], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ - Opacity[0.609], Thickness[Small]}], {}, + Opacity[0.602], Thickness[Small]}], {}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ - Opacity[0.609], Thickness[Small]}], + Opacity[0.602], Thickness[Small]}], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{29., 0}, {30., 5.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{27.235188150520344`, 54.75680544435545}, { + 84.99246327715385, 92.32840450262977}}], + StatusArea[#, 5]& , + TagBoxNote->"5"], + StyleBox["5", {}, StripOnInput -> False]], + Annotation[#, + Style[5, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -600,9 +634,9 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{24., 0}, {26., 3.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{21.350480384307446`, 51.85266394934132}, { - 85.14712719107074, 92.96535391600986}}], + RectangleBox[{30., 0}, {31., 3.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{54.25680544435545, 81.77842273819044}, { + 87.72683976734422, 92.32840450262977}}], StatusArea[#, 3]& , TagBoxNote->"3"], StyleBox["3", {}, StripOnInput -> False]], @@ -618,14 +652,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{26., 0}, {28., 44.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{51.35266394934132, - 81.85484751437514}, {-14.86863804976393, 92.96535391600986}}], - StatusArea[#, 44]& , - TagBoxNote->"44"], - StyleBox["44", {}, StripOnInput -> False]], + RectangleBox[{31., 0}, {32., 6.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{81.27842273819044, 108.80004003202555`}, { + 83.62527503205867, 92.32840450262977}}], + StatusArea[#, 6]& , + TagBoxNote->"6"], + StyleBox["6", {}, StripOnInput -> False]], Annotation[#, - Style[44, {}], "Tooltip"]& ], + Style[6, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -636,14 +670,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{28., 0}, {30., 59.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{81.35484751437514, - 111.85703107940901`}, {-51.459771674459546`, 92.96535391600986}}], - StatusArea[#, 59]& , - TagBoxNote->"59"], - StyleBox["59", {}, StripOnInput -> False]], + RectangleBox[{32., 0}, {33., 16.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{108.30004003202555`, 135.82165732586066`}, { + 69.95339258110684, 92.32840450262977}}], + StatusArea[#, 16]& , + TagBoxNote->"16"], + StyleBox["16", {}, StripOnInput -> False]], Annotation[#, - Style[59, {}], "Tooltip"]& ], + Style[16, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -654,14 +688,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{30., 0}, {32., 70.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{111.35703107940901`, - 141.85921464444283`}, {-78.29326966590298, 92.96535391600986}}], - StatusArea[#, 70]& , - TagBoxNote->"70"], - StyleBox["70", {}, StripOnInput -> False]], + RectangleBox[{33., 0}, {34., 75.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{135.32165732586066`, + 162.84327461969565`}, {-10.710713879508972`, 92.32840450262977}}], + StatusArea[#, 75]& , + TagBoxNote->"75"], + StyleBox["75", {}, StripOnInput -> False]], Annotation[#, - Style[70, {}], "Tooltip"]& ], + Style[75, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -672,14 +706,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{32., 0}, {34., 57.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{141.35921464444283`, - 171.86139820947665`}, {-46.580953857833464`, 92.96535391600986}}], - StatusArea[#, 57]& , - TagBoxNote->"57"], - StyleBox["57", {}, StripOnInput -> False]], + RectangleBox[{34., 0}, {35., 87.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{162.34327461969565`, + 189.86489191353076`}, {-27.11697282065117, 92.32840450262977}}], + StatusArea[#, 87]& , + TagBoxNote->"87"], + StyleBox["87", {}, StripOnInput -> False]], Annotation[#, - Style[57, {}], "Tooltip"]& ], + Style[87, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -690,14 +724,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{34., 0}, {36., 81.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{171.36139820947665`, - 201.86358177451052`}, {-105.12676765734642`, 92.96535391600986}}], - StatusArea[#, 81]& , - TagBoxNote->"81"], - StyleBox["81", {}, StripOnInput -> False]], + RectangleBox[{35., 0}, {36., 142.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{189.36489191353076`, + 216.88650920736586`}, {-102.31232630088623`, 92.32840450262977}}], + StatusArea[#, 142]& , + TagBoxNote->"142"], + StyleBox["142", {}, StripOnInput -> False]], Annotation[#, - Style[81, {}], "Tooltip"]& ], + Style[142, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -708,14 +742,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{36., 0}, {38., 62.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{201.36358177451052`, - 231.8657653395444}, {-58.777998399398655`, 92.96535391600986}}], - StatusArea[#, 62]& , - TagBoxNote->"62"], - StyleBox["62", {}, StripOnInput -> False]], + RectangleBox[{36., 0}, {37., 75.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{216.38650920736586`, + 243.90812650120085`}, {-10.710713879508972`, 92.32840450262977}}], + StatusArea[#, 75]& , + TagBoxNote->"75"], + StyleBox["75", {}, StripOnInput -> False]], Annotation[#, - Style[62, {}], "Tooltip"]& ], + Style[75, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -726,14 +760,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{38., 0}, {40., 80.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{231.3657653395444, - 261.86794890457816`}, {-102.6873587490334, 92.96535391600986}}], - StatusArea[#, 80]& , - TagBoxNote->"80"], - StyleBox["80", {}, StripOnInput -> False]], + RectangleBox[{37., 0}, {38., 68.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{243.40812650120085`, + 270.92974379503596`}, {-1.1403961638426807`, 92.32840450262977}}], + StatusArea[#, 68]& , + TagBoxNote->"68"], + StyleBox["68", {}, StripOnInput -> False]], Annotation[#, - Style[80, {}], "Tooltip"]& ], + Style[68, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -744,14 +778,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{40., 0}, {42., 40.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{261.36794890457816`, - 291.87013246961203`}, {-5.1110024165117665`, 92.96535391600986}}], - StatusArea[#, 40]& , - TagBoxNote->"40"], - StyleBox["40", {}, StripOnInput -> False]], + RectangleBox[{38., 0}, {39., 30.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{270.42974379503596`, 297.95136108887107`}, { + 50.81275714977427, 92.32840450262977}}], + StatusArea[#, 30]& , + TagBoxNote->"30"], + StyleBox["30", {}, StripOnInput -> False]], Annotation[#, - Style[40, {}], "Tooltip"]& ], + Style[30, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -762,14 +796,14 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{42., 0}, {44., 20.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{291.37013246961203`, 321.8723160346459}, { - 43.67717574974905, 92.96535391600986}}], - StatusArea[#, 20]& , - TagBoxNote->"20"], - StyleBox["20", {}, StripOnInput -> False]], + RectangleBox[{39., 0}, {40., 9.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{297.45136108887107`, 324.9729783827062}, { + 79.52371029677312, 92.32840450262977}}], + StatusArea[#, 9]& , + TagBoxNote->"9"], + StyleBox["9", {}, StripOnInput -> False]], Annotation[#, - Style[20, {}], "Tooltip"]& ], + Style[9, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ @@ -780,34 +814,1272 @@ Cell[BoxData[ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], - RectangleBox[{44., 0}, {46., 8.}, "RoundingRadius" -> 0]}, - ImageSizeCache->{{321.3723160346459, 351.8744995996798}, { - 72.95008264950553, 92.96535391600986}}], + RectangleBox[{40., 0}, {41., 8.}, "RoundingRadius" -> 0]}, + ImageSizeCache->{{324.4729783827062, 351.9945956765413}, { + 80.8908985418683, 92.32840450262977}}], StatusArea[#, 8]& , TagBoxNote->"8"], StyleBox["8", {}, StripOnInput -> False]], Annotation[#, Style[8, {}], - "Tooltip"]& ]}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, - + "Tooltip"]& ]}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{28.76, 0}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + PlotRange->{{29., 41.}, {All, All}}, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.764181855648719*^9, 3.764181902239205*^9}, + 3.764182165233865*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"68107e25-d776-4219-a3c1-a06e5828bb0a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Histogram", "[", + RowBox[{"Transpose", "[", "magdata2", "]"}], "]"}]], "Input", + CellChangeTimes->{{3.764181966194601*^9, 3.7641820001952143`*^9}}, + CellLabel->"In[62]:=",ExpressionUUID->"f59e178c-131f-4dbe-a224-900a668b0237"], + +Cell[BoxData[ + GraphicsBox[{ + {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ + Opacity[0.574], Thickness[Small]}], {{}, + {RGBColor[0.97858, 0.678934, 0.157834], Opacity[0.5], EdgeForm[{Opacity[ + 0.574], Thickness[Small]}], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-40., 0.}, {-35., 2}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{21.350480384307446`, 42.47698158526822}, { + 88.84212157335637, 94.40858622908345}}], + StatusArea[#, 2]& , + TagBoxNote->"2"], + StyleBox["2", {}, StripOnInput -> False]], + Annotation[#, + Style[2, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-35., 0.}, {-30., 9}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{41.97698158526822, 63.10348278622898}, { + 71.10949527831157, 94.40858622908345}}], + StatusArea[#, 9]& , + TagBoxNote->"9"], + StyleBox["9", {}, StripOnInput -> False]], + Annotation[#, + Style[9, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-30., 0.}, {-25., 57}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{62.60348278622898, + 83.72998398718974}, {-50.48565645913848, 94.40858622908345}}], + StatusArea[#, 57]& , + TagBoxNote->"57"], + StyleBox["57", {}, StripOnInput -> False]], + Annotation[#, + Style[57, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-25., 0.}, {-20., 48}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{83.22998398718974, + 104.35648518815051`}, {-27.686565508366613`, 94.40858622908345}}], + StatusArea[#, 48]& , + TagBoxNote->"48"], + StyleBox["48", {}, StripOnInput -> False]], + Annotation[#, + Style[48, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-20., 0.}, {-15., 58}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{103.85648518815051`, + 124.98298638911129`}, {-53.01888878700203, 94.40858622908345}}], + StatusArea[#, 58]& , + TagBoxNote->"58"], + StyleBox["58", {}, StripOnInput -> False]], + Annotation[#, + Style[58, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-15., 0.}, {-10., 73}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{124.48298638911129`, + 145.60948759007204`}, {-91.01737370495519, 94.40858622908345}}], + StatusArea[#, 73]& , + TagBoxNote->"73"], + StyleBox["73", {}, StripOnInput -> False]], + Annotation[#, + Style[73, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-10., 0.}, {-5., 52}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{145.10948759007204`, + 166.2359887910328}, {-37.81949481982079, 94.40858622908345}}], + StatusArea[#, 52]& , + TagBoxNote->"52"], + StyleBox["52", {}, StripOnInput -> False]], + Annotation[#, + Style[52, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-5., 0.}, {0., 49}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{165.7359887910328, + 186.86248999199358`}, {-30.219797836230143`, 94.40858622908345}}], + StatusArea[#, 49]& , + TagBoxNote->"49"], + StyleBox["49", {}, StripOnInput -> False]], + Annotation[#, + Style[49, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{0., 0.}, {5., 28}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{186.36248999199358`, 207.48899119295436`}, { + 22.978081048904258`, 94.40858622908345}}], + StatusArea[#, 28]& , + TagBoxNote->"28"], + StyleBox["28", {}, StripOnInput -> False]], + Annotation[#, + Style[28, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{5., 0.}, {10., 22}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{206.98899119295436`, 228.11549239391513`}, { + 38.17747501608551, 94.40858622908345}}], + StatusArea[#, 22]& , + TagBoxNote->"22"], + StyleBox["22", {}, StripOnInput -> False]], + Annotation[#, + Style[22, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{10., 0.}, {15., 31}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{227.61549239391513`, 248.74199359487588`}, { + 15.378384065313625`, 94.40858622908345}}], + StatusArea[#, 31]& , + TagBoxNote->"31"], + StyleBox["31", {}, StripOnInput -> False]], + Annotation[#, + Style[31, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{15., 0.}, {20., 13}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{248.24199359487588`, 269.3684947958367}, { + 60.97656596685739, 94.40858622908345}}], + StatusArea[#, 13]& , + TagBoxNote->"13"], + StyleBox["13", {}, StripOnInput -> False]], + Annotation[#, + Style[13, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{20., 0.}, {25., 27}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{268.8684947958367, 289.99499599679746`}, { + 25.511313376767802`, 94.40858622908345}}], + StatusArea[#, 27]& , + TagBoxNote->"27"], + StyleBox["27", {}, StripOnInput -> False]], + Annotation[#, + Style[27, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{25., 0.}, {30., 27}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{289.49499599679746`, 310.6214971977582}, { + 25.511313376767802`, 94.40858622908345}}], + StatusArea[#, 27]& , + TagBoxNote->"27"], + StyleBox["27", {}, StripOnInput -> False]], + Annotation[#, + Style[27, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{30., 0.}, {35., 26}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{310.1214971977582, 331.24799839871895`}, { + 28.044545704631332`, 94.40858622908345}}], + StatusArea[#, 26]& , + TagBoxNote->"26"], + StyleBox["26", {}, StripOnInput -> False]], + Annotation[#, + Style[26, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{35., 0.}, {40., 2}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{330.74799839871895`, 351.8744995996797}, { + 88.84212157335637, 94.40858622908345}}], + StatusArea[#, 2]& , + TagBoxNote->"2"], + StyleBox["2", {}, StripOnInput -> False]], + Annotation[#, + Style[2, {}], "Tooltip"]& ]}, {}, {}}, {{}, + {RGBColor[0.368417, 0.506779, 0.709798], Opacity[0.5], EdgeForm[{Opacity[ + 0.574], Thickness[Small]}], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-40., 0.}, {-35., 2}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{21.350480384307446`, 42.47698158526822}, { + 88.84212157335637, 94.40858622908345}}], + StatusArea[#, 2]& , + TagBoxNote->"2"], + StyleBox["2", {}, StripOnInput -> False]], + Annotation[#, + Style[2, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-35., 0.}, {-30., 12}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{41.97698158526822, 63.10348278622898}, { + 63.50979829472094, 94.40858622908345}}], + StatusArea[#, 12]& , + TagBoxNote->"12"], + StyleBox["12", {}, StripOnInput -> False]], + Annotation[#, + Style[12, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-30., 0.}, {-25., 30}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{62.60348278622898, 83.72998398718974}, { + 17.91161639317717, 94.40858622908345}}], + StatusArea[#, 30]& , + TagBoxNote->"30"], + StyleBox["30", {}, StripOnInput -> False]], + Annotation[#, + Style[30, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-25., 0.}, {-20., 30}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{83.22998398718974, 104.35648518815051`}, { + 17.91161639317717, 94.40858622908345}}], + StatusArea[#, 30]& , + TagBoxNote->"30"], + StyleBox["30", {}, StripOnInput -> False]], + Annotation[#, + Style[30, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-20., 0.}, {-15., 44}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{103.85648518815051`, + 124.98298638911129`}, {-17.553636196912436`, 94.40858622908345}}], + StatusArea[#, 44]& , + TagBoxNote->"44"], + StyleBox["44", {}, StripOnInput -> False]], + Annotation[#, + Style[44, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-15., 0.}, {-10., 34}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{124.48298638911129`, 145.60948759007204`}, { + 7.7786870817229925`, 94.40858622908345}}], + StatusArea[#, 34]& , + TagBoxNote->"34"], + StyleBox["34", {}, StripOnInput -> False]], + Annotation[#, + Style[34, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-10., 0.}, {-5., 42}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{145.10948759007204`, + 166.2359887910328}, {-12.487171541185347`, 94.40858622908345}}], + StatusArea[#, 42]& , + TagBoxNote->"42"], + StyleBox["42", {}, StripOnInput -> False]], + Annotation[#, + Style[42, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-5., 0.}, {0., 27}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{165.7359887910328, 186.86248999199358`}, { + 25.511313376767802`, 94.40858622908345}}], + StatusArea[#, 27]& , + TagBoxNote->"27"], + StyleBox["27", {}, StripOnInput -> False]], + Annotation[#, + Style[27, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{0., 0.}, {5., 55}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{186.36248999199358`, + 207.48899119295436`}, {-45.419191803411394`, 94.40858622908345}}], + StatusArea[#, 55]& , + TagBoxNote->"55"], + StyleBox["55", {}, StripOnInput -> False]], + Annotation[#, + Style[55, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{5., 0.}, {10., 46}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{206.98899119295436`, + 228.11549239391513`}, {-22.620100852639524`, 94.40858622908345}}], + StatusArea[#, 46]& , + TagBoxNote->"46"], + StyleBox["46", {}, StripOnInput -> False]], + Annotation[#, + Style[46, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{10., 0.}, {15., 38}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{227.61549239391513`, + 248.74199359487588`}, {-2.3542422297311703`, 94.40858622908345}}], + StatusArea[#, 38]& , + TagBoxNote->"38"], + StyleBox["38", {}, StripOnInput -> False]], + Annotation[#, + Style[38, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{15., 0.}, {20., 44}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{248.24199359487588`, + 269.3684947958367}, {-17.553636196912436`, 94.40858622908345}}], + StatusArea[#, 44]& , + TagBoxNote->"44"], + StyleBox["44", {}, StripOnInput -> False]], + Annotation[#, + Style[44, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{20., 0.}, {25., 55}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{268.8684947958367, + 289.99499599679746`}, {-45.419191803411394`, 94.40858622908345}}], + StatusArea[#, 55]& , + TagBoxNote->"55"], + StyleBox["55", {}, StripOnInput -> False]], + Annotation[#, + Style[55, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{25., 0.}, {30., 41}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{289.49499599679746`, + 310.6214971977582}, {-9.953939213321803, 94.40858622908345}}], + StatusArea[#, 41]& , + TagBoxNote->"41"], + StyleBox["41", {}, StripOnInput -> False]], + Annotation[#, + Style[41, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{30., 0.}, {35., 19}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{310.1214971977582, 331.24799839871895`}, { + 45.77717199967614, 94.40858622908345}}], + StatusArea[#, 19]& , + TagBoxNote->"19"], + StyleBox["19", {}, StripOnInput -> False]], + Annotation[#, + Style[19, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{35., 0.}, {40., 5}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{330.74799839871895`, 351.8744995996797}, { + 81.24242458976573, 94.40858622908345}}], + StatusArea[#, 5]& , + TagBoxNote->"5"], + StyleBox["5", {}, StripOnInput -> False]], + Annotation[#, + Style[5, {}], "Tooltip"]& ]}, {}, {}}, {{}, + {RGBColor[0.560181, 0.691569, 0.194885], Opacity[0.5], EdgeForm[{Opacity[ + 0.574], Thickness[Small]}], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-40., 0.}, {-35., 18}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{21.350480384307446`, 42.47698158526822}, { + 48.31040432753968, 94.40858622908345}}], + StatusArea[#, 18]& , + TagBoxNote->"18"], + StyleBox["18", {}, StripOnInput -> False]], + Annotation[#, + Style[18, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-35., 0.}, {-30., 37}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{41.97698158526822, 63.10348278622898}, { + 0.17899009813235978`, 94.40858622908345}}], + StatusArea[#, 37]& , + TagBoxNote->"37"], + StyleBox["37", {}, StripOnInput -> False]], + Annotation[#, + Style[37, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-30., 0.}, {-25., 29}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{62.60348278622898, 83.72998398718974}, { + 20.444848721040714`, 94.40858622908345}}], + StatusArea[#, 29]& , + TagBoxNote->"29"], + StyleBox["29", {}, StripOnInput -> False]], + Annotation[#, + Style[29, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-25., 0.}, {-20., 27}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{83.22998398718974, 104.35648518815051`}, { + 25.511313376767802`, 94.40858622908345}}], + StatusArea[#, 27]& , + TagBoxNote->"27"], + StyleBox["27", {}, StripOnInput -> False]], + Annotation[#, + Style[27, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-20., 0.}, {-15., 22}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{103.85648518815051`, 124.98298638911129`}, { + 38.17747501608551, 94.40858622908345}}], + StatusArea[#, 22]& , + TagBoxNote->"22"], + StyleBox["22", {}, StripOnInput -> False]], + Annotation[#, + Style[22, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-15., 0.}, {-10., 33}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{124.48298638911129`, 145.60948759007204`}, { + 10.311919409586537`, 94.40858622908345}}], + StatusArea[#, 33]& , + TagBoxNote->"33"], + StyleBox["33", {}, StripOnInput -> False]], + Annotation[#, + Style[33, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-10., 0.}, {-5., 16}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{145.10948759007204`, 166.2359887910328}, { + 53.37686898326677, 94.40858622908345}}], + StatusArea[#, 16]& , + TagBoxNote->"16"], + StyleBox["16", {}, StripOnInput -> False]], + Annotation[#, + Style[16, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{-5., 0.}, {0., 28}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{165.7359887910328, 186.86248999199358`}, { + 22.978081048904258`, 94.40858622908345}}], + StatusArea[#, 28]& , + TagBoxNote->"28"], + StyleBox["28", {}, StripOnInput -> False]], + Annotation[#, + Style[28, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{0., 0.}, {5., 30}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{186.36248999199358`, 207.48899119295436`}, { + 17.91161639317717, 94.40858622908345}}], + StatusArea[#, 30]& , + TagBoxNote->"30"], + StyleBox["30", {}, StripOnInput -> False]], + Annotation[#, + Style[30, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{5., 0.}, {10., 19}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{206.98899119295436`, 228.11549239391513`}, { + 45.77717199967614, 94.40858622908345}}], + StatusArea[#, 19]& , + TagBoxNote->"19"], + StyleBox["19", {}, StripOnInput -> False]], + Annotation[#, + Style[19, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{10., 0.}, {15., 24}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{227.61549239391513`, 248.74199359487588`}, { + 33.11101036035842, 94.40858622908345}}], + StatusArea[#, 24]& , + TagBoxNote->"24"], + StyleBox["24", {}, StripOnInput -> False]], + Annotation[#, + Style[24, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{15., 0.}, {20., 67}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{248.24199359487588`, + 269.3684947958367}, {-75.81797973777392, 94.40858622908345}}], + StatusArea[#, 67]& , + TagBoxNote->"67"], + StyleBox["67", {}, StripOnInput -> False]], + Annotation[#, + Style[67, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{20., 0.}, {25., 39}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{268.8684947958367, + 289.99499599679746`}, {-4.8874745575947145`, 94.40858622908345}}], + StatusArea[#, 39]& , + TagBoxNote->"39"], + StyleBox["39", {}, StripOnInput -> False]], + Annotation[#, + Style[39, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{25., 0.}, {30., 36}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{289.49499599679746`, 310.6214971977582}, { + 2.712222425995904, 94.40858622908345}}], + StatusArea[#, 36]& , + TagBoxNote->"36"], + StyleBox["36", {}, StripOnInput -> False]], + Annotation[#, + Style[36, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{30., 0.}, {35., 78}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{310.1214971977582, + 331.24799839871895`}, {-103.68353534427288`, 94.40858622908345}}], + StatusArea[#, 78]& , + TagBoxNote->"78"], + StyleBox["78", {}, StripOnInput -> False]], + Annotation[#, + Style[78, {}], "Tooltip"]& ], + TagBox[ + TooltipBox[ + TagBox[ + DynamicBox[{ + FEPrivate`If[ + CurrentValue["MouseOver"], + EdgeForm[{ + GrayLevel[0.5], + AbsoluteThickness[1.5], + Opacity[0.66]}], {}, {}], + RectangleBox[{35., 0.}, {40., 21}, "RoundingRadius" -> 0]}, + + ImageSizeCache->{{330.74799839871895`, 351.8744995996797}, { + 40.71070734394905, 94.40858622908345}}], + StatusArea[#, 21]& , + TagBoxNote->"21"], + StyleBox["21", {}, StripOnInput -> False]], + Annotation[#, + Style[21, {}], + "Tooltip"]& ]}, {}, {}}}, {{{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}}, {}}, {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}}, {}}, {{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}}, {}}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{23.56, 0}, + AxesOrigin->{-41.6, 0.}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], - PlotRange->{{24., 46.}, {All, All}}, + PlotRange->{{-40., 40.}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{{3.764181855648719*^9, 3.764181902239205*^9}}, - CellLabel->"Out[49]=",ExpressionUUID->"23ec7069-7289-4ea8-840d-63776a63d3eb"] + CellChangeTimes->{{3.7641819780714283`*^9, 3.764182001020853*^9}, + 3.7641821739383373`*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"a1a11b9d-1028-4a58-88ce-ee0d0209d4d5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{"magranges", "=", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"Max", "[", "#", "]"}], "-", + RowBox[{"Min", "[", "#", "]"}]}], "2"], "&"}], "/@", + RowBox[{"Transpose", "[", "magdata2", "]"}]}]}], "\[IndentingNewLine]", + RowBox[{"1", "/", "magranges"}]}], "Input", + CellChangeTimes->{{3.764182205088223*^9, 3.76418221471926*^9}, { + 3.764182273898177*^9, 3.764182288133325*^9}, {3.76418236566006*^9, + 3.764182366431522*^9}, {3.764182410251555*^9, 3.764182412403656*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"af4ea829-9f16-4620-aa00-c20b3bfb3945"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"35.535533`", ",", "35.1606855`", ",", "38.2344325`"}], + "}"}]], "Output", + CellChangeTimes->{ + 3.764182217778853*^9, {3.764182275030828*^9, 3.764182288431088*^9}, + 3.764182367301547*^9, 3.764182412677229*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"cbb496a5-40e4-4b2c-928f-6b6838a729a3"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "0.028140847078331425`", ",", "0.0284408561943424`", ",", + "0.026154435533991518`"}], "}"}]], "Output", + CellChangeTimes->{ + 3.764182217778853*^9, {3.764182275030828*^9, 3.764182288431088*^9}, + 3.764182367301547*^9, 3.764182412679118*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"30201d10-012a-44be-aee0-dadd54c7cdee"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{"magdata3", "=", + RowBox[{ + RowBox[{ + RowBox[{"#", "/", "magranges"}], "&"}], "/@", "magdata2"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{"plotdata", "[", "magdata3", "]"}]}], "Input", + CellChangeTimes->{{3.7641822299657288`*^9, 3.764182246731448*^9}}, + CellLabel->"In[71]:=",ExpressionUUID->"cbc8f16e-97a5-475f-8071-d73aef03f302"], + +Cell[BoxData[ + GraphicsBox[{{}, {{}, + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], PointBox[CompressedData[" +1:eJyl2Xs41FkfAHCFLtamQi2VhFa70S5WF4tTa5Pyigq1mnVbFUolrZWki3RV +UrEM2vBSpJR0UXHcyi25jnGbzJibGUNs5pFbvbOjM3/MefY5z/vwB8/nefj5 +/c78vpfzPUu8D2zdNVVBQUFV8u2fny0aHk46g80wL7dzw/pxJpS3SdDB/VGP +G//V6pn+PnOrmyB998/HE6o7iS6vGhQb8htgXx/D8kwXA7P4rY9bfCcNrhtT +tvNZ9pboTIV3PXdHG6GmxcqXz2cwMf+/19s7PezUiUv1UON56ZURVtu/WjUh ++eXjgHai1e+sWrawsA4+c9sdbqfWhFnfPc3Dw+4B5KvEnk0JeUK0tWtGDlhT +DvWu6NOu3soHJCu9+kHfw64ewgbh0S/gM9wl1ER771Y4Z/hmxi+iUqLHFmtp +eNixoGG237hyChdz1EoBy2w2FwY71DiVGPGIVrY5eaxuJx8OhrNd/Uq7MGv7 +rbZ0tuiCM41bv4x92E70nT36ygORZdC4ImfpEWo95mO8+Za639aAozDwTp5X +JdEXa/Mq+iObQJif+hHzrxswD3T8GXdZlA9nTs06TNPsJlrvcoBf7domWFXM +C1rn24sZxZ9tgfYN+hIh0Si+rum9OJTrQp+0A1JO6EeU3oJLNYOzDTaWED0c +4jdK1cyGBdb3Uh3NQidtxV/NbCX3A2jDh8oMd3KhvJOpysr7ongg+X6GeP7p +ZqLtrhWx/n4uBNb87JdzPG9iNut7pzTY3AvQ85A8rpVbse5AL/g76HuNr043 +Yx48Mq4kiQew9SR/zMFYQHRmrK799ovVIN2vaI6VE+7EvCc1d0dLwVq1vDLF +WPakjfKdq+XC+/13WERfSogI+i2vRhaPJD/lDvT7BzbC2e+LFM8HMnGzDYy9 +wukQ3Q/J1AUiniTeYJClxd6bh3iYlcr2eLi40KBb67u01PBuoqlai/X5V1ug +WMVg13C7ALOsXnn6dFQ4iYhWu5V8c0bLU9h76XX5oz1CzO46neIckzaQGbpt +yF1FMGmnWzs7eScIwV8OoYJKVwbRw9L8IwC9wTvucUUZmH3Xs3g/LO8GRyfy +GSR5LT0qpsyUC1A9l7fqlFMxM1q6gVZ22+J7Vo2AZIHxK5673QMw/dj2ZJvD +74gWt1U1nB5mwKi6a/tXHO/BHPXQ3DJdvwfueGPptQV0EM29PvIppYEFGwvu +r7dVzMWM6jWqvySPTOR7IJ6tNKPKlYE5Slo/ysBfIt/DkveN6MRF+VkjIXXQ +t9PdoJrShxnVX4urFMMiXQ7RzTlDIxxKFxxKmf+4zawG8xenzVf9WdYFH6kP +vNAMKQMkVywvKXWI75TVD3mjeN3MUZ+Z5NZFdGeT0TLP3zhwfv0385I9SzHP +8n2cZe8tgMVhURujIhohyYnxq9dJ4gFu0DFSv53EIHrifjiwItJA7DG7bdKO +GRSI90bx4Pe7IrSWB7QAedf1UjwSRrohileSSes9TdovnoRZ7T77vovsILpS +2n93gSPunis5PO6kfbzu08jATT44Z1YUGpbNwfw9rX59MDUdCGy3T4uoExKd +u9RA65upPPghOtjy4rEuzAf852ncNxFCYMH+tdS0nOhK4+iz2y+2w68m3idI +MurfuvNWuuhZ1WG+m/CswT/wIUiwnpq41JFN9JKl+6JOldKBMyV+moeKAPN9 +0MzyD2QDJ3vlJZL6T7Tp3+ejphdwwQW/VNdL5zmYPy76j5OLCxcYvX9buHo1 +l+iqCkNTSX8Jxr2NVDcbCzA7FlLcLiYyYamWp5W1axvRldm30xtieqH1xPpj +NglMyzpVyofBIWOCk1WtgGTu6AotLqUEWrwPSLqSSMf8Piguf90BhqxfI1nx +rdYyST4D0ZHd4QoRdVDejlbBIdNSG0DIvh/VFaNTiXb4MTNv7N4r+PnvAcnl +G2dppPVyIL1J/41k/TFvuWFja7StEypfUdZmM5uI/t3oQc7oNTY813BPOduk +GDOqbxTNXL3Tzc8hyUsuNLKeu3VAYTTf3Uy7CMi7dr/NOp1BHjSkx8e9tG4l +ukoaXz2wWuWP1wMPGjBflvaTDBg8sZ5Ej90wNW3bzJbt3+W9v2dMLOlfYNwM +XahxiE10xFVqnJUiC6L6K2/63KtRGlOqIYoXkrOk8V8KwtNpQ/PCcX+ub+DB ++IVVQcPtRG+7OVtlpW0PMDPMUHztXUu0gvSrH6D9lbxVT/kGXarnAWYtM6l3 +IYQkb12lZiyoeAPQfEHeP0nnD3Sw2sQ+9116EdEfpPm0FawI/Lk/83YO5sbg +IkNJPw189rR9PeMun2g/2wzzJ0mxlug5J+v08DMhut8WgA8LnmxaECfAjOrp +7rSkdIFSNSR5nx/jF//ANPQ5YA4TPig1m02T1QOSn4YX0A35JeBTQOfmv/bR +iEb5UtbvyhnNZ7wohpzHAe1Eo/juiu83yrHhYB6bqC9wqzijr0Cji2htoY5O +qxkTJkf+QdnBw2066Oo05z4L5uz1PzN3N4tob2Goj9G2Wkg3N7eZ+bAF80pp +fXkCUD9EMur3RVtUNjap0TGjetUcNPcX34JionOXXIjRXNiH5lNQ3mj+x/7E ++tlpTQ/R7rrZ+fkGzbL8Iu8zX2obS/Y/oPK7VyXMphKiF1Upq4T29AFavJfj +dmY9IHlifsYAGyf6acy60vtNkdVzktfuCAraaNQIxZ2D1WusmzFvkea7dljp +Sft4sLeSaFSvP8/3oLz3lI0oSfpFYOVh6izpp4n+GF/Ne/H7O5Ay9E9CeIX5 +oOA70+WrRbLrT9aPOb/yM6xvQLTeJKP6/1H1TeubARZmIM3HfHjX/FzWlPNk +o/r6eb6OOeskrcZUzII2uhuyJP0u0cnSfMqAHbdak0f5PUT/lL9W0r51wj+v +e9b894IQs4AyxlOZ1Smbv5DsdZbZMHaPJ9t/yhvNo/N3G7qUb7oDSfacNtL/ +x6Nu+EWh6Hn6lWrMFnEt9PFKAUTxRfKzykM+i9WE8KBCiKhQ+yGYrNH+aUF3 +0o3oWB5m/S/Pnt20gQdjirPGWW1solHdQteXN/r/qP6QjM4vds0JGzwXyCRa +OFG/ANpvy3uQaaKT2lAMGWFZSpabKogOyzuxP8O6EPXLmP2VcwqDqS/hcVb8 +9OYFmUSj/Tnjbv5aST8G5I3mk6g/JznMUUsr4FbrvxrNb1F/RzI6r3JQs0nd ++YEG5Y2eB82vSM44PN/5d2os6FiQEL23loMZ5acfnY/P8ZrXQzRNOp9qgK2v +l10Xqogwe0bY2gsq3kI3h5xYSb0nGuUzzZypz45mXAMkf95Pw8ih8VGqcz3m +Y1t4HcFUGjRyXHT9XF8t0dyh6zH1wVXo/A3KG71vegM/bPpNr5doNI84qhuh +G9khwlw1cb4KUH9AMk9dQ2dRK1t23iJvNM/x01Nry1rOJDrNdY0LVVMETjtQ +VmhfeQrkveWpeNb+EhG4aJLO/jj8lmi0f0fnX/JG55vTB+ZFP9zZTTRloj+S +nSfIW1H6+8Wy+kOy2YFmXkhdO6hjqwLJ+hON9ncon07W5fbt9GwmE+5OfjFV +6wIfyhvNH3V0jodKno9o9L576O7aRdPsxozOIxkTz080Op9PaqddlnxemFE/ +ofvoULWk/yP6f75EsJc= + "]]}, + {RGBColor[0.880722, 0.611041, 0.142051], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], PointBox[CompressedData[" +1:eJyl2Xs41FkfAHCRreRdtwgjpIu2qC2bSjh6taksSe7JpY3Yti2XldumNu2r +dluWtNSM0LK5hJSUcEg3aRHGmDHDjBnGjKGEpKX218Nv/pjz7HPe5zF/8Hye +hzPzO3PO+V7O0oPHnAPk5eTklIkfH3/fLu22+3KKCyNf55hbWIjBv7ncTniv +ogI1I3B7XHpDN6TZHKu9d0+E9dAQx/KnHg7MtfPQo1AGEG+bVNx5aFUX3Pg6 +uOb+fbw1Lcwf3Z/Phctes4z09CSIyb8PsyuwtbTEe9H9uqR3PJZ0fFkrp9Me +3TnaCR0meHcrKyVYV3gFntyp0gY73r4N9vV9iViolPq/rMhyqC6XSLt6FW+j +pGX05D/vgV2OwkfV1UNYwxZxzEJYATwdI7728UGtNpGZ6ympA/F2FrzOzgGs +jQuDpxSzekFO0SNlff0uxBEOfzk9MOkDwfk29ou1r2M9epLvFlzXA6ob2CMt +LS1Q1gtMmf9JvdUJRk9lK4+NCrA2fVq8IuryC6Cy+puVXZxBxDEwpOC2fz2o +uEZfqq8/hHVssEbUxpUtYLRtRxeVKkG8QD4/nK7ZD6o27BbQ6b1YP6vtC9sW +NAj0X2qlpKU9RbyjSjeDsVQMsrL461xd6QDnFKPK0FJXBiD312y9QjOicPmu +B+CIo+Kc91ODWFdZF2XvMYsGc+Q+vl7N2vSJ0IfG+3vhrsSSzebmfYhpJblj +i+PbIdemYNPmzf1YWwsLH6n5ZcInCeDZixc8xOTzBI1TrxLrDevXYZ8v0o5v +B1M9ARGaWncQO58WTjqYikCHLfczPb3nWOcE16hZOYkAM6HxcEgID7GNyu2H +Cql8QD7/bO1mqVfyqoAH8gUq42NjvViT+7F/y97oiIg+rFVHahTOhXCBVyJo +J9Y7YvLzvOEMF5eW9mAdZmlxJDO0Dxh57tQwMOhG7MV8eS37ZD+Q91zd0d2N +95jS8oCJThG4kv7xVY+Y4XeI/dRJAo7F7xmg0+kQ58ELz5+UHRYDr9OTVcTn +RZwXvW/cR0kEsuont3V3dc3aVx2iRfVuHPBdyoj1vn2tAOfBCI+iXkkuWHgu +xsbJiYs4Zvo8g3sT3GLCwwVYk/G8jdMaHhbGR6xTyDIosmoFEfbNn+rqsrCe +94M7zTb8JfDf2p77qeopiPMvzSnfrY0bAJ2aOWYG+kWIPRot/fcCNvgzz/Sx +qtpNgHNrVcmXOxRKweJEBT93dyFiMv5aTThTliwZxHpMde78Z26cf/VVSVA4 +sd7gYTPuQnX1HqyDun2WN3gPQf9jmXSKHhXK2iLZ27jGUAATm1z6iPMM6/Gs +xXdYZn9Bpy27XzGZIsRlGsOVmpEPQfCGuObyciHWZPxYt0ZEPXECtaNAYwHV +qwdU0t/ZaGv3Y734xWdaNL860LSBefr773sR18b+suuXM63wAjPUbPFiBtZ2 ++iYa16kcSK4PnJ+eXT7mq8qCn3SdcnB27gGz9ecBZ3TWHO0AezPLuWw2GzG5 +X5U9G8pcXNogzuT8tjeuW/pmrBdxfuehb9edZQMrt+xqFkuMdZSPn7mgrxdE +vnk2R1u7Y9ZOMKuJji0UgIN3/uuhoZ0AZC3a4f7JmWYxoGrlRhLnD8T5bWKE +5c8/9ICvggrinJyaEQML/oG6DU+ArRV3CfH+AGft6fUEn9pFuHt5ibHuv23u +amTVDGmOpUw2W4I43Vr+yoo9fDhsY0FnMIRYu3infeKrJIKjY86aFEonYid7 +xaVE/Ie2LvYBFL1CiPP54Gy3C+cEcF1L9cPff3+C2GSkq3rz5l7oe97rhrp6 +KdZTB02UHU1FsE5B5OLr2w1kXafjZ2XtxoJkfoCz9fT8Q/XyYBfi8yCOiJwU +nX7GBGujx4yJ8w7ibDFylJp0hQHWls45l5ExhJjM15T/yNxI1HNYJ57tPyl3 +phn2secw7t7tRxz57VYNhcRsOFNPYT3z/4A6vT6wZrQtayTmHziEXDPTW1IF +ZK2YpKjL57YBcv3gnNBSpFi4vhbIb6sPJc5fxN6apUbx7ffhKhpdU1dXjLU4 +UehjplsDJNd+fDc5KUFszEi79MiaCXb2s1S1tNqxblA68Xz4ZgvYLBRv0tNj +Q1lHTM+n9PvEmazfF1gcKysr60V8ab4hXBTKh2tOt4o1VI8DnMn4m5SiFp2c +3IKY3C8cQWVTW5sA65M59HGtk//um1PnN4VNdEr3C85mxrkKzw82Qb7CvKSM +jC6syfqKjG+y5jZxqYN6EOpHB54PDe3BmuwvCF0Z+ZWVEsSb19uXvsypATd/ +zStKTxdhvTZk+6u868UgmW1ed/myGPGhw6yV828IwYcnIxlEfom13EwdGS/x +bSHqq1n7LaV8N+WSCJDPL+vAa9Qc0dwGSO5nnGfGh2S9L2syHphmpufQaByA +84ej3Y5Xv6VL+3U4k/ntA2rMIW9vCWJ/b2PBnaOdoPl0r7KqKhfrnrRXJsW2 +ArCvPOeZptZjxM5juUNVi3qAg0mQhpoaD+JMO3vC26OvB6QJTnm6ufUhLj7y +zU/qgTxwN0qZefu2AGvGxo22C251gJL1XgvZnQOIyXwoiB/6JZGfYy3Zq7Sr +TYUhPb9l3R6m7hlUVQueRV2JcHERYD3Tn4LkeS9r/gfedqctA5Csd3Emzxda +YsxXxPiI69c9fsBtewDJ+hpnepr/HnfuC1BA+TlLY9FFrHdN59Pg6inG2/b2 +PihrMp7bpuZV0GiDWI91jzZssW4HO+hqrysqxIjr/ejvjw/Wg7kbVhi8mxBh +PdPfg2T8l7WV7wYXIp+GyfFHV2pq0rHOGv94IDyGrts+JpgJiMnx1e0jDnh7 +s8FsTc432V/G+b1yI7NxmAdSMkfc9u/vRHxjY0L+nHM86X7Feaa/DhTnrmjg +cDiIbQ3t8ol8V1rf4Mz+k0n7WzgAjmdYW1O00yDOv1/0++uP82KwSUfVXUvr +DmKy/5Jz+VxoSkod1mT9WV1mpWhg0ARkfS/Q2PXJ7gK4pct05fr1PKwXVkvu +5yQ1wCdFfLsDBziIyf3lYl/aymKxsD4uFymp1r0lna/ZmtJPzUhM7QPh63Z3 +tba2Qln/Vps/xWPxQZDBnZvEesOaHJ+sT2VNxh+yH4VzgFrsaEIIF75PbYyL +ihJhTdbb5P2ErDmx+XMtdz+FFxyXWVpZDWI9ky9L+zWyjuOlzWun5EH2tRHv +Awfw5ty4Z0PkY8BnwNR6yxYRYjI/J++X/l+/oa6y2roVNZnftVGV5Cf/xttB +xTZ7/1s6vOG47URsrAQx2b8i7+dwZlPSE480CeDXl1at37RJiHirS5yav9aA +NL7gzHy+6qJYSQJXf8iHKqoliL0cilOJeA+tk3tX6+qyIM6axfIVMbkp4Kdw +5gSRP2F9dnzq78suL8D1tZdiPDw6EJvsWXIxYagJnFlzuyQ1tRfrmfs3ad4n +a6PhL3Z/bTQI93x/wVtHh4l1jOEZw7NE3qGUkn4hNZUOZE3mB/meNR8oemys +yfsWh+L9X3h5sRAHG6mw8tdwpecdzvEO3mt1k+5K7wdl/fP6HP77iS7gmecU +ukS/CGvy/uvM4XE9elsblPW8Ya3EW/v7pfUkzuR9guvT6tLffuMhJuOPquFX +zLS0Dqyb+cqAmH9pfxln8jzd7hno6OPTNWsH0irldc4LYaK/xIuoJxDr68dF +E88Hqx/+aK6mdhPi7GsYEEDX7Ie1PNZcdfVsIGvO9PNLx8eZ2kn/lfi+YIW9 +8llivhAbloU2EPkf9DUZLykp4WL9DxXpQlA= + "]]}, + {RGBColor[0.560181, 0.691569, 0.194885], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], PointBox[CompressedData[" +1:eJyl2Xs41FkfAHCF3X3LW+7lNmptW1tsLza3cFjvopRUKHLptht2SyjpspvU +bjeyWIUQeWnp4rJyq5yKze0tGgbDDIa5mDF0oyLV+2vqzD7P7/xx9n3MHzyf +55ln5vf7zfnezpm/NXTdt9MVFBRUqD/v/kc9zbWwsZGATs1AD8ZoO6S73EVU +WVUlAaYRu3fFlrViznAIvVNZKQYa+SHb1ZvaiM5z2aivpzcE6hpHxxaKmJiX +PQ2+fePGEBjr2e6b0ssi2uhp16f6+lKQr/Bo6OqrVswRLpedbG2l8veTjD7/ ++48PxUTHPcS8epxXcfOm9G+78+XL4MDAR0DjsuUi/eoWzOoK8RkXLjwCRgE5 +gYGuxUSvcBf9WV09Auy98wqBdR3RPu6R2wICRoDSva+MAl0fYj7mYsPr7h4C +SnfTzrttZROde+1PFQajB0wa6mgGuvIwBxc4uM2Z+zuItRDzzFUFRFc3cZ4x +mUyo7HTkx5ZNIsyj0RdVxkb5UDfYytbTpp/o2YtDPu/hDsPLO4yUn/xci7kq +hzWfwRiBPwrn2M5bfB+QPNrm3JOeLoWnm0vrH//chvmW2Uo+iyWATzjnzp6R +VkKSGY+0k1JS6uGnZ3YGNzu0Yc7OHljq5cWSxx/J/2/8kfy9u/K0N6+Hwc7s +aKOjNZeInqbw7vUYjEcFv0rTujJlr4gvsrKwEAJFf3Nn6noA3X0Oly2trAZB +Rpqy8g+xQqLrToDGhw95wDXpNu/pDQnmoBfpF6j1BsxHHimNtg8T/br/20gt +7TLwWqek3jEUd6dT3xf6+v8Fo/tfK1HxQDT7xIMdYWE8kJ88z23D6SbM6P7P +l5bfv/qqZsou4M9+MTYmkOc7kget1x6IjBSCuNSjEdtK7xPtGw/aqfUOKgRP +HoeEtWJ+zn1SWFLSDyoGPjPZ8lMH0Z/6uGoYGvaCND2pkIo3zNN9Fnf29vYC +pdodgVRcEH0+9d2rAaTpGBqJEjsxhx5bM8RisSCKB5J9j0zeoq4Xzr6UkfVJ +ZwXm7IZJx96eHhjA6B0rNO0CU/WupGf269e3glx7T4+tqRKiZ5486ODh0QfG +ZflHjHntCe+De/bwQdA3POFXSwaJbuO27omIGAAOHbEJtWYCzJFuLbN0dbuA +yrSYhE86B4nesrw9b5ZqNBSb3BMGuBYT3a2Va27IuAbHuhqZx8a5kO5L+Sb3 +VNWKQewfy2xzjYaInhOvuHnDBhEQ/DbxNpvJw2w3vk7PwGBYXq//rife53tA +9w7zvpnq6v0gVlY/aoneEprF0tNPh+cNKgsmolog3fHNnkIqn0FUf0n2sF75 +mM0Ww/bCFxN8v37MwWaHW8rLRXDmsWWW52rJXrpEnL5vnwjWL7lbszqlF/NN +1oTD3LmDEMUryc1m7CN79wpgb5vxos3b+Jjj2OHmc+Z0wFlBZQVuW8VEo/Vx +PsXKkYoHoj/qiV69bl3/h/zCn7LXZpX3cTgckDAqHvs+VohZxafpuqdnG2wZ +9gtMnRgkuv3B0vnPxwTy50u3nffF6q4u6j5k/eIRoqOeN06bO7cTNsj6734w +VW8t+3qjxtwT4HDL24knWSLM6dp5UVT+gf9iPfwmMi2X6FVBlw97eLTAkgWf +6XwxXQjpdrLrM6C+H4SGaGsWmUqIrneJ3ODrKwENJvHHN5zuJjrDvYTN4UgB +6t/ofuJgw+roEIGrqVXMkLA/AMmjY+u09PS6wfwFP8TG1HRgdvJ0+1ZP/wos +Au28kLABopcyq2vPnauDZk9Pxn58S4A58JTvVXX1EvjGYJWHlxfZNYpiz8DA +XtBYv9CM6i8xo/5gTbWf7+nzfZBk9fJgT+p6QMOV33OZCcOYvzwwtpDKd9A0 +LKcgpkZEdsm0k5mZI1Dw6ksdgd9dzCr/yVpGzXPwWcTZSsdQLiBZyJnWUVEx +CBV7dBZR+Qzzh3kKrrGLjProIpPo9PfrA65enl86ee0eJHl1WI65vsEtULdi +lmbOMB8zWj9rM52cjdf3Ej3dsSGcyr9gr3Fx4aukAcyLMlhauroSeX0jWZoT +MzE5KQXzT7XybvhyMLsOdqlqa7eD5l1OjoxRIdFWIomlvj4HNsriawgz+j3P +yPpJLtH/sAm9fv26AE5mmpl1uQ9gXnKkVaKhuhvsGpoco/oXon9NUjuQmMgE +RxPTztop8jBz+Teb29r4oEM9MVZzWtPfdoEs/msA3ShePtQ3ogcUP/41M7MH +rM9SnWHhPEQ0qm8KH+YsuhkHvjsVHt4PVWKCIuIeCokWeXUU3LwphessZ5uI +6x9gLj6Tfy01VQy/lu0/dBCdyLGoSUuTwJeyfMrG/LbuWSbVX8LWyNsLqX6a +6GPSQCY1X8Fg57xl5enJtlM1uv/cn36Jmrf4FqAbxTOqpySjef+HYK5PSFgO +oNskKzU3I4MLDkmKa8xVWUSj/bqKn251LBTdJfpu+sHtfn5SgPIl3S1HBCqq +qn3y/RmS15fnNmpp35PHN92rjYM01NSo/vN9fSE6hR/t4+0thLoSBoNt3oe5 +Yr8Ku7SUD81GvT3UinhEF5n6zuR0D8GtkgPbjdc3Yw4aCP+G6s+hhay+lAOS +0e+J+n26G/efj/T05MvrFcko35fMP5WgpT+CGc27aP+P5Iz4g6uozwcB865U +Vn7WDuhG8/Uv/9Q1oeYfoi/rnc7W0PwNGDQqzzgwNEL0heiOl+3twg/7Z1zM +Tsn5VRkZw3Ce7HqzIcnOLLWnVVUS6LAxImKFcStmJbMFhhPjYqqvfpfvuolG +9R/Va7oTj+38XEuLBXfUTihR/SLRXo7vGswT8E1Kk/Dm3keY1d0i/f38OGC3 +eKnZEivplI32l8v4/qI8+0xIclLWM+9Nm7rl9Z9uFK9Alo9FRCsrLWjicrkA +1Ve60XxTcIR132yMR/TuTHt7vbkpMEOWT7lEW+qobtDWLoNfVzpQ7Vsv5ty0 +k+FJSTVQ7DcpnDGL7OrrdsqGhs1gy/E+5uQ1IWbrHpPPTU15AO1Hk1x3bcDF +358LNn808Xjf9UHMnm4lrV1dXcDmbGfH6wYx0eh5VTWEbzecLZmy9yxd2dPa +2iqfn+gOMiwrptYbNPrn8eMrXchG8+mHfgIz2o9C30/ym+QHh/fvF8vPL0hG +5xOS9/UL0B3nbmRrZzcMRvtMGReZdyDJaL/mUGn0rjz7asycnGd+/v7DIES5 +sDoy7U+iA4ZM7K2txQDN53Sj8yW0P0ny8/RFdsuXD4FDa3R0dl5iY25LnzF9 +8tVf52MkX3V33Hfo0F/nVXSj8zl0PyRvO7vI1NJSBPL2zPHcm5YM6Eb1BeUn +khe/LYCzVYsAS7Y/xcRsnyhYrKvbBTcfdXYT1/cQ/cse9jjVP0GUz0j+/cuz +Bzdu7ETzNOajS0qLkpMF8Me1Qk5kGotoFBeCF78lPIxsxLxmb5yfjg4bovVG +8oyk1LjkZJZ8P4LuAp/bb/X0OaDx/fkqIHl14aavfH27gFBDk2HAHsCM8h3a +zyEZnQ/meFt7pWlJMfvke4QbMK6BtRVjs3bdJfvojhf6rLY2+fxON5on0fkm +yV711SUJCTzo974/wqw6bxU7JaUTKsref4dotL9sHtoujGrpBiT/2+c794CA +Hvl8N1XHb5H6UvMEqHPr7rjS1wfprq6NsVBTK4Zo/5HkO7wuJXX1iwCtd7rR +56PzSJKr3FR+pp6X/Hye7kDjF0VFRX3yfoLk/wFQGKJy + "]]}, {}}, {}, {}, {}, {}}, + + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{-1., 1.0000000000000002`}, {-1., 1.0000000000000002`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.764182247469627*^9, 3.7641823048180637`*^9, + 3.7641823694266663`*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"95f8b692-861b-4f24-b0c4-d598195caf3d"] }, Open ]] }, WindowSize->{808, 911}, @@ -845,16 +2117,31 @@ Cell[14613, 307, 290, 5, 31, "Input",ExpressionUUID->"9c3fe212-89fa-46ec-bed5-0a Cell[14906, 314, 288, 6, 35, "Output",ExpressionUUID->"ef485533-27f2-4451-90fc-eff443044e16"] }, Open ]], Cell[CellGroupData[{ -Cell[15231, 325, 476, 11, 55, "Input",ExpressionUUID->"bd9700b2-e7a8-4e50-89dd-94e26b677ce3"], -Cell[15710, 338, 13359, 236, 377, "Output",ExpressionUUID->"95e60565-77ed-4935-ba0d-34c22a07a34b"] +Cell[15231, 325, 452, 11, 57, "Input",ExpressionUUID->"ba904e9b-6ade-4303-bb25-888ab020ce48"], +Cell[15686, 338, 302, 6, 35, "Output",ExpressionUUID->"0485d706-ca56-4f1a-b521-d3934aeae8e2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[16025, 349, 501, 11, 55, "Input",ExpressionUUID->"bd9700b2-e7a8-4e50-89dd-94e26b677ce3"], +Cell[16529, 362, 12792, 228, 377, "Output",ExpressionUUID->"fad353da-0c41-4f00-819d-068c9ccd8ca6"] }, Open ]], Cell[CellGroupData[{ -Cell[29106, 579, 288, 5, 55, "Input",ExpressionUUID->"6e2382e3-be00-4738-b380-b67947d32194"], -Cell[29397, 586, 7797, 223, 243, "Output",ExpressionUUID->"23ec7069-7289-4ea8-840d-63776a63d3eb"] +Cell[29358, 595, 288, 5, 55, "Input",ExpressionUUID->"6e2382e3-be00-4738-b380-b67947d32194"], +Cell[29649, 602, 8433, 242, 239, "Output",ExpressionUUID->"68107e25-d776-4219-a3c1-a06e5828bb0a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[38119, 849, 252, 4, 31, "Input",ExpressionUUID->"f59e178c-131f-4dbe-a224-900a668b0237"], +Cell[38374, 855, 32551, 944, 243, "Output",ExpressionUUID->"a1a11b9d-1028-4a58-88ce-ee0d0209d4d5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[70962, 1804, 608, 13, 82, "Input",ExpressionUUID->"af4ea829-9f16-4620-aa00-c20b3bfb3945"], +Cell[71573, 1819, 333, 7, 35, "Output",ExpressionUUID->"cbb496a5-40e4-4b2c-928f-6b6838a729a3"], +Cell[71909, 1828, 366, 8, 35, "Output",ExpressionUUID->"30201d10-012a-44be-aee0-dadd54c7cdee"] +}, Open ]], +Cell[CellGroupData[{ +Cell[72312, 1841, 381, 9, 55, "Input",ExpressionUUID->"cbc8f16e-97a5-475f-8071-d73aef03f302"], +Cell[72696, 1852, 12859, 229, 374, "Output",ExpressionUUID->"95f8b692-861b-4f24-b0c4-d598195caf3d"] }, Open ]] } ] *) -(* End of internal cache information *) -