(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='WolframDesktop 13.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 161, 7] NotebookDataLength[ 34322, 740] NotebookOptionsPosition[ 33550, 716] NotebookOutlinePosition[ 33978, 733] CellTagsIndexPosition[ 33935, 730] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ 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[407]:=",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->{3.97275803131399*^9, 3.9732634127599916`*^9, 3.973447936542053*^9, 3.973716818262982*^9, 3.97387011817763*^9, 3.974455882121476*^9, 3.974831989673029*^9, 3.975168268007036*^9, 3.975669957970932*^9, 3.976294530467311*^9, 3.976396525690257*^9, 3.976484506226364*^9, 3.976887861447331*^9, 3.9770604723918333`*^9, 3.977171244678668*^9, 3.977330621664894*^9, 3.977824777023036*^9, 3.978021677067134*^9, 3.978359166029036*^9, 3.978707155134041*^9, 3.978887837684153*^9, 3.979059705165444*^9, 3.9792331591229563`*^9, 3.979894024825791*^9, 3.980403543469507*^9, 3.980500992536922*^9, 3.980797522567663*^9, 3.980937301257283*^9, 3.9810258693468113`*^9, 3.981269692365806*^9, 3.9818931043083143`*^9, 3.9822286101500273`*^9, 3.9825036963300533`*^9, 3.98275853044065*^9, 3.983188556497279*^9, 3.983454835670471*^9}, CellLabel-> "Out[410]=",ExpressionUUID->"d141527a-557d-4fb2-acd3-e2ed1763bf81"] }, 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[417]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eUFNW6BuAiz5BsASWoUChIhiKIZApQgiI0iGSkYCQpoUEEJJZIjkUe kpaA5NAiDiOiFJgGQWmQMCChJMgQhmnyDPHc+d6371p9Fq51f99V5w/nWTt9 +9u70rS7ZM9BbXtlVRTl/ZyKkvnv//zPnJF0pVHm/3E7XNGf4GDCv9jpFG2z tdiXZy+stxcHutP2O2J7asToL/Q17cBazG90Z7HVlXa7iJ1JtL4k2mo3sfpX pD1sVtkHGz0Rbyda7YN4N9M2rCdH6s9LfZIDWffTqxB/e1rdgPg30PrXYuMI 7WzFfB7TNqyO/Z3zGxltuy7iP0SraZcl/ge0flXsvvwHfUGsj6KNU2Kl1AH6 jNjZ/28+JA7foVXY/2aI3oLxPw9F5ofx99IKrBc/yP2wTRxoTrurxMZzhzi/ DRh/EO3MxnjXaNNC//3/ZPsxYvuZw2xvikMNaRW2UmilI+ZT7wjLYfO7I5H9 i/zkO8bxTqP99IhdsZo7mfm5j/lPod1p2D+naHsm9sPE4xx/WbTdpdF2YO0E rW7Hfsl+guMdwH6pTOsnxOHxtJntqsRT4S/2FysOHP4Xu/nEobIn6RfE1kHa TBaHS59i/O2uSb5W0WobsZtOuwlyPYT2nWb77WL15hnWHyUODnZZPhfXT7G/ OZ8MtB8YcRbpX114lvmsI/b1O8d44sRa7/MsPyp2ztPuFLSvfYGuLvbHRVwO /eX9Jyp+LfYi490ktrrRrv+/3Ekc/op2OordCSn0deQ72yXOtwvy3YE20nC/ Kn+Z4+VG/dVXOH9YKX2V9ceg/u+0PQT3LzuV7Udj/9y4xvgW4Pp6Po31h4p9 8WHGc+ZSpvU9EftwPey8wfzmCGfa/vYmy9enSfznIk4UOwm3ON+WYv8rt+mZ Yj3mDsefIbaq3KXPYz2SaeOCOFQugy4o9cMv36Pn35D1bEPbsVLuK3Wf803D fij5gPHfPivxfU6rcOC5R+wvXaz9ROuFzkn9xo9ZXlisz1euwqpY65MFVnKL zVlZYSeH2J6eDTZj0N+U7GyfC/Wr5qB/w/ibcrK/zWL/+lywu1qsj4lh/QSx tSoW1oNic3hutt+A+moexjNZbLyQl/11ErsD87F9L4y/MD/Lq0p81mVarYD4 Cz3F+cDBixEXQ356+9j+GbGat0BUub9mxEVRP7YgbNfGeFohuhb6r/QM+4ND 5Z+lLyL/4yJOQXwPafuq2L1XmL4pVtKLcPwMtP/5OfoB4tvzPPuDfR+8wPLH qN+3ON36fKbDvhLsv6fYnE2bE8XBbyOeKdbylGT/C1He9UWWLxUrE16iuyAf WUsx/wWi7XSPtl0Q869IKyulv8Da0lzfNRi/zcvsb7PY36oM228TG8XLcfze 6G9IxH2Rn+u0fU/qu4PKs/9LYutKBe7PtGjbsPp+Rc7/BsafH/Ej9FegEts/ Rv18VTh+MvLbgzZcsc+l7cuY3ymN+XnqgswnV1X2D/tP0HoBcahC9Sgr7Wl3 Kub/iHbisB8P1mD5u9hf92kT66H7X3myVdS3htdkeU9xeB9to775xqv0h+j/ s4g/wP4fXIvt08RGmFYep0i8r9WO7NdoO/9lRZH7vf/H2pH8S3mwcB3m457Y 1592T4r1hbS6TGzMq8vyQtKfWq8e/YrYtGi9PJ4vteszvipiLW8DxlNf7Eyj 1cZoX70h+6v7f7J+ktbrRFuFtS06y1uKwx0acT/pyMdG2n5N7HunMW2IQw9p R8HzdHQTugTeJ+/Rylt4H1z5GseLw/vvi69zvNF4/21Jq3geK/si5ePQf4mm nF+ZaBvz8D7agrZnYPzltLIIz+/nm7H/rYinacQJeH8O0M52xPczbaB+qElz 9ndCrMXTdsoTHdZbsD++D1+ilbt432jwBsuvof9/aLUN3m97vcl8FY62Whbv NzNaMh+F5X3ITaDtctFWy4v1PG9xPlXF2mnaKSv2/9WK7bOIzRyt6ZxiO6uf /RXF+2+5Nty/+dF/m7asDxut3mb9h3gf308b2TFeyXYcPwPfk7doN8/VKDtw aMg7ketb6ivLaf2+2P9Te7ZnPIs6cLwyiGd+R8ZXGeP36cT6y5GvC7Q+B+3r dKbrP9GhRNoZLVbdLiw/jv5zd+X8zyCfNWgH5e4U2p2F/k/Rxm2s94lujLei 2K3QneW98X30qHvkfonv4Zd7RJ5vyOdLPVl/BfpT47hef2D/NHuP8RzG3xuK 9WL7dfieSqXdUXi/Ltyb+cd+DF6m7WL4PrL6snwD8vFUP/b3KeYfRysf4Pum 5vscvze+b6bRdml8T1T/gPmrK+2dbh9ElYcn02Y5sZmz/5OtNpL2vom0UkvK 7WwDGF8XfN+MHxB53qP/8gM53kCsT9tBzOcqXD+lAyz/GfNNp/Vt+F4pMYTl W7D/btDGdMyn6YcsH4r98jNtWrjerg5l/uOR310fsf8fkM+5w1j/6dQoKwXw Pbkz2u4/tNsA880/guUG8t0zYnyPOjNoexz66/4x45+N/qbS7kKsX9eRXM8d 6P8r2k3A9+aEUYy/OL6HNkd8At8rHUaz/3viwAZafYDvo7VjWK7K95daZmzk +Sr2t6H9M8SBVuPg4FCxUdJkf4PEweafsP4asf4rbd2Q7yklMB7Wct3MdLjx p2xfThy8QlsbpH4oZQLrj5Zy57uJXJ92tyRe3yTYN/RmlP3j0d8sOpQg9p2j 3XViu8dk5qu1ODSddt4WKwm0r0u07SEY7+spjP8XjFd1Kvs7jfEm0c5GtO80 DQ5cEVvHaL8u8wkens721cTKgxmMPxblw2dx/N8R79DZ9JfI52CL80sSm2Fa S0c8g+bQt5HPy3O5/i+h/+/nsb/GYvci7WhSX3tqAfvvL+XOTNqaIzZrLmT9 ZHGo2yI43Oh2pv1b4jkfVexWWsz1bCIOKUuYn+NipQJtZ70j4/1Jh35Ef22X sv9cUu67T+svivXSy1g+X6yl0/5tYnXfco63Uhy48Vnk+Sm20j5nfmqi/kCb +WsmNvfQ9iBx6NIXrL8a4zVYwevlINo/vZLz/VvsfktrF59ou+cqzncX2m/7 kveTfxDvX6sZb5pY6byG80lF/Mm0L/au5OuTtYw3KA4dWsf22dOjbGUThw+s 53x+k/rBERs4n5/F+l3aPCwOlNzI/N4TKzatV5D+rOKbGE8VsdOc1pqLg89t 5vU0W2xfo8MTox2yxNqALRx/MvrfTfvixaoeZPt1YjeFDoyX+DTfVtY/Ljbq 0IGfxM4sOnQZ+cv3NeezU/rzJdBGxQyZf+5t9CtiuwbtvoP8vkuHByK/Xb5h /pcivsoJXJ+T6L8T7ZyPtgWHsmzn/FOQz8N0aJ/Ea45J5HodxXoc+Jb9/4n8 ZdDmVOTvrR1cj+XI337a2C421e+4vs3EgZu0NUBs/LIzsr5K5r/+xd+zfod7 sr6ptPaR2HZ+YP09YqPfLs43VawWcJi/5+7L/C/QVlGxHbeb8TUXG3n3sP+5 aP8NrfZGfrv9yParpb6+lba/EWsTf+L6VBWHK/3M/BliV/mF7Qs/kHw+oo2P smT+66z+lfOdKFbv03pXaW+2TmL/Q8SBF/dyfjsl3tAw2voz2jasfvYb59Pr seRj8D6u3zDUL7qf679DbO2hg7seynye/Z31D4jNBXTQlfra0wfg5F8wn9m0 s1KJ8hRYPU9r78t8gj1DdAbi207bhaR+IM9Bjh+Wcm0bHfM8+pt8CK5VX6xP +BNOaSgOZT3MeDohniN0zMfYb+2OwOkLxL6HtLkO/ZU5Co/YLjZKHWP7rRj/ dzqUhP7u0om/i92Pkrk+f2M+t2glDfE1P07nlvxZ12mjujh47QTvL5WzZv6r 6Sc5/mCxWvAU6y8WB+fQfW1xoM5pzt8Vh2bRa6+jv3N04IbY6XEGjs+VTfIx 1YU7NhErXf/m/hwlNjed5fwM1K94jvnvJtbb02pnsTXmPPfPYbGzJuJD4uDI C4xvJfo7QAfmoL8MOmkD4lnxD+NdIdb204mLMJ56kfnag/HeoN2ziP8mrW0X u81SuB57Md4yOrlJdslfsUtw2VSMN+hS5H4l5f7+l7nfi4ndyxFXEwf6XWE+ a4qNelc5v9Zix6KnvI3+nkrl/p4jDsbR9lLEY1zj/eFvsRWbxvYZ6K86nZg/ h/S3lY5/VexqYY7fVKxUvs76E8XGeDo9Qex7dIP5qZsz81979E3GZ4iN0rd4 fx4u9qfT2jdid9htjr9BHLhNW9vRX4k7zPdu9JdEaw/E4aZ3mf8quWR9BqbD zaeLlcIZXI8fxM4uOumwOFD3PufXIkbW7zytxInV7Q8Y33Sxmech+7sT7fiD WM/TdPJ5sdLtEdens+RLm0z7+4idHI95/bwvVjvT/kliczNtbRTrHZRU8Yj1 4tAR2jiH9WmXhX5J8mONpWOaic02WeG+/cXBUbQREOv36MRdYtXODtfySb6C xXPAa2sgf7/S4bfE9nXa70f+m+aE47uLtQAdM0psLKFrWWLrp0h5EOt1jZ6y Whwukgt2Pxe7V+iYoxh/fgxsXkL/9WNhJb+sl9+XG9bqiN1ZdGIzcahHHjhl pFiZQRcZi/0wNS8c3Ib1P0XbO8T6pHxw+lnsp075YSs2VuZzjG7eUhzO8hTj by1WK9LBT3JL/yY94jOxe5hWMf/A4mcYP6wUeRYOObjeHdpdhedRw8KMN0Fs 9qN9C/E8qlcETlouVr6jbTz/tAt0zBFxeGZRODksDtYsxvI+8rxyDXrEGLEd +xzsxItD1elaa8XGVjrpJN4fcj7PfJzF8+843RHPv8D4F1i/jdjeSPv74fl2 lE78GM+zdcWZvwSxv2wJ7odDeF6Opq0LaP+xyvGq4P7+B622wvOjZUnul7Hi 8DBamSZWv6BrzcLza+iLNOYfSKKtNWL/wFLcPy2Qv6t06BOxr3Bp5mMy8jP3 Za7PerFZtwzjOyDWz9O1UsTKzLIs92H+28ox3mVit1p5jr8b+fyLVlOQv+QK XN+6Mh9/h4rMX5zYHluJ7ZPERpnKjHcg2o+ijVlis1QVzu+0WBmm8frdhnzb dFIC8l28KvdzGTz/rtNTlojtn6qxfjXcX3dX5/rvFAfn12C8BfC8qf8Ky3vj +eKryfg34Xl1jrb24f6Z71XGG4PrxY24+yM9858atXg9jRerXWtzfZaI3ex1 uP9zy/tr4FM60ENsmXVZ/qpYfUy7frHtr8/7b1W8b65owPiSEc/ehtyPbbA/ wjrvz1tw/fzYiPPLi/3tNOb6rxEbDZtwffZivebRfdVsUS7bG+9H1muc72S8 H12gi+zA+9is1zl+Bt6/8jZlPqrLeqnT6SS8r7rVm3H+13B9b20WuX9jf52k 3RKI53hz7scA4jnagusxBPXHvcH8xCOew7T+I/Zn2Te5v/G+qR6kY4pif7Vu yfnVxv568S3un6l4vg+nlcV4f9tHx/8qNpNaMZ+F8L7UrDXLdTzPB9PhVuLA UrpIW7wvvObneo3Fft5Dr/0M72+N2nB96uD9clebyPMY7yMN2jLe/mLtIt33 zWj7s8n3qFX3be7HH+R7TN1B64qUm/nbMb8vifXttN1ObOd5h/noi+9bg7b7 iY1ttN5C7MS05/XeSxyuFnF/sdqN1lZF21qDeL5qH7n/iX1aB67nV+LABFrf ifE7dGT5GfSndOJ4R8XuWjr4snzf6g9po6PYuNeZXo/v4RFdmK9F+B6+S6ub xIHfunI/fyXWPuzG8Tagv+W0O0OsNn2X83XEvqLdOd9ExNOEtr8T24u6R9V3 5htcz9Vif8EenM8SxFe/R+R6FQf70AFL7M6hjWEY7x9a6SAOvdeT/edH/Odo Own7J18c669DfmdEvAXr0/09zjce6/M1HayO/VKtF/vrgvZVejN/y7HfKvbh et7GfjNpRZF4lCO09jziK9eX8d5Hf4doZzTmO7If4/kC9fe/z/ZvyP3a//kH LF+K+/cL/Xl95ZL7sT6Edovj/r14ANvPFwcXDuR+yIm/J1yhm8fie3/eIJaX FVv1AtwflfC+doFO7I+/PyQO5vpMENt5h3D+N2Q845shkfXB8+HdD5kvP/7+ kHMo7x8j8byYSCfi7x1Gx494/5mG95EKw+Baj/E+so6O2Yjnx+jhfN7gee+0 HsF4ruH94A/abIj75+2PmX+8n2pDR7L/rLi/3aATS+B7NG0U458nz18ldTTz lYrndaMxvJ++je+DXXTHm/g+mDsWTu4t7+OBp8fxelqP93uL1vLK+7e2gw5W xft5T5PzXSw2/6YTP5T3cX3aJ3x+Tc8j+YgZz/UplVf660Z3rJFP5vcXnVIh v+Sn86f0WbE5gQ40kPbBzXT6j9JerzSB+dsi49uf0GqMjG+1m8jxYsXqn3R4 qNi3ehLzYYv1EK19L7ZLTWZ/h9HfXTrpjtj8bQrHfygO3qLDhSRe+9epHF8T W0um8XpuKDYHTIfL9haH5s/gfikt87Pqz2R+F4tN3yzunwxxsA6t5pJ8We5s xjMdv1/VsJi/I2I31xw6h/yepHelw5Pwe1SVuZy/ifbHaCMOv8eZ83g9zRIb D+ZzPybg79kZCxhfdfx9+qWF3D8FxPoK2mmNv1ffoV3+vfrzRRy/DP7eundR 5PmKv9c2j2f5dfT/C21/L+Prry9meQJ+f2i8hP2b8vuWs5B2ZuL3tYZLWX8e fq/rRwdT8HvhnGUsT8Xvc7WXc33KSX/mWTqwVGyf+Yz5rCYO57QZX31p7+9C m8fwe+JEWsXvsXrlL9h+gPxea4+njbfwe+8xWokVa1lW0DnF/kcRJ+D347Yr 2f+z1zMduE+HZou1Vat4/XeU9lY67Q4Th1t+yXzMRf9f0GoL/F56YzXja4X9 kraG+Z2G33OLrWX93dh/e2ilAH4/TaXdgph/4XXMdz30v4D2p+K/H/5+PfO9 Xuz22sD2faR+4Dxt/4Hfh+M2slyR/Idf2cT8ZsX6baOtDnDkvAz/97/lEXvn a7zzNWLvfI20987XeOdrpNw7XyPxe+drIr/Xir3zNd75GpR752ui7J2vwXp5 52sYn3e+JtPe+RrvfA3m452vkXi98zXMn3e+RvLhna9huXe+RsbzztewP+98 jayPd76G8/HO10j+vPM1XF/vfI3k0ztfw3x752skPu98De2dr5H4vPM1zLd3 vkbm552v4X8/4p2vkfx752tY3ztfI+vpna9hfe98jczfO1/D/Hjna6Q/73wN y73zNZn2ztd452vQv3e+RuLxztewP+98Taa98zXe+Rr09//wfM1/AD7D/5s= "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1kO4GIYSBtAb27Zt27atxradJmlj27bZxklj27Ztv5OXxflmtv9ikKhR +8rtAgcEBAQie5DfNVuQ331WspCZTGQkA+lJR1rSkJpUpCQFyUlGUpKQmEQk JAHxiUdc4hCbWMQkBtGJRlSiEJlIRCQC4QlHWMIQmlCEJATBCUZQghD4Vy4C +CnsD77zja984TOf+MgH3vOOt7zhNa94yQue84ynPOExj3jIA+5zj7vc4Ta3 uMkNrnONq1zhMpe4yAXOc46znOE0pzjJCY5zjKMc4TCHOMgB9rOPvfzHHnaz i53sYDvb2MoW/uUfNrOJjWxgPetYyxpWs4qVrGA5y1jKEhaziIUsYD7zmMsc ZjOLmcxgOtOYyhQmM4mJTGA84xjLGEYzipGMYDjDGMoQ/uYvBjOIgfzJAPrT j770oTe96EkPutONrnShM53oSAfa82tg2tKG1rSiJS1oTjOa0oTGNKIhf9CA +tSjLnWoTS1qUoPqVKMqVahMJSpSgfKUoyxlKE0pSlKC4hSjKEUoTCEKUoD8 5CMvechNLnKSg+xkIytZyEwmMpKB9KQjLWlITSpSkoLkJCMpSUhMIhKSgPjE Iy5xiE0sYhKD6EQjKlGITCQiEoHwhCMsYQhNKEISguAEIyhBCEwgAvhpwf3g O9/4yhc+84mPfOA973jLG17zipe84DnPeMoTHvOIhzzgPve4yx1uc4ub3OA6 17jKFS5ziYtc4DznOMsZTnOKk5zgOMc4yhEOc4iDHGA/+9jLf+xhN7vYyQ62 s42tbOFf/mEzm9jIBtazjrWsYTWrWMkKlrOMpSxhMYtYyALmM4+5zGE2s5jJ DKYzjalMYTKTmMgExjOOsYxhNKMYyQiGM4yhDOFv/mIwgxjInwygP/3oSx96 04ue9KA73ehKFzrTiY50oD3taEsbWtOKlrSgOc1oShMa04iG/EED6lOPutSh NrWoSQ2qU42qVKEylahIBcpTjrKUoTSlKEkJilOMohShMIUoSAHyk4+85CE3 uchJDrKTjaxkITOZyEgG0pOOtKQhNalISQqSk4ykJCExiUhIAuITj7jEITax iEkMohONqEQhMpGISATCE46whCE0oQhJCIITjKAEITCBAv1+cn4qP/jON77y hc984iMfeM873vKG17ziJS94zjOe8oTHPOIhD7jPPe5yh9vc4iY3uM41rnKF y1ziIhc4zznOcobTnOIkJzjOMY5yhMMc4iAH2M8+9vIfe9jNLnayg+1sYytb +Jd/2MwmNrKB9axjLWtYzSpWsoLlLGMpS1jMIhaygPnMYy5zmM0sZjKD6Uxj KlOYzCQmMoHxjGMsYxjNKEYyguEMYyhD+Ju/GMwgBvInA+hPP/rSh970oic9 6E43utKFznSiIx1oTzva0obWtKIlLWhOM5rShMY0oiF/0ID61KMudahNLWpS g+pUoypVqEwlKlKB8pSjLGUoTSlKUoLiFKMoRShMIQpSgPzkIy95yE0ucpKD 7GQjK1nITCYykoH0pCMtaUhNKlKSguQkIylJSEwiEpKA+MQjLnGITSxiEoPo RCMqUYhMJCISgfCEIyxhCE0oQhKC4AQjaMD/X/5fZz/gf1pbifA= "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl10O0GIYSANAX27Ztu7HZoLFt27ZtNU4a27Zt23byb85f3DOzncUoUYO2 FdsECggIyBokIOBPDIw0ICjBCE4IQhKK0IQhLOEITwQiEonIRCEq0YhODGIS i9jEIS7xiE8CEpKIxCQhKclITgpSkorUpCEt6UhPBjKSicxk+VMP2chODnKS i9zkIS/5+Iv8FKAghShMEYpSjOKUoCSlKE0ZylKO8lTgbypSicpU4R+qUo3q 1KAmtahNHepSj/o0oCGNaEwTmtKM5rSgJa1oTRva0o72dKAjnehMF7rSje70 oCe96E0f+tKP/gxgIIMYzBCGMozhjGAkoxjNGMYyjvFMYCKTmMwUpjKN6cxg JrOYzRzmMo/5LGAh/7KIxSxhKctYzgpWsor/WM0a1rKO9WxgI5vYzBa2so3t 7GAnu9jNHvayj/0c4CCHOMwRjnKM45zgJKc4zRnOco7zXOAil7jMFa5yjevc 4Ca3uM0d7nKP+zzgIY94zBOe8oznvOAlr3jNG97yjvd84COf+MwXvvKN7/zg J7/4zZ/mD0RgghCUYAQnBCEJRWjCEJZwhCcCEYlEZKIQlWhEJwYxiUVs4hCX eMQnAQlJRGKSkJRkJCcFKUlFatKQlnSkJwMZyURmspCVbGQnBznJRW7ykJd8 /EV+ClCQQhSmCEUpRnFKUJJSlKYMZSlHeSrwNxWpRGWq8A9VqUZ1alCTWtSm DnWpR30a0JBGNKYJTWlGc1rQkla05s/wbks72tOBjnSiM13oSje604Oe9KI3 fehLP/ozgIEMYjBDGMowhjOCkYxiNGMYyzjGM4GJTGIyU5jKNKYzg5nMYjZz mMs85rOAhfzLIhazhKUsYzkrWMkq/mM1a1jLOtazgY1sYjNb2Mo2trODnexi N3vYyz72c4CDHOIwRzjKMY5zgpOc4jRnOMs5znOBi1ziMle4yjWuc4Ob3OI2 d7jLPe7zgIc84jFPeMoznvOCl7ziNW94yzve84GPfOIzX/jKN77zg5/84jd/ Fn8gAhOEoAQjOCEISShCE4awhCM8EYhIJCIThahEIzoxiEksYhOHuMQjPglI SCISk4SkJCM5KUhJKlKThrSkIz0ZyEgmMpOFrGQjOznISS5yk4e85OMv8lOA ghSiMEUoSjGKU4KSlKI0ZShLOcpTgb+pSCUqU4V/qEo1qlODmtSiNnWoSz3q 04CGNKIxTWhKM5rTgpa0ojVtaEs72tOBjnSiM13oSje604Oe9KI3fehLP/oz gIEMYjBDGMowhjOCkYxiNGMYyzjGM4GJTGIyU5jKNKYzg5nMYjZzmMs85rOA hfzLIhazhKUsYzkrWMkq/mM1a1jLOtazgY1sYjNb2Mo2trODnexiN3vYyz72 c4CDHOIwRzjKMY5zgpOc4jRnOMs5znOBi1ziMle4yjWuc4Ob3OI2d7jLPe7z gIc84jFPeMoznvOCl7ziNW94yzve84GPfOIzX/jKN77zg5/84jd/jv5ABCYI QQlGcEIQklCEJgxhCUd4IhCRSEQmClGJRnRiEJNYxCYOcYlHfBKQkEQkJglJ SUZyUpCSVKQmDWlJR3oykJFMZCZLkP//M/8DN4GJew== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1642]}, Annotation[#, {{Callout}, Charting`Private`Tag, {820}}]& ]}], {{{}, {{}, 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.982620528*^9, 87417.}], Offset[{-8., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-10., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-12., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-12., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.982620528*^9, 87417.}], Offset[{-8., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-10., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-12., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}], Offset[{-12., 9.797174393178826*^-16}, {3.982620528*^9, 87417.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, {3.982620528*^9, 87417.}], Offset[{-11.999999999999998`, -5.499999999999996}, {3.982620528*^9, 87417.}], Offset[{-43., -5.500000000000003}, {3.982620528*^9, 87417.}], Offset[{-43., 5.499999999999997}, {3.982620528*^9, 87417.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"87417\"\>", 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.982620528*^9, 87417.}], 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.4, 0.64, 1.], AbsoluteThickness[2]], Directive[ RGBColor[1., 0.75, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.8, 0.4, 0.76], AbsoluteThickness[2]], Directive[ RGBColor[0.637, 0.65, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.915, 0.3325, 0.2125], AbsoluteThickness[2]], Directive[ RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], AbsoluteThickness[2]], Directive[ RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142], AbsoluteThickness[2]], Directive[ RGBColor[0.736782672705901, 0.358, 0.5030266573755369], AbsoluteThickness[2]], Directive[ RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], 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: Wed 25 Mar 2026 19:13:55 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9833856*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->{3.977171246052504*^9, 3.977330621833989*^9, 3.977824777220779*^9, 3.97802167740195*^9, 3.9783591663956203`*^9, 3.978707155310081*^9, 3.9788878378609324`*^9, 3.979059705340467*^9, 3.979233159291823*^9, 3.979894026470213*^9, 3.980403543643875*^9, 3.980500992710359*^9, 3.980797522728137*^9, 3.980937301427796*^9, 3.981025869505204*^9, 3.981269692538081*^9, 3.981893106113771*^9, 3.982228611165803*^9, 3.982503697506815*^9, 3.9827585306037893`*^9, 3.983188556815083*^9, 3.983454835814192*^9}, CellLabel-> "Out[419]=",ExpressionUUID->"afa1d869-96f4-4f2a-86e8-924fd8c1892a"] }, Open ]] }, WindowSize->{1280.25, 878.25}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification:>1.25 Inherited, FrontEndVersion->"14.3 for Mac OS X ARM (64-bit) (July 8, 2025)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[583, 22, 5541, 131, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6127, 155, 1377, 23, 53, "Output",ExpressionUUID->"d141527a-557d-4fb2-acd3-e2ed1763bf81"] }, Open ]], Cell[CellGroupData[{ Cell[7541, 183, 5486, 118, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[13030, 303, 20504, 410, 587, "Output",ExpressionUUID->"afa1d869-96f4-4f2a-86e8-924fd8c1892a"] }, Open ]] } ] *)