(* 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[ 34128, 737] NotebookOptionsPosition[ 33356, 713] NotebookOutlinePosition[ 33784, 730] CellTagsIndexPosition[ 33741, 727] 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[99]:=",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}, CellLabel-> "Out[102]=",ExpressionUUID->"6f88e9df-581c-404f-a2b6-a32b2e701903"] }, 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[109]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eUFFW3BuAiz5BsASWoUOQMRRDJFKAERWgQyUgBkpTQICISSyTHIg9J SkByaBGHEVEKTIOgNEgYkFASZAjDNCAwQ/zu7Pftu1Z/C9e6P++P4s/4rJP2 2ed0hW5P8V5D2vXJrChKr+yKkvH3f/6ZMxOvNc74D7fjNf0pDsb/i53O0Tbb iH259sN6B3GgB22/LbanRYz+Ql/RDqzF/Ep3EVvdaLer2JlM60ujrXYXq39G 2sNm1QOw0QvxdqbVfoh3K23DelKk/vyUpzmQ+SC9BvF3oNVNiH8TrX8lNo7R znbM5wltw+q43zi/UdG26yH+I7SaelXif0jr18Vumd/pS2J9NG2cESulDtHn xM7Bf/MRcfgurcL+N0L0Noy/MhSZH8bfTyuwXvQw98MOcaAF7a4RGy8c4fw2 YfwhtDMH492gTQv9D/yD7ceK7eeOsr0pDjWiVdhKppVOmE/9YyyHzW+PRfYv 8pPnBMc7i/YzInbFas4k5ucB5j+Vdqdj/5yh7VnYD5NOcvzl0XaXRduBtVO0 uhP7JespjncI+6UKrZ8ShyfQZpbrEk/FP9lfrDhw9F/s5hGHyp2mXxJbh2kz SRwufYbxt78h+VpDq23FbhrtxsvnIXTgLNvvFKu3z7H+aHFwqMvyefj8FPmL 80lH+8ERZ5L+1UXnmc+6Yt+AC4ynt1jre5Hlx8XORdqdivZ1LtE1xP7eEZdH f7n/jopfi73MeLeIre606/8vdxaHv6SdTmJ3YjJ9E/nOcoXz7Yp8d6SNVFyv KlzleDlRf+01zh9WSl9n/bGo/xttD8P1y05h+zHYP7duML6F+Hy9mMr6w8W+ uDDjOXclw/q+iH34POy+xfxmC2fY/uY2yzemSvwXIk4QO/H/cL6txP6X79Cz xHrMXY4/U2xVvUdfxHok0cYlcah8Op1f6ofL3KcX3JL1bEvbsVLuK/WA803F fij+kPHfOS/xraRVOPDCY/aXJtZ+pPUCF6R+kycsLyjWFyjXYVWs9csEKznF 5uzMsJNNbM/IApsx6G9qVrbPgfrVstG/Yvwt2dnfVrF/Yw7YXSvWx8awfrzY WhML60Gx+VFOtt+E+mouxjNFbLyUm/11FruD87B9H4y/KC/Lq0l81lVarYj4 CzzD+cDByxEXQX76+tj+ObGaO19Uub9WxIVRPzY/bNfBeFoBujb6r/wc+4ND FZ6nLyP/4yNORnyPaPu62L1fkL4tVtIKcfx0tP/pBfoh4tv3IvuDfe+/xPIn qN+/KN3mYobDvmLsv5fYnEObk8TBbyKeJdZyFWf/i1DerQTLl4mViSXprshH 5lLMf75oOz2ibefH/CvRymrpL7C+NNd3HcZvW4b9bRX7W5dl+x1io2h5jt8X /Q2LuD/yc5O270t9d0gF9n9FbF2ryP2ZGm0bVt+rxPnfwvgLIn6M/vJVZvsn qJ+nKsdPQn570oYr9rm0fRXzO6MxP89ckvnkqMb+Yf8pWs8nDlWsEWWlA+1O w/wf005v7MfDNVn+DvbXA9rEeuj+l59uFfWtj2qxvJc4fIC2Ud98/RX6A/T/ WcTvY/8Prc32qWIjTCtPkiXeV+tE9mu0nf+yosj13v9DnUj+pTxYsC7zcV/s G0i7p8X6IlpdLjbm12N5AelPrV+ffllsWrReAfeXOg0YX1Wxlrsh42kgdqbT ahO0r9GI/dX7P1k/Tet1o63C2jad5a3E4Y6NuZ905GMzbb8q9r3dhDbEoUe0 o+B+OqYpXQzPk/dp5U08D65+leP1xvNvidc43hg8/7aiVdyPlQOR8vHov1gz zq9stI35eB5tSdszMf4KWlmM+/eLzdn/dsTTLOJ4PD8HaGcn4vuJNlA/1LQF +zsl1uJoO/mpDust2R+fh6/Qyj08bzR8neU30P/ftNoWz7d93mC+CkZbLYfn m5mtmI+C8jzkxtN2+WirFcR6rjc5n2pi7SztlBP7/2zN9pnEZrY2dHaxndnP /grj+bd8W+7fvOi/bTvWh43Wb7H+IzyPH6SNrBiveHuOn473yX9oN9f1KDtw aNjbkc+31FdW0PoDsf/HDmzPeBZ35HhlEc+CToyvCsbv15n1VyBfl2h9LtrX 7UI3eKpDCbQzRqy6XVl+Ev3n7Mb5n0M+a9IOyt2ptDsb/Z+hjTtY71PdGW8l sVuxB8v74v3ocY/I9RLvw2V6Ru5vyGfJXqy/Cv2pvblev2P/NH+X8RzF9w1F +rD9BrxPpdDuaDxfF+zL/GM/Bq/SdhG8H1n9Wb4J+XhmAPv7FPPvTSvv4/2m 1nscvy/eb6bTdmm8T9R4n/mrJ+2d7u9HlYen0GZ5sZl94NOtNpb2vkm0UlvK 7SyDGF9XvN9MGBS536P/CoM53mCsT7shzOcafH5KB1j+E+abRus78L5SbBjL t2H/3aKNGZhPsw9YPhz75SfatPB5uz6c+Y9Dfvd8yP6/Rz7njWD9Z1OirOTD ++TuaLt/025DzDfvSJYbyHeviPE+6syk7fHor8fHjH8O+ptGu4uwft1GcT13 of8vaTce75sTRzP+ongf2hrxKbyvdBzD/u+LA5to9SHej9aPZbkq719q2XGR +6vY35b2zxQHWo+Hg8PFRnGT/Q0RB1t8wvrrxPovtHVL3qeUwARYy3E7w+Em n7J9eXHwGm1tkvqh5ImsP0bKnW8ncX3a/yPx+ibDvuG3o+yfgP5m06F4se8C 7W4Q2z2nMF9txKEZtPOWWImnfV2jbQ/DeF9NZfw/Y7xq09jfWYw3mXY2o33n 6XDgmtg6Qft1mU/w6Ay2ry5WHs5k/LEo/2g2x/8N8Q6fQ3+BfA61OL9EsRmm tTTEM2QufQf5vDqP618S/X83n/01EbuXaUeT+tozC9n/QCl3ZtHWXLFZaxHr J4lD3RfD4cZ3MuzfFsf5qGK38hKuZ1NxSFnK/JwUKxVpO/NdGe8POvQD+mu3 jP3nkHLfA1ovIdZLL2f5ArGWRvt3iNUDKzjeanHg1meR+6fYSl3J/NRC/cE2 89dcbO6j7SHi0JXPWX8txmu4ip+Xw2j/7GrO9y+x+w2tXX6q7V5rON89aL/j C15P/ka8f65lvKlipcs6zicF8SfRvth7kq9P1jPeoDh0ZAPbZ02LspVFHD60 kfP5VeoHR27ifH4S6/do86g4UHwz83tfrNi0XlH6s4puYTxVxU4LWmshDr6w lZ+nOWL7Bh2eFO2QJdYGbeP4U9D/XtoXJ1b1INtvELvJdGCCxKf5trP+SbFR lw78KHZm06GryF+erzif3dKfL542KqXL/HPuoF8W2zVp923k9x06PBj57fo1 878M8VWJ5/qcRv+daeditC04lGkn55+MfB6lQwckXnNsAtfrONbj0Dfs/w/k L502pyF/b+7ieqxA/g7Sxk6xqX7L9W0uDtymrUFi4+fdkfVVMv76l3zH+h3v y/qm0NqHYtv5nvX3iY0BezjfFLGaz2H+Xngg879EW4XFdu+9jK+F2Mi9j/3P Q/uvabUv8tv9B7ZfK/X17bT9tVib9CPXp5o4XPkn5s8Qu8rPbF/woeTzMW18 mCnjr7P2F853klh9QOvdpL3ZJpH9DxMHSuzn/HZLvKERtPVHtG1Y/exXzqfP E8nH0ANcvxGoX/gg13+X2NpHB/c8kvk8/xvrHxKbC+mgK/W1Zw/BST9jPnNo Z7US5amwepHW3pP5BHuF6HTEt5O2C0j9QK7DHD8s5doOOuZF9DflCFy7gVif +Aec3EgcynyU8XRGPMfomI+x39ofg9MWin2PaHMD+it7HB65U2yUOsH22zH+ b3QoEf3doxN+E7sfJnF9/sJ8/qGVVMTX4iSdU/Jn3aSNGuLgjVO8vlTJnPFX 009z/KFiNf8Z1l8iDs6l+9viQN2znL8rDs2m199EfxfowC2x0/McHJcji+Rj mgt3aipWuv3F/TlabG45z/kZqF/pAvPfXax3oNUuYmvsRe6fo2JnXcRHxMFR lxjfavR3iA7MRX/pdOImxLPqb8a7SqwdpBMWYzz1MvO1D+O9TrvnEf9tWtsp dpsncz32Y7zldFLTrJK/IlfgcikYb8iVyPVKyv0Dr3K/FxG7VyOuLg4MuMZ8 1hIb9a9zfm3EjkVPfQv9PZPC/T1XHOxN28sQj3GD14e/xFZsKtuno78adELe bNLfdjruFbGrhTl+M7FS5SbrTxIbE+i0eLHv8S3mp172jL/2mNuMzxAbpf/h 9fkjsT+N1r4WuyPucPxN4sAd2tqJ/ordZb73or9EWnsoDje7x/xXzSHrMzgN bjFDrBRM53p8L3b20IlHxYF6Dzi/ljGyfhdppbdY3fmQ8c0Qm7kesb+70Y47 jPU8SyddFCvdH3N9uki+tCm0v5/YyfaEn5/3xGoX2j9ZbG6lrc1ivaOSIh65 URw6RhsXsD7tM9ElJT/WODqmudhsmxnuP1AcHE0bAbF+n07YI1btrHBtn+Qr WDQbvL4m8vcLHX5TbN+k/X7kv1l2OK6HWAvQMaPFxlK6tiW2foyUB7FeN+ip a8XhQjlgd6XYvUbHHMf4C2Jg8wr6bxALK3llvfy+nLBWV+zOphOai0M9c8HJ o8TKTLrQOOyHabnh4A6s/xna3iXWJ+eB085jP3XOC1uxsTKfE3SLVuJwpmcY fxuxWokOfpJT+jfpkZ+J3aO0ivkHljzH+GGl0PNwyMHn3aHdNbgfNSrIeOPF 5gDatwj3o/qF4MQVYuVb2sb9T7tExxwTh2cVhpPC4mCtIizvJ/cr16BHjhXb sS/ATpw4VIOuvV5sbKcTT+P5IfuLzMd53P9O0p1w/wtMeIn124rtzbR/AO5v x+mEj3E/21CU+YsX+8sV4344gvvlGNq6hPYfqxyvKq7vv9Nqa9w/WhXnfhkn Do+gleli9XO69mzcv4aXoDH/QCJtrRP7B5fi/mmJ/F2nQ5+IfQVLMx9TkJ95 Zbg+G8VmvbKM75BYv0jXThYrs8qx3If57yjPeJeL3eoVOP5e5PNPWk1G/pIq cn3ryXz8HSsxf73F9rjKbJ8oNspWYbyD0X40bcwWm6Wqcn5nxcoIjZ/fHci3 TSfGI99Fq3E/l8X97yY9danY/rE661fH9XVvDa7/bnFwQU3Gmw/3mwYvs7wv 7i++Wox/C+5XF2jrAK6feV5hvDH4vLgR93isZ/ypWZufpwlitVsdrs9SsZu1 Lvd/Tnl+DXxKB3qKLbMey18Rq09o1y+2/Q14/a2G581VDRlfEuLZ34j7sS32 R1jn9XkbPj8/NOb8cmN/O024/uvERqOmXJ/9WK/5dH81S5TL9cXzkfUq5zsF z0eX6EK78Dw2+zWOn47nr9zNmI8asl7qDDoRz6tujeac/w18vrc3j1y/sb9O 024xxHOyBfdjAPEcb8n1GIb6419nfuIQz1Fa/wH7s9wb3N943lQP0zGFsb/a tOL86mB/lXiT+2ca7u8f0coSPL8doON+EZuJrZnPAnheat6G5Tru50PpcGtx YBldqB2eF171c73GYT/vo9d/hue3xm25PnXxfLmnbeR+jOeRhu0Y70Cxdpnu /0a0/VnkfdSq9xb34/fyPqbuonVFys287ZnfkmJ9J223F9u53mY++uP91qDt AWJjB623FDsxHfh57yMOV494oFjtTmtrom2tQzxfdohc/8Q+rSPX80txYCKt 78b4HTux/Bz6UzpzvONidz0dLCPvt/oj2ugkNu53oTfifXhkV+ZrMd6H79Hq FnHg127cz1+KtQ+6c7xN6G8F7c4Uq83e4Xwdsa9wD843AfE0pe1vxfbiHlH1 nQUG13Ot2J+/J+ezFPE16Bn5vIqD/eiAJXbn0sYIjPc3rXQUh97txf7zIv4L tJ2I/ZOnN+tvQH5nRrwN69PjXc43DuvzFR2sgf1SvQ/764r2Vfsyfyuw3yr1 43rewX4zaUWReJRjtPYi4ivfn/E+QH9HaGcM5jtqAOP5HPUPvsf2r8v12r/y fZYvw/X7pYH8fOWQ67E+jHaL4vq9ZBDbLxAHFw3mfsiO7xOu0S1i8b4/fwjL y4mt+gHuj8p4XrtEJwzE9w8JQ7k+E8V27mGc/y0Zz/h6WGR9cH945wPmy4/v H7IP5/VjFO4Xk+gEfN9hdPqQ15/peB6pOAKu/QTPIxvomM24f4z5iPcb3O+d NiMZzw08H/xOm41w/bzzMfOP51Nt+Cj2nxnXt1t0QjG8j6aOZvzz5f6rpIxh vlJwv248ltfTt/B+sIfudBvvB/PGwUl95Xk88Ox4fp424vneorXc8vyt7aKD 1fB83svkfJeIzb/ohA/keVyf/gnvXzNyST5iJnB9SuWW/rrTnWrmkfn9SSdX zCv56fIpfV5sTqQDDaV9cCud9oO01ytPZP62yfj2J7QaI+Nb7SdxvFix+gcd Hi72rZ3MfNhiPURr34ntUlPY31H0d49OvCs2f53K8R+Jg//Q4QISr/3LNI6v ia2l0/l5biQ2B82Ay/UVhxbM5H4pLfOzGsxifpeITd9s7p90cbAureaQfFnu HMYzA79f1bSYv2NiN8dcOpv8nqR3o8OT8XtU1Xmcv4n2J2ijN36PM+fz8zRb bDxcwP0Yj++z0xcyvhr4frrkIu6ffGJ9Fe20wffVd2mX31evXMzxy+L71v2L I/dXfF/bIo7lN9H/z7T9nYyvv7aE5fH4/aHJUvZvyu9bziLamYXf1xotY/35 +L1uAB1Mxu+Fc5ezPAW/z9VZwfUpL/2Z5+nAMrF97jPms7o4nN1mfA2kvb8r bZ7A74mTaBW/x+pVPmf7QfJ7rT2BNt7E770naCVWrGVaRWcX+x9HHI/fj9ut Zv/P38xw4AEdmiPW1qzh57+TtLfSaHeEONzqC+ZjHvr/nFZb4vfSW2sZX2vs l9R1zO90/J5bZD3r78X+20cr+fD7aQrt5sf8C25gvuuj/4W0PwX///B3G5nv jWK3zya274d8Rs678N//lvOfdz7GOx8De+djpL13PsY7HyPl3vkYid87HxP5 vVXsnY/xzseg3DsfE2XvfAzWyzsfw/i88zEZ9s7HeOdjMB/vfIzE652PYf68 8zGSD+98DMu98zEynnc+hv1552NkfbzzMZyPdz5G8uedj+H6eudjJJ/e+Rjm 2zsfI/F552No73yMxOedj2G+vfMxMj/vfAz//xDvfIzk3zsfw/re+RhZT+98 DOt752Nk/t75GObHOx8j/XnnY1junY/JsHc+xjsfg/698zESj3c+hv1552My 7J2P8c7HoL//h+dj/gOBDdbA "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lO4EIgWBtCTbdu27ZrJtm3bNdVMbibbtm3btm277ur2sL69X/+HjUQN 21VsGzggICAQmYP8rpmC/O4zkoH0pCMtaUhNKlKSguQkIylJSEwiEpKA+MQj LnGITSxiEoPoRCMqUYhMJCISgfCEIyxhCE0oQhKC4AQjKEEI/CsHAfwU7gff +cZXvvCZT3zkA+95x1ve8JpXvOQFz3nGU57wmEc85AH3ucdd7nCbW9zkBte5 xlWucJlLXOQC5znHWc5wmlOc5ATHOcZRjnCYQxzkAPvZx172sJtd7GQH29nG VrawmU1sZAPrWcda1rCaVaxkBctZxlKWsJhFLGQB85nHXOYwm1nMZAbTmcZU pjCZSUxkAuMZx1jGMJr/+JdRjGQEwxnGUIYwmH/4m0EMZAB/0Z9+9KUPvelF T3rQnW50pQud6URHOtCedvwakDa0phUtaUFzmtGUJjSmEQ1pQH3qUZc61KYW NalBdapRlSpUphIVqUB5ylGWMpSmFCUpQXH+5A+KUZQiFKYQBSlAfvKRlzzk Jhc5yUF2spGVLGQmExnJQHrSkZY0pCYVKUlBcpKRlCQkJhEJSUB84hGXOMQm FjGJQXSiEZUoRCYSEYlAeMIRljCEJhQhCUFwghGUIAQmEAH8tNB+8J1vfOUL n/nERz7wnne85Q2vecVLXvCcZzzlCY95xEMecJ973OUOt7nFTW5wnWtc5QqX ucRFLnCec5zlDKc5xUlOcJxjHOUIhznEQQ6wn33sZQ+72cVOdrCdbWxlC5vZ xEY2sJ51rGUNq1nFSlawnGUsZQmLWcRCFjCfecxlDrOZxUxmMJ1pTGUKk5nE RCYwnnGMZQyj+Y9/GcVIRjCcYQxlCIP5h78ZxEAG8Bf96Udf+tCbXvSkB93p Rle60JlOdKQD7WlHW9rQmla0pAXNaUZTmtCYRjSkAfWpR13qUJta1KQG1alG VapQmUpUpALlKUdZylCaUpSkBMX5kz8oRlGKUJhCFKQA+clHXvKQm1zkJAfZ yUZWspCZTGQkA+lJR1rSkJpUpCQFyUlGUpKQmEQkJAHxiUdc4hCbWMQkBtGJ RlSiEJlIRCQC4QlHWMIQmlCEJATBCUZQghCYQIF+PzU/lR985xtf+cJnPvGR D7znHW95w2te8ZIXPOcZT3nCYx7xkAfc5x53ucNtbnGTG1znGle5wmUucZEL nOccZznDaU5xkhMc5xhHOcJhDnGQA+xnH3vZw252sZMdbGcbW9nCZjaxkQ2s Zx1rWcNqVrGSFSxnGUtZwmIWsZAFzGcec5nDbGYxkxlMZxpTmcJkJjGRCYxn HGMZw2j+419GMZIRDGcYQxnCYP7hbwYxkAH8RX/60Zc+9KYXPelBd7rRlS50 phMd6UB72tGWNrSmFS1pQXOa0ZQmNKYRDWlAfepRlzrUphY1qUF1qlGVKlSm EhWpQHnKUZYylKYUJSlBcf7kD4pRlCIUphAFKUB+8pGXPOQmFznJQXaykZUs ZCYTGclAetKRljSkJhUpSUFykpGUJCQmEQlJQHziEZc4xCYWMYlBdKIRlShE JhIRiUB4whGWMIQmFCEJQXCCETTg/y//r7Mf8D/sy4kO "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl10O0GIYSANAX27Ztu7Ft27Zt27Ztp41ts41t+9+cv7hnZjmbUaJG7Su1 CxQQEJAxSEDAnxgYaUBQghGcEIQkFKEJQ1jCEZ4IRCQSkYlCVKIRnRjEJBax iUNc4hGfBCQkEYlJQlKSkZwUpCQVqUlDWtKRngx/6icTmclCVrKRnRzkJBe5 yUNe8vEX+SlAQQpRmCIUpRjFKUFJSlGaMpSlHOWpQEUqUZkqVKUa1alBTWpR mzrUpR71aUBDGtGYJjSlGc1pQUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGb PvSlH/0ZwEAGMZghDGUYwxnBSEYxmjGMZRzjmcBEJjGZKUxlGtOZwUxmMZs5 zGUe81nAQhaxmCUsZRnLWcFKVrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3s ZR9/8w/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGb O/zLf9zlHvd5wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+ 8Zs/zR+IwAQhKMEITghCEorQhCEs4QhPBCISichEISrRiE4MYhKL2MQhLvGI TwISkojEJCEpyUhOClKSitSkIS3pSE8GMpKJzGQhK9nITg5ykovc5CEv+fiL /BSgIIUoTBGKUozilKAkpShNGcpSjvJUoCKVqEwVqlKN6tSgJrWoTR3qUo/6 NKAhjWhME5rSjOa0oCWtaE0b2vJneLenAx3pRGe60JVudKcHPelFb/rQl370 ZwADGcRghjCUYQxnBCMZxWjGMJZxjGcCE5nEZKYwlWlMZwYzmcVs5jCXecxn AQtZxGKWsJRlLGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd9/M0/ 7OcABznEYY5wlGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe7wL/9x l3vc5wEPecRjnvCUZzznBS95xWve8JZ3vOcDH/nEZ77wlW985wc/+cVv/iz+ QAQmCEEJRnBCEJJQhCYMYQlHeCIQkUhEJgpRiUZ0YhCTWMQmDnGJR3wSkJBE JCYJSUlGclKQklSkJg1pSUd6MpCRTGQmC1nJRnZykJNc5CYPecnHX+SnAAUp RGGKUJRiFKcEJSlFacpQlnKUpwIVqURlqlCValSnBjWpRW3qUJd61KcBDWlE Y5rQlGY0pwUtaUVr2tCWdrSnAx3pRGe60JVudKcHPelFb/rQl370ZwADGcRg hjCUYQxnBCMZxWjGMJZxjGcCE5nEZKYwlWlMZwYzmcVs5jCXecxnAQtZxGKW sJRlLGcFK1nFatawlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd9/M0/7OcABznE YY5wlGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe7wL/9xl3vc5wEP ecRjnvCUZzznBS95xWve8JZ3vOcDH/nEZ77wlW985wc/+cVv/hz9gQhMEIIS jOCEICShCE0YwhKO8EQgIpGITBSiEo3oxCAmsYhNHOISj/gkICGJSEwSkpKM 5KQgJalITRrSko70ZAjy///lf3FeiKE= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1634]}, Annotation[#, {{Callout}, Charting`Private`Tag, {816}}]& ]}], {{{}, {{}, 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.98141456625*^9, 79486.}], Offset[{-8., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-10., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-12., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-12., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.98141456625*^9, 79486.}], Offset[{-8., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-10., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-12., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}], Offset[{-12., 9.797174393178826*^-16}, {3.98141456625*^9, 79486.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, {3.98141456625*^9, 79486.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.98141456625*^9, 79486.}], Offset[{-43., -5.500000000000003}, {3.98141456625*^9, 79486.}], Offset[{-43., 5.499999999999997}, {3.98141456625*^9, 79486.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"79486\"\>", 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.98141456625*^9, 79486.}], 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 11 Mar 2026 14:36:50 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.982176*^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}, CellLabel-> "Out[111]=",ExpressionUUID->"a312b644-b945-4ca5-8fd9-a53fc3f4bc59"] }, 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, 5537, 130, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6123, 154, 1282, 21, 53, "Output",ExpressionUUID->"6f88e9df-581c-404f-a2b6-a32b2e701903"] }, Open ]], Cell[CellGroupData[{ Cell[7442, 180, 5486, 118, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[12931, 300, 20409, 410, 587, "Output",ExpressionUUID->"a312b644-b945-4ca5-8fd9-a53fc3f4bc59"] }, Open ]] } ] *)