(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] NotebookDataLength[ 34912, 757] NotebookOptionsPosition[ 34042, 732] NotebookOutlinePosition[ 34470, 749] CellTagsIndexPosition[ 34427, 746] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData["\[IndentingNewLine]"], "Input", CellChangeTimes->{3.9838230626051273`*^9}, CellLabel->"In[8]:=",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{"Buttons", " ", "to", " ", RowBox[{"hide", "/", "show"}], " ", "code"}], "*)"}], RowBox[{ RowBox[{ RowBox[{"CloseAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "False"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"OpenAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "True"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{"Row", "[", RowBox[{"{", RowBox[{ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"CloseAllInputsCells", "[", "]"}], "]"}]}], "]"}], ",", RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"OpenAllInputsCells", "[", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{"Import", "[", "\"\\"", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"graphtitle", "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "graphsubtitle", " ", "=", " ", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "]"}], ",", RowBox[{ "#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "}"}], "&"}], ")"}], "/@", "data"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"lastitem", "=", RowBox[{"Callout", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], ",", RowBox[{"ToString", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], ",", "Left", ",", " ", RowBox[{"LabelStyle", "->", "Small"}], ",", " ", RowBox[{"Background", "->", "LightBlue"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"Length", "[", "data", "]"}], "]"}], "]"}], "=", "lastitem"}], ";"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.867182545948308*^9, 3.867182555077017*^9}, { 3.8671856323646584`*^9, 3.867185655249*^9}, 3.867187032420275*^9, { 3.867187218478177*^9, 3.867187234045384*^9}, {3.867187352932571*^9, 3.867187371829939*^9}, {3.8671903940899982`*^9, 3.8671904257542353`*^9}, 3.867190458276375*^9, {3.867190733940156*^9, 3.867190734419613*^9}, { 3.867190798905361*^9, 3.86719081289338*^9}, {3.867190843782461*^9, 3.867190868878964*^9}, {3.867191008084812*^9, 3.867191008823593*^9}, { 3.867191045756618*^9, 3.86719109928176*^9}, {3.867191132601091*^9, 3.867191153305139*^9}, {3.867191256528245*^9, 3.867191304159674*^9}, { 3.867191352877194*^9, 3.867191356182763*^9}, {3.867191386467814*^9, 3.867191411094434*^9}, {3.867191451576531*^9, 3.867191464669776*^9}, { 3.867191517397131*^9, 3.867191585673174*^9}, {3.867191623805966*^9, 3.867191637345644*^9}, {3.867191694067857*^9, 3.867191832972144*^9}, { 3.867443529594183*^9, 3.867443565893339*^9}, {3.867445761749815*^9, 3.86744582007928*^9}, {3.867445877108981*^9, 3.867445877563551*^9}, { 3.88987554010293*^9, 3.889875542354431*^9}, {3.890909771395684*^9, 3.890909773446272*^9}, {3.89765774638717*^9, 3.897657747223047*^9}, { 3.898379436246955*^9, 3.898379440050661*^9}, {3.90338401735606*^9, 3.9033840200448112`*^9}, {3.906908185436775*^9, 3.9069081879516287`*^9}, { 3.925848183308426*^9, 3.925848185881434*^9}, {3.926438108465784*^9, 3.92643813766343*^9}, {3.928879584090178*^9, 3.928879587280989*^9}, { 3.9293606429237022`*^9, 3.929360645945132*^9}, {3.931376802792758*^9, 3.931376805515088*^9}, {3.954598230829558*^9, 3.954598269603718*^9}, { 3.96136444466888*^9, 3.961364449285103*^9}, {3.961420570214137*^9, 3.961420572598192*^9}, {3.972758024916869*^9, 3.972758025765842*^9}}, CellLabel->"In[9]:=",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[BoxData[ TemplateBox[{ ButtonBox["\"Hide Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`CloseAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"], ButtonBox["\"Show Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`OpenAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"]}, "RowDefault"]], "Output", CellChangeTimes->CompressedData[" 1:eJwN0F9I0wEQB/AV+kNNzGVGU7ItGIGZ+bAkEReXo1yN5SxJCUlKR0zFiKkF gbK3LfAPpJRb0U+nrm3tV5v7WW3pHlSWmgWamTpRtwkFp0JRGErdw/GB43t3 cJKb9SXVewQCgZzqdOIPqH+CsKB5zGi7EVrKhOIAWa4r0hWaEaTcmKKVPBYu VDotCHqjd+PWUwRrXosk7hnCinDk8C6Z+0udnP0coesQH7pBVsovzJhIY7Fr /DKLsG5M3G8l+4c6pQvk5/PeP8d7EHi/GES9CL+lPdX3yRAGTmVYEZIvVqUF yc6I94q4D0FzSXpWT57bDG8FydXaNHbfAIKM2dTF2BCasoUCGanKLJkYJe35 toT4FwgHRQ6ljOQGH15zkHwofnjRjsB8VLQ3OxCm2hLWYp0I0yJ1sYHkv7cp r76kP+gb1HOkLVqVbnLR3rDd85O0lEd8DRzNZ722zb5CyHHdC3S7EbKOxkYL PAjub0vbBwYR/jUy8zVke5x5Ppen3FaHImUIYWJnbslERti9H8re0N0japWH 1CrriireIixbWu8y76j/SfPFSRpS5IqwDyHD4U+67kd41O9VSd4jnOmY6XKT rC/19leSq1j/+2AYoXbxjpAlDeakkzCCEOSipScCCOnayZpp8j8/zgmF "], CellLabel->"Out[12]=",ExpressionUUID->"3650c1fe-9580-4897-b8e5-9811230a3994"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"graph", "=", RowBox[{"DateListPlot", "[", RowBox[{"data", "\[IndentingNewLine]", ",", RowBox[{"Filling", "->", "Axis"}], "\[IndentingNewLine]", ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{"Unique", " ", "domains"}], "]"}], ",", "None"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"HoldForm", "[", "Year", "]"}], ",", "None"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"FrameTicks", "->", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"All", ",", "All"}], "}"}], ",", "Automatic"}], "}"}]}], "\[IndentingNewLine]", ",", " ", RowBox[{"GridLines", "->", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"{", "x", "}"}], "]"}], ",", "Thick"}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "2017", ",", "2027"}], "}"}]}], "]"}], ",", RowBox[{"DateRange", "[", RowBox[{ RowBox[{"{", "2017", "}"}], ",", RowBox[{"{", "2027", "}"}], ",", "\"\\""}], "]"}]}], "]"}], "\[IndentingNewLine]", ",", " ", RowBox[{"Join", "[", RowBox[{ RowBox[{"Range", "[", RowBox[{"0", ",", "300000", ",", "10000"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", "Thick"}], "}"}], "&"}], "/@", RowBox[{"Range", "[", RowBox[{"0", ",", "300000", ",", "50000"}], "]"}]}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"ImageMargins", "\[Rule]", "20"}], "\[IndentingNewLine]", ",", RowBox[{"ImageSize", " ", "->", " ", "Large"}], "\[IndentingNewLine]", ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", RowBox[{"GrayLevel", "[", "0", "]"}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotLabel", " ", "->", " ", "\[IndentingNewLine]", RowBox[{"Column", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Style", "[", RowBox[{"graphtitle", ",", "16", ",", "Bold"}], "]"}], "\[IndentingNewLine]", ",", RowBox[{"Style", "[", RowBox[{"graphsubtitle", ",", "12", ",", "Bold"}], "]"}], "\[IndentingNewLine]", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"\"\\"", "<>", RowBox[{"DateString", "[", RowBox[{"TimeZone", "->", "\"\\""}], "]"}], " ", "<>", " ", "\"\< UTC\>\""}], ",", "12"}], "]"}]}], "\[IndentingNewLine]", "}"}], "\[IndentingNewLine]", ",", "Center"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotRange", "->", RowBox[{"{", RowBox[{"Automatic", ",", RowBox[{"{", RowBox[{"0", ",", "Automatic"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Export", "[", RowBox[{ RowBox[{ RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"ToLowerCase", "[", "graphtitle", "]"}], ",", RowBox[{"\"\< \>\"", "->", "\"\<_\>\""}]}], "]"}], "<>", " ", "\"\<.png\>\""}], ",", " ", "graph"}], "]"}], ";"}], "\[IndentingNewLine]", "graph"}], "Input", CellOpen->False, CellChangeTimes->{{3.867186565207215*^9, 3.867186567959504*^9}, { 3.867186655694774*^9, 3.867186670522201*^9}, {3.867186775392453*^9, 3.867186776891725*^9}, 3.867186837903651*^9, {3.867186904930146*^9, 3.867186940968878*^9}, {3.867187286976087*^9, 3.867187304612606*^9}, { 3.867187379649686*^9, 3.867187384392969*^9}, {3.8671874248081408`*^9, 3.867187425393301*^9}, {3.867187462942827*^9, 3.867187467876066*^9}, { 3.867187585120219*^9, 3.867187592332826*^9}, {3.867190421572784*^9, 3.867190455350173*^9}, {3.867191170483214*^9, 3.867191170658471*^9}, { 3.867191203296914*^9, 3.867191245177144*^9}, {3.867443579626745*^9, 3.867443615991692*^9}, {3.867445864801002*^9, 3.867445865695055*^9}, { 3.867585461992905*^9, 3.867585470469511*^9}, {3.904556674711198*^9, 3.90455667849632*^9}, {3.9218516314196*^9, 3.921851639595783*^9}, { 3.92185167067825*^9, 3.9218517351487503`*^9}, 3.9218517880751457`*^9, { 3.955049104125002*^9, 3.9550491107858753`*^9}, {3.955724397073245*^9, 3.955724433737275*^9}, {3.955724625452713*^9, 3.955724669412251*^9}, { 3.956329876096713*^9, 3.9563299103616667`*^9}, {3.956329970680182*^9, 3.9563299964577503`*^9}, {3.956330107899218*^9, 3.95633011499457*^9}, { 3.956330149847582*^9, 3.956330152663987*^9}, {3.95660104472755*^9, 3.956601064036846*^9}, {3.956601094494957*^9, 3.956601107665969*^9}, { 3.956601171882221*^9, 3.956601200199129*^9}, {3.956601252613394*^9, 3.9566012593755283`*^9}, {3.956601299500546*^9, 3.956601381489203*^9}}, NumberMarks->False, CellLabel->"In[19]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eUFNW6BuAiz5BsESWIUChIhiKIZArwkERoEMlIwUhSQoOISLJEciyC MIBgCUgaQovjMCJCiWkQlAYJQy6JQximAYEhnzvf+/Zdq8/irHV/3V/lH86z dvr2t3dXmDq7dJ+hHfpmVxRleW5Fyfr3f/4zZ6ZcaZL1P9zOV/QnOJj0X+x0 jbbZTuzLtxvWO4kDvWj7LbE9LWL0F/qGdmAt5ne6m9jqQbvdxc5kWl8SbbWn WD0eaQ+b1fbARh/E25VW+yPeTbQN66mR+vPTn+RA9r30KsTfiVYTEH8CrX8j Ng7RzhbM5zFtw+r4Pzi/0dG26yP+A7SacVnif0DrV8Xuy3/S58X6GNo4KVbK 7KNPi529/80HxOHbtAr7Xw/RmzH+F6HI/DD+blqB9ZL7uR8SxYGWtLtKbDx/ gPNLwPhDaWcOxrtGmxb6H/QX248T288eZHtTHGpMq7CVRitdMJ8Gh1gOm98f iuxf5KfAEY53Cu1nROyK1bypzM99zH8q7U7H/jlJ27OwHyYd5fifR9tdGm0H 1o7R6lbsl5zHON4+7JeqtH5MHJ5AmzmuSjyVjrO/WHHg4H+xW0AcKn+CfkFs 7afNVHG47EnG3/Ga5GsVrbYXu5m0myS/h9CeU2y/VazePM36Y8TBYS7L5+H3 U/xvzucu2g+JOJv0ry48w3zWE/sGnmU8cWKt3zmWHxY752h3KtrXPU/XFPvj Iq6A/vJfiIpfi73IeDeKrZ606/8PdxWHv6adLmJ3Yhp9HfnOcYnz7Y58d6aN DFyvKl7meHlRf/UVzh9Wyl5l/XGo/wdtD8f1y05n+7HYPzeuMb7P8PsqkcH6 I8S++DDjOX0py/quiH34PWy/wfzmCmfZ/u4my9dnSPxnI04WO0n/cL5txP5X btGzxHrMbY4/U2xVu0Ofw3qk0sZ5cajCXfoZqR9++R694IasZ3vajpVyX5n7 nG8G9kPpB4z/1hmJ7wtahQPPP2J/mWLtZ1ovfFbqN33M8iJifYFyFVbFWv9s sJJXbM7ODju5xPaMHLAZg/6m5mT7PKhfPRf9O8bfmJv9bRL71+eB3dVifVwM 6yeJrVWxsB4Umx/mZfsE1FfzMZ4pYuOF/Oyvq9gdUoDt+2L8hQVZXl3isy7T aiXEX/gpzgcOXoy4OPLTz8f2z4rV/IWiyv21Iy6G+rHPwHZdjKcVpuug/yrP sj84VPE5+iLy/3HEaYjvIW1fFbv3itA3xUpmUY5/F+1/eZ5+gPh2lWB/sO+9 F1j+GPUHlKTbncty2FeK/fcRm3Noc5I4+F3Es8RavtLsfyHKe7zI8qViZeJL dHfkI3sZ5r9QtJ1e0bafwfwr08pK6S+wtizXdw3Gb/8y+9sk9rctx/aJYqNk BY7fD/0Nj3gA8nOdtu9JfXdoRfZ/SWxdqcT9mRFtG1bfrcz538D4CyJ+hP4K VWH7x6hfoBrHT0V+e9OGK/a5tH0Z8zupMT9PnZf55KnO/mH/MVovJA5Vqhll pRPtTsP8H9FOHPbj/losfxv76z5tYj10/ytPtor61oe1Wd5HHN5D26hvtn6V fh/9L4/4Pez/YXXYPkNshGnlcZrE+1rdyH6NtvMfVhS53vt/qhvJv5QHi9Rj Pu6JfYNo94RYX0irn4uN+fVZXlj6Uxs0oF8RmxatV8T9pW5DxldNrOVvxHga ip3ptNoU7Ws2Zn/1/0/WT9B6vWirsLZZZ3kbcbhzE+4nHfnYQNuviX1vNaUN cegh7Si4n45tRpfC8+Q9WnkDz4MrX+N4cXj+ffFfHG8snn/b0Crux8qeSPnH 6L9Uc86vXLSN+XgebUXbMzH+MlpZhPt3iRbsfwviaR5xEp6fA7SzFfH9Qhuo H2rWkv0dE2vxtJ32RIf1VuyPz8OXaOUOnjcatWb5NfR/gVbb4/m27+vMV5Fo q+XxfDOzDfNRRJ6H3CTarhBttaJYz/cG51NdrJ2infJi//G2bJ9NbOZqR+cW 29n97K8Ynn8rtOf+LYj+23dgfdho+ybrP8Tz+F7ayInxSnfk+HfxPvkP7ea7 GmUHDg1/K/L7lvrKMlq/L/b/3IntGc+izhyvHOJZ0IXxVcX4/buy/jLk6zyt z0X7et3ohk90KJl2xopVtzvLj6L/vD04/9PIZy3aQbk7lXZno/+TtHEL632s J+OtLHYr9WJ5P7wfPeoVuV7iffjl3pH7G/L5Uh/WX4H+1Diu15/YPy3eYTwH 8feG4n3Zfh3ep9Jpdwyer4v0Y/6xH4OXabs43o+sASxPQD6eGsj+PsX842jl Pbzf1H6X4/fD+8102i6L94ma7zF/9aW90/O9qPLwFNqsIDZzD3qy1SbS3jeJ VupIuZ1jMOPrjvebCYMj93v0X3EIxxuC9ekwlPlchd9P2QDLf8F8M2k9Ee8r pYazfDP23w3amIH5NH+f5SOwX36hTQu/t6sjmP945HfnB+x/B/I5byTrP50e ZaUQ3ie3R9u9QLuNMN+Co1huIN99Isb7qDOTtj9Gf70+Yvxz0N802l2I9esx muu5Df1/TbtJeN+cOIbxl8T70KaIj+F9pfNY9n9PHEig1Qd4P1o7juWqvH+p 5cZH7q9if3vaP1McaPsxHBwhNkqb7G+oONjyE9ZfI9Z/o60b8j6lBCbAWp6b WQ43/ZTtK4iDV2grQeqH0iay/lgpd76fxPXp+I/E65sM+0bcjLJ/AvqbTYeS xL6ztLtObPeewny1E4dm0M6bYiWJ9nWPtj0c430zlfH/ivGqT2N/pzDeZNrZ gPZdp8OBK2LrCO3XZT7BgzPYvoZYeTCT8cei/MPZHP8PxDtiDv0V8jnM4vxS xGaY1jIRz9C59C3k8/I8rv9L6P+H+eyvqdi9SDua1Nee+oz9D5JyZxZtzRWb tReyfqo41HMRHG5yK8v+zfGcjyp2qyzmejYTh5QlzM9RsVKJtrPflvH+okM/ ob8OS9l/Hin33af1F8V62c9ZvkCsZdL+RLG6ZxnHWykO3FgeuX+KrYwvmJ/a qD/EZv5aiM1dtD1UHLr0JeuvxniNVvD3sh/tn17J+f4tdr+jtYtPtN1nFee7 E+0Tv+L15ALiPb6a8WaIlW5rOJ90xJ9K+2LvSL4+Wct4g+LQgXVsnzMzylYO cXjfes7nd6kfHJXA+fwi1u/Q5kFxoPQG5veeWLFpvZL0Z5XcyHiqiZ2WtNZS HHx+E39Pc8T2NTo8KdohS6wN3szxp6D/H2lfvFjVg2y/Tuym0YEJEp/m28L6 R8VGPTrws9iZTYcuI38FvuF8tkt/viTaqHxX5p83kX5FbNei3beQ37fp8BDk t/u3zP9SxFc1ietzAv13pZ1z0bbgULatnH8a8nmQDu2ReM1xyVyvw1iPfd+x /7+Qv7u0OQ35e2Mb12MZ8reXNraKTfV7rm8LceAmbQ0WG79uj6yvkvWvf/EP rN/5nqxvOq19ILadHay/S2wM3Mn5povVQg7z9/x9mf952iomtuN+ZHwtxUb+ Xex/Htp/S6v9kN+eP7H9aqmvb6Htb8XapJ+5PtXF4Sq/MH+G2FV+ZfsiDySf j2jjg2xZ/zqrf+N8J4nV+7TeQ9qb7VLY/3Bx4MXdnN92iTc0krb+irYNq8t/ 53z6PpZ8DNvD9RuJ+sX2cv23ia1ddHDnQ5nPc3+w/j6x+RkddKW+9vQ+OPVX zGcO7axUojwVVs/R2rsyn2CfEH0X8W2l7cJSP5BvP8cPS7mWSMeUQH9TDsB1 Gor1iX/BaY3FoewHGU9XxHOIjvkI+63jITjzM7HvIW2uQ3/lDsOjtoqNMkfY fgvG/4MOpaC/O3TyH2L3g1Suz9+Yzz+0koH4Wh6l80r+rOu0UVMcvHaM15eq 2bP+1fQTHH+YWH3mJOsvFgfn0gNscaDeKc7fFYdm02uvo7+zdOCG2Ol9Go7P k0PyMc2FuzQTKz3+5v4cIzY3nuH8DNSvfJb57ynWO9FqN7E17hz3z0Gxsybi A+Lg6POMbyX620cH5qK/u3RKAuJZcYHxrhBre+nkRRhPvch87cJ4rWn3DOK/ SWtbxW6LNK7Hboz3OZ3aLKfkr/gluHw6xht6KXK9knL/oMvc78XF7uWIa4gD A68wn7XFRoOrnF87sWPRU99Ef0+lc3/PFQfjaHsp4jGu8frwt9iKzWD7u+iv Jp1cMJf0t4WOf1XsamGO31ysVL3O+pPExgQ6M0nse3SD+amfO+tfe+xNxmeI jbL/8Pr8odifSWvfit2Rtzh+gjhwi7a2or9St5nvH9FfCq09EIeb32H+q+WR 9RmSCbecIVaK3OV67BA7O+mUg+JA/fucX6sYWb9ztBInVrc+YHwzxGa+h+zv drTj92M9T9Gp58RKz0dcn26SL20K7e8vdnI95u/nXbHajfZPFpubaGuDWO+s pItHrReHDtHGWaxPx2z0S5Ifazwd00Jsts8ODxgkDo6hjYBYv0cn7xSrdk64 jk/yFSyZC15bC/n7jQ6/Ibav034/8t88NxzfS6wF6JgxYmMJXccSWz9HyoNY r2v01NXicNE8sPuF2L1CxxzG+AtiYPMS+m8YCysFZb38vrywVk/szqaTW4hD vfPBaaPFyky66Hjsh2n54WAi1v8kbW8T65MLwJlnsJ+6FoSt2FiZzxG6ZRtx ONtTjL+dWK1MBz/JK/2b9KjlYvcgrWL+gcXPMn5YKfocHHLwe3dodxXuR42L MN4ksTmQ9i3E/ahBUThlmVj5nrZx/9PO0zGHxOFZxeDUsDhYuzjL+8v9yjXo UePEduzzsBMvDtWk66wVG1volBN4fshdgvk4g/vfUboL7n+BCS+wfnuxvYH2 D8T97TCd/BHuZ+tKMn9JYn/5UtwPB3C/HEtb59H+I5XjVcP1/U9abYv7R5vS 3C/jxeGRtDJdrH5J15mN+9eIF2nMP5BCW2vE/iFluH9aIX9X6dAnYl+RsszH FORn3stcn/Vis345xrdPrJ+j66SJlVnlWe7D/BMrMN7PxW6Nihz/R+TzOK2m IX+plbi+9WU+/s6Vmb84sT2+CtuniI1yVRnvELQfQxuzxWaZapzfKbEyUuPv NxH5tumUJOS7ZHXu53K4/12npy4R2z/XYP0auL7+WJPrv10cXFCL8RbC/abh Kyzvh/uLrzbj34j71Vna2oPrZ4FXGW8Mfi9uxL0e6Vn/1KrD39MEsdqjLtdn idjNWY/7P688vwY+pQO9xZZZn+WvitXHtOsX2/6GvP5Wx/PmikaMLxXx7G7M /dge+yOs8/q8Gb+fn5pwfvmxv52mXP81YqNxM67PbqzXfHqAmiPK5fvh+ch6 jfOdguej83TRbXgem/0vjn8Xz1/5mzMfNWW91Bl0Cp5X3ZotOP9r+H1vaRG5 fmN/naDdUojnaEvuxwDiOdyK6zEc9T9uzfzEI56DtP4T9mf517m/8byp7qdj imF/tWvD+dXF/nrxDe6fabi/f0gri/H8toeO/01sprRlPgvjealFO5bruJ8P o8NtxYGldNEOeF54zc/1Go/9vIteuxzPb03ac33q4flyZ/vI/RjPI406MN5B Yu0iPeD1aPtzyPuoVf9N7scd8j6mbqN1RcrNgh2Z35fE+lba7ii2873FfAzA +61B2wPFRiKttxI7MZ34e+8rDteIeJBY7Ulrq6JtrUE8X3eKXP/EPq0z1/Nr cWAirW/H+J27sPw0+lO6crzDYnctHXxZ3m/1h7TRRWzc60avx/vwqO7M1yK8 D9+h1Y3iwO89uJ+/Fmvv9+R4CehvGe3OFKvN3+Z8HbGvWC/ONxnxNKPt78X2 ol5R9Z0FBtdztdj/TG/OZwnia9g78nsVB/vTAUvszqWNkRjvAq10Fofe6cP+ CyL+s7Sdgv1TII711yG/MyPejPXp9Q7nG4/1+YYO1sR+qdGX/XVH+2r9mL9l 2G+V+3M9b2G/mbSiSDzKIVorgfgqDGC899HfAdoZi/mOHsh4vkT9ve+yfWu5 Xvu/eI/lS3H9fmEQf1955HqsD6fdkrh+Lx7M9gvEwYVDuB9y4+8JV+iWsXjf nz+U5eXFVoMA90cVPK+dp5MH4e8PycO4PhPFdv7hnP8NGc/4dnhkfXB/ePt9 5suPvz/kHsHrx2jcLybRyfh7h9HlA15/puN5pNJIuM5jPI+so2M24P4x9kPe b3C/d9qNYjzX8HzwJ202xvXz1kfMP55PtRGj2X92XN9u0Mml8D6aMYbxz5f7 r5I+lvlKx/26yTheT9/E+8FOustNvB/MGw+n9pPn8cDTH/P3tB7P9xat5Zfn b20bHayO5/M+Jue7WGz+TSe/L8/j+vRPeP+akU/yETOB61Mmv/TXk+5Sq4DM 7zidVqmg5Kfbp/QZsTmRDjSS9sFNdOZP0l6vMpH52yzj25/QaoyMb3WcxPFi xepfdHiE2Ld6MvNhi/UQrf0gtstMYX8H0d8dOuW22Px9Ksd/KA7+Q4cLS7z2 b9M4via2lkzn77mx2Bw8Ay7fTxxaMJP7pazMz2o4i/ldLDZ9s7l/7oqD9Wg1 j+TLcucwnhn4flXLYv4Oid08c+lc8j1J70GHJ+N7VLV5nL+J9kdoIw7f48z5 /D3NFhsPFnA/JuHv2Xc/Y3w18ffplxZy/xQS6ytopx3+Xn2bdvn36i8Wcfxy +Hvr7kWR+yv+XtsynuXX0f+vtP2DjK//azHLk/D9oekS9m/K9y1nIe3Mwve1 xktZfz6+1w2kg2n4Xjj3c5an4/tc3WVcnwrSn3mGDiwV26eXM581xOHcNuNr KO393WnzCL4nTqJVfI/Vq37J9oPle609gTbewPfeI7QSK9ayraBzi/2PIk7C 9+MOK9n/c9ezHLhPh+aItVWr+PvvIu2tTNodKQ63+Yr5mIf+v6TVVvheemM1 42uL/ZKxhvmdju+5xdey/o/Yf7topRC+n6bT7jOYf5F1zHcD9P8Z7U/H/3/4 h/XM93qx2zeB7ftL/cA52v4T34fjNrBckfyHX9nI/GbH+iXSVmex3nMT55uA 76fHaWuEfP8zum3mfp+C74sJQY43GOs9Zgv7D2I/lfmG828ttu/Qxj3E1yaR 8X2HfJRIYvunsf8yaMMSW4O3Mr4W2L96Mstj8H15Ae3H93K74Xfsb4CUGxdo sw++98/ZxvXagfjc75nf8WKt13bul0rIX54fuH4jMf5kWq2F+QbpcCNxoOsO 9tca8XxKB5/D9aPyTrYvJ/Y/pq1Zsr6+tQ69A7+XyHkm/ve/5fzPO//knX+C vfNP0t47/+Sdf5Jy7/yTxO+df4p8Txd755+8808o984/Rdk7/4T18s4/MT7v /FOWvfNP3vknzMc7/yTxeuefmD/v/JPkwzv/xHLv/JOM551/Yn/e+SdZH+/8 E+fjnX+S/Hnnn7i+3vknyad3/on59s4/SXze+SfaO/8k8Xnnn5hv7/yTzM87 /8T//4x3/kny751/Yn3v/JOsp3f+ifW9808yf+/8E/PjnX+S/rzzTyz3zj9l 2Tv/5J1/Qv/e+SeJxzv/xP68809Z9s4/eeef0J93/knG984/cX7/D+ef/g0o /gck "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lPUEIgWBtA/27Zt2zYm2zXZbrJnsu2abNvmZNu27+72sNc5z99aB4ka tavcNnBAQEAgKgb5XSsE+d2XpxxlKUNpSlGSEhSnGEUpQmEKUZAC5CcfeclD bnKRkxxkJxtZyUJmMpGRDKQnHWlJQ2pSkZIUJCcZSUlCYhKRkATEJx5xiUNs YhGTGEQnGlGJQmQiEZEIhCccYQlDaEIRkhAEJxhBCULgX/kRwE+h/uA73/jK Fz7ziY984D3veMsbXvOKl7zgOc94yhMe84iHPOA+97jLHW5zi5vc4DrXuMoV LnOJi1zgPP9xjrOc4TSnOMkJjnOMoxzhMIc4yAH2s4+97GE3u9jJDrazja1s YTOb2MgG1rOOtaxhNatYyQqWs4yl/MsSFrOIhSxgPvOYyxxmM4uZzGA605jK FCYziYlMYDzjGMsYRjOKf/ibkYxgOMMYyhAGM4iBDKA//ejLX/ShN73oSQ+6 042udKEznehIB9rTjl+D2YbWtKIlf9KC5jSjKU1oTCMa0oD61KMudahNLWpS g+pUoypV+IPKVKIiFShPOcpShtKUoiQlKE4xilKEwhSiIAXITz7ykofc5CIn OchONrKShcxkIiMZSE860pKG1KQiJSlITjKSkoTEJCIhCYhPPOISh9jEIiYx iE40ohKFyEQiIhEITzjCEobQhCIkIQhOMIIShMAEIoCfFukPvvONr3zhM5/4 yAfe8463vOE1r3jJC57zjKc84TGPeMgD7nOPu9zhNre4yQ2uc42rXOEyl7jI Bc7zH+c4yxlOc4qTnOA4xzjKEQ5ziIMcYD/72MsedrOLnexgO9vYyhY2s4mN bGA961jLGlazipWsYDnLWMq/LGExi1jIAuYzj7nMYTazmMkMpjONqUxhMpOY yATGM46xjGE0o/iHvxnJCIYzjKEMYTCDGMgA+tOPvvxFH3rTi570oDvd6EoX OtOJjnSgPe1oSxta04qW/EkLmtOMpjShMY1oSAPqU4+61KE2tahJDapTjapU 4Q8qU4mKVKA85ShLGUpTipKUoDjFKEoRClOIghQgP/nISx5yk4uc5CA72chK FjKTiYxkID3pSEsaUpOKlKQgOclIShISk4iEJCA+8YhLHGITi5jEIDrRiEoU IhOJiEQgPOEISxhCE4qQhCA4wQhKEAITKNDvZ+qn8oPvfOMrX/jMJz7ygfe8 4y1veM0rXvKC5zzjKU94zCMe8oD73OMud7jNLW5yg+tc4ypXuMwlLnKB8/zH Oc5yhtOc4iQnOM4xjnKEwxziIAfYzz72sofd7GInO9jONrayhc1sYiMbWM86 1rKG1axiJStYzjKW8i9LWMwiFrKA+cxjLnOYzSxmMoPpTGMqU5jMJCYygfGM YyxjGM0o/uFvRjKC4QxjKEMYzCAGMoD+9KMvf9GH3vSiJz3oTje60oXOdKIj HWhPO9rShta0oiV/0oLmNKMpTWhMIxrSgPrUoy51qE0talKD6lSjKlX4g8pU oiIVKE85ylKG0pSiJCUoTjGKUoTCFKIgBchPPvKSh9zkIic5yE42spKFzGQi IxlITzrSkobUpCIlKUhOMpKShMQkIiEJiE884hKH2MQiJjGITjSiEoXIRCIi EQhPOMIShtCEIiQhCE4wggb8/+X/dfYD/gf1epEz "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl11OwGIYSANAb27Zt27aNxrbZ2LZt22zspI1t207eybyPM7vfO7NK1Kh9 5XaBAgICygcJCPgTAyMNCEowghOCkIQiNGEISzjCE4GIRCIyUYhKNKITg5jE IjZxiEs84pOAhCQiMUlISjKSk4KUpCI1aUhLOtKTgYxkIjNZyEo2spODnOQi N3nISz7yU4CCFKIwRShKMYpTgpKUojRlKEu5P3WjAhWpRGWqUJVqVKcGNalF bepQl3rU5y8a0JBGNKYJTWlGc1rQkla0pg1taUd7OtCRTnSmC13pRnd60JNe 9KYPffmbfvRnAAMZxGCGMJRhDGcEIxnFaMYwlnGMZwITmcRkpjCVaUxnBjOZ xWzmMJd5zGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbGcHO9nF bvawl33s5x8OcJBDHOYIRznGcU5wklOc5gxnOce//Md5LnCRS1zmCle5xnVu cJNb3OYOd7nHfR7wkEc85glPecZzXvCSV7zmDW95x3s+8JFPfOYLX/nGd37w k1/85k/zByIwQQhKMIITgpCEIjRhCEs4whOBiEQiMlGISjSiE4OYxCI2cYhL POKTgIQkIjFJSEoykpOClKQiNWlISzrSk4GMZCIzWchKNrKTg5zkIjd5yEs+ 8lOAghSiMEUoSjGKU4KSlKI0ZShLOcpTgYpUojJVqEo1qlODmtSiNnWoSz3q 8xcNaEgjGtOEpjSjOS1oSSta04a2/Bne7elARzrRmS50pRvd6UFPetGbPvTl b/rRnwEMZBCDGcJQhjGcEYxkFKMZw1jGMZ4JTGQSk5nCVKYxnRnMZBazmcNc 5jGfBSxkEYtZwlKWsZwVrGQVq1nDWtaxng1sZBOb2cJWtrGdHexkF7vZw172 sZ9/OMBBDnGYIxzlGMc5wUlOcZoznOUc//If57nARS5xmStc5RrXucFNbnGb O9zlHvd5wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+8Zs/ iz8QgQlCUIIRnBCEJBShCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk JBGJSUJSkpGcFKQkFalJQ1rSkZ4MZCQTmclCVrKRnRzkJBe5yUNe8pGfAhSk EIUpQlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGtSkFrWpQ13qUZ+/aEBD GtGYJjSlGc1pQUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGbPvTlb/rRnwEM ZBCDGcJQhjGcEYxkFKMZw1jGMZ4JTGQSk5nCVKYxnRnMZBazmcNc5jGfBSxk EYtZwlKWsZwVrGQVq1nDWtaxng1sZBOb2cJWtrGdHexkF7vZw172sZ9/OMBB DnGYIxzlGMc5wUlOcZoznOUc//If57nARS5xmStc5RrXucFNbnGbO9zlHvd5 wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+8Zs/R38gAhOE oAQjOCEISShCE4awhCM8EYhIJCIThahEIzoxiEksYhOHuMQjPglISCISk4Sk JCM5KUhJKlKThrSkIz0ZyEgmMpOFrGQjOznISS5yk4e85CM/BShIIQpThKIU ozglKEkpSlOGspQL8v+/6X/NfZCK "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1694]}, Annotation[#, {{Callout}, Charting`Private`Tag, {846}}]& ]}], {{{}, {{}, GraphicsGroupBox[{ {LightDarkSwitched[ RGBColor[0.87, 0.94, 1]], AbsoluteThickness[4], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]], CapForm["Butt"], JoinForm[ "Round"], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.992526642375*^9, 80873.}], Offset[{-8., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-10., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-12., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-12., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.992526642375*^9, 80873.}], Offset[{-8., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-10., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-12., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], Offset[{-12., 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, { 3.992526642375*^9, 80873.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.992526642375*^9, 80873.}], Offset[{-43., -5.500000000000003}, {3.992526642375*^9, 80873.}], Offset[{-43., 5.499999999999997}, {3.992526642375*^9, 80873.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"80873\"\>", BoxRotation->0.], StripOnInput->False, LineColor->GrayLevel[0], LineOpacity->1, FrontFaceColor->GrayLevel[0], BackFaceColor->GrayLevel[0], FrontFaceOpacity->1, BackFaceOpacity->1, GraphicsColor->GrayLevel[0], Opacity->1, FontSize->Small, FontColor->GrayLevel[0], FontOpacity->1], Offset[{-27.5, 9.797174393178826*^-16}, {3.992526642375*^9, 80873.}], NCache[ImageScaled[{Rational[1, 2], Rational[1, 2]}], ImageScaled[{0.5, 0.5}]]]}]}}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, False}, AxesLabel->{None, None}, AxesOrigin->{3.729024*^9, 0}, DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ TagBox[ TagBox[ RowBox[{"Unique", " ", "domains"}], HoldForm], HoldForm], TraditionalForm], None}, { FormBox[ TagBox[ TagBox["Year", HoldForm], HoldForm], TraditionalForm], None}}, FrameStyle->Automatic, FrameTicks->{{All, All}, { Charting`DateTicksFunction[Automatic, DateTicksFormat -> {Automatic}], Charting`DateTicksFunction[ Automatic, DateTicksFormat -> {Automatic}, "TickLabels" -> None]}}, GridLines->{{{3.6922176*^9, Thickness[Large]}, {3.7237536*^9, Thickness[Large]}, {3.7552896*^9, Thickness[Large]}, {3.7868256*^9, Thickness[Large]}, {3.818448*^9, Thickness[Large]}, {3.849984*^9, Thickness[Large]}, {3.88152*^9, Thickness[Large]}, {3.913056*^9, Thickness[Large]}, {3.9446784*^9, Thickness[Large]}, {3.9762144*^9, Thickness[Large]}, {4.0077504*^9, Thickness[Large]}, 3.6922176*^9, 3.6999936*^9, 3.707856*^9, 3.7158048*^9, 3.7237536*^9, 3.7315296*^9, 3.739392*^9, 3.7473408*^9, 3.7552896*^9, 3.7630656*^9, 3.770928*^9, 3.7788768*^9, 3.7868256*^9, 3.794688*^9, 3.8025504*^9, 3.8104992*^9, 3.818448*^9, 3.826224*^9, 3.8340864*^9, 3.8420352*^9, 3.849984*^9, 3.85776*^9, 3.8656224*^9, 3.8735712*^9, 3.88152*^9, 3.889296*^9, 3.8971584*^9, 3.9051072*^9, 3.913056*^9, 3.9209184*^9, 3.9287808*^9, 3.9367296*^9, 3.9446784*^9, 3.9524544*^9, 3.9603168*^9, 3.9682656*^9, 3.9762144*^9, 3.9839904*^9, 3.9918528*^9, 3.9998016*^9, 4.0077504*^9}, { 0, 10000, 20000, 30000, 40000, 50000, 60000, 70000, 80000, 90000, 100000, 110000, 120000, 130000, 140000, 150000, 160000, 170000, 180000, 190000, 200000, 210000, 220000, 230000, 240000, 250000, 260000, 270000, 280000, 290000, 300000, {0, Thickness[Large]}, {50000, Thickness[Large]}, {100000, Thickness[Large]}, {150000, Thickness[Large]}, {200000, Thickness[Large]}, {250000, Thickness[Large]}, {300000, Thickness[Large]}}}, GridLinesStyle->Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], ImageMargins->20, ImagePadding->{{All, All}, {All, All}}, ImageSize->Large, LabelStyle->{ GrayLevel[0]}, Method->{ "NoShowPlotTheme" -> "Detailed", "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "DefaultPlotStyle" -> { Directive[ RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Directive[ RGBColor[0.95, 0.627, 0.1425], AbsoluteThickness[2]], Directive[ RGBColor[0.455, 0.7, 0.21], AbsoluteThickness[2]], Directive[ RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[2]], Directive[ RGBColor[0.578, 0.51, 0.85], AbsoluteThickness[2]], Directive[ RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[2]], Directive[ RGBColor[0., 0.6, 0.6], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.36, 0.684], AbsoluteThickness[2]], Directive[ RGBColor[0.56, 0.7, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.54, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.585, 0.5976, 0.9], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.45, 0.45], AbsoluteThickness[2]], Directive[ RGBColor[0.7632186717367254, 0.8174402144034898, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.8554632469481959, 0.24885384718327969`, 0.8334053873948551], AbsoluteThickness[2]], Directive[ RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], "AllowMicroRanges" -> {True, False}, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentSet", "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotInteractivity:>True, PlotLabel->FormBox[ TagBox[ GridBox[{{ StyleBox[ "\"Hosts file size history\"", 16, Bold, StripOnInput -> False]}, { StyleBox[ "\"base version: (adware + malware) only\"", 12, Bold, StripOnInput -> False]}, { StyleBox[ "\"updated: Sat 18 Jul 2026 21:49:19 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9933216*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->CompressedData[" 1:eJwNz1sowwEYBfDJEIuYS7GIB8nEJPHk8hmiFho2JQ+W5ZbWhFwm8bg88EBZ iblkGPtnF7YxI5e55MndShFF+0oRWsj3cPo9nnMSZAqx3IfFYqVTYld3Em+1 CEGM7StpBmEqNAmiZxEO3Hp5D+nRnQri5hAEnuYYF7k7bK+Mn0fgPfHzOshJ ycubi/zhlGs5CwjTmo8Wtg5BaI9iZZLPIunxHjnIrAQFLiLM8JnSTPIze1S6 TPrOCR13SwgFZfKRgWWE8+z0Bz89Qq64smKITI7UlFatILiDe8suyb7GZp56 FcEiMxjfyVAbZ7PTgHDfa9adMwivfv1OzRrC2H7aU44RIeOD6+WaEBrYnOtW kv/rvM6yIPgrDIXh6wj1RX9uNSluCziq2UDo7pGKjKTerCypsyIcTxy2+9to b7HkQk9yheOFj3aECOYkpHYTgX1gFyVs0X/TzfgaaVXJm65IrPJ4VQ7qfewK 05JKa0QqbCN877xVpzgR8nXvrWfkP1Hn0NQ= "], CellLabel->"Out[21]=",ExpressionUUID->"4dce608b-52fb-40e8-9898-398907a1d3b4"] }, Open ]] }, WindowSize->{1280.25, 878.25}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification:>1.25 Inherited, FrontEndVersion->"15.0 for Mac OS X ARM (64-bit) (May 19, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[554, 20, 167, 2, 62, "Input",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[746, 26, 5536, 130, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6285, 158, 1224, 22, 53, "Output",ExpressionUUID->"3650c1fe-9580-4897-b8e5-9811230a3994"] }, Open ]], Cell[CellGroupData[{ Cell[7546, 185, 5482, 117, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[13031, 304, 20995, 425, 546, "Output",ExpressionUUID->"4dce608b-52fb-40e8-9898-398907a1d3b4"] }, Open ]] } ] *) (* End of internal cache information *)