(* 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[ 34704, 751] NotebookOptionsPosition[ 33871, 725] NotebookOutlinePosition[ 34299, 742] CellTagsIndexPosition[ 34256, 739] 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", "]"}], "]"}], "]"}], ",", "Right", ",", " ", RowBox[{"LabelStyle", "->", "Small"}], ",", " ", RowBox[{"Background", "->", "LightBlue"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"Length", "[", "data", "]"}], "]"}], "]"}], "=", "lastitem"}], ";"}]}], "Input", CellOpen->False, InitializationCell->True, 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}, { 4.002276800045328*^9, 4.00227680258731*^9}}, CellLabel-> "In[303]:=",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.997518145782423*^9, 3.997781285134109*^9, 3.997983268910081*^9, 3.998334160773848*^9, {3.998593602266593*^9, 3.998593605970955*^9}, 3.9989270399738493`*^9, 3.999183178792614*^9, 3.999353495273066*^9, 3.999464362072139*^9, 3.999959989384974*^9, 4.000386939246838*^9, { 4.0010176575739737`*^9, 4.0010176718952436`*^9}, 4.0013397565076857`*^9, 4.001973333639921*^9, 4.001973550092224*^9, {4.002121461894444*^9, 4.0021214662045403`*^9}, {4.002202281951898*^9, 4.002202289463511*^9}, { 4.002276775563334*^9, 4.002276805715754*^9}}, CellLabel-> "Out[306]=",ExpressionUUID->"6a49f7aa-6e36-4d5c-b7b0-20d1fcf39054"] }, 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, InitializationCell->True, 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[313]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eYFMW6B/Am7xJHRIlCIzk3QSTTgIckYUAkIw0rSdKACEiyRXJsgrAk aYFDWsKI67IiwpB0STLgAktuiUtYdgCBJd+77/8/9z5zHnye++F+HL/s+Z3q qnrrreo0TRXvPbR9n4yKoiRlVZT0v//9nzkr4Xaj9P/hdLqtv8beuH+wr0uo zbZiV46DsN5R7OlJ2x+L7elBoz3/j7QP1iIO0V3FVnfa6Sb2TaH1paFWe4jV c8H6sFnlMGz0RrxdaLUf4t1C27CeFDx+Qcrr7Ml4hF6D+DvSagzij6H1H8XG Sdq3DeN5RduwOuEoxzcm1HZdxH+CVlNvSfzPaf2O2Cn9B31NrI+ljQtipeQx +pLYd+SffEIceESrsPtDP70V/a/0B8eH/g/SCqwXPc71ECv2NKedNWKj8AmO Lwb9D6V9c9HfXdq00P6gP1l/vNh+K5H1TbG/Ia3CVjKtdMZ46p1kOWz+cjK4 fpGfXKfZ30XUnxm0I1azJzE/zzD+abQzA+vnAm3PxnqYfIb9Lw+1syzUPlg7 S6vbsV4yn2V/x7BeKtP6WXFgIm1muiPxVDjH9iLFnsR/sJNL7C97nn5HbB2n zSRxoNQFxt/hruRrDa22EztptBMn54P/8EXW3y5WH1zi8WPF3mEOy+fj/Cn0 F8fzBPWHBJ1B2lcXXWY+64hdA64wniix1vcqy0+JfVdpZxrq175GVxe7o4Iu h/ZyXg+JX4u8wXg3i60etOP+D3cRB36gfZ3FzqRk+h7ynekmx9sN+e5EG6m4 XpW/xf6y4/i1tzl+WCl1h8ePx/FHaXs4rl92CuuPw/q5f5fxfYvzq0gqjx8h dkUHGM+lm+nW9wbtwvmw8z7zmyWQbvvnByzfmCrxXwk6XuyL+5vjbSV2v/eQ ni3WIx6x/1liq8pj+irmI4k2ron95Z7Qb8rxgdJP6YX3ZT7b0XaklLtKPuN4 U7Eeij9n/A8vS3wraRX2FH7J9tLE2n5az3dFjm/8iuX5xfpC5Q6sirV+GWAl u9ickxH2ZRHbMzPBZgTam5aZ9bPh+KpZ6EPof3NWtrdF7N6YDXbWivXxETw+ TmytiYR1r9gclZ31Y3C8moPxTBUb7+Rke13EzpBcrN8H/S/KzfKqEp91i1Yr IP58eTge2Hsj6ELIT18X678lVnPmDSl31wy6II6PfBO2a6M/LR9dC+1Xeovt wf7yb9M3kP+vgk5GfC9o+47YeZqffiBW0gqw/yeof6Aw/Rzx7S3C9mDXwHdY /grH9y9Kt72a7oCrGNvvLTbn0uZksffnoGeLtRzF2f4ilHd/l+XLxMqkEnQ3 5CNjSeY/b6h9PUNtv4nxV6SV1dKeZ30pzu869N+uNNvbIna3KcP6sWKjaDn2 3xftDQ+6P/Jzj7afyvHO0PJs/6bYul2B6zM11DasflaR47+P/hcG/RLt5a3E +q9wfK4q7D8J+e1FG47Y5dD2LYzvgsb85Lkm48lWle3D7rO0nlfsr1A9xEpH 2pmO8b+kfVFYj8drsPwTrK9ntIn50N3vvd4qjrdG1WR5b3HgMG3jeLPl+/Tn aP+7oAdi/Q+rxfqpYiNAK6+SJd4PagfXa6h9/2FFkeu9e1/tYP6l3Ju/DvPx VOwaRDvnxfoiWl0uNhbUZXk+aU+tV49+T2xatF4e95fa9RlfFbGWswHjqS/2 zaDVxqhfvSHbq/t/sn6e1uuEWoW1rTrLW4kDnRpxPenIxyba/kDs+rgxbYj9 L2ifgvvpuCZ0MTxPPqWV1ngeXP0B+4vC8++7/2J/4/D824pWcT9WDgfLv0L7 xZpyfGVCbSzA82gL2p6F/lfQymLcv4s0Y/vbEE/ToOPw/OyhfdsR3wHawPH+ Js3Z3lmxFk3bya91QG/B9vg8fJNWHuN5o0FLlt9F+9dptR2eb/t8yHzlD7Va Fs83s1oxH/nleciJo+1yoVbLi/UcrTmeqmLtIu0rK3afa8P6GcRmlrZ0VrGd 0c32CuL5t1w7rt/caL9dex4PG20+4vEv8Dx+hDYyo7/iHdj/E7xP/k07Oe6E 2Af7h38cPL/leGUFrT8Tu/d3ZH3Gs7gT+yuDeBZ2ZnyV0X+/Ljx+BfJ1jdbn oX6drnT919ofT/vGiVWnG8vPoP3s3Tn+S8hnDdqHcmca7cxB+xdo4yHm+2wP xltR7FToyfK+eD962TN4vcT7cOlewfsb8lmiN49fhfbUKM7XH1g/zT5lPIn4 vaFQH9bfgPepFNoZi+fr/H2Zf6xH7y3aLoT3I6s/y2OQjzwD2N43GH8UrQzE +03Nz9h/X7zfzKDtUnifqD6Q+asr9X09BoaUB6bSZjmxmXXQ6602kvquybRS S8rtTIMZXze830wcHLzfo/3yQ9jfEMxP+6HM5xqcP6U8LD+A8abReizeV4oN Z/lWrL/7tDET42n6OctHYL0coE0L59udEcx/NPK7+wu2vwv5nD+Sx7+REmIl L94nd4bauU47DTDe3KNZbiDfvYPG+6hvFm1/hfZ6fsn456K96bSzCPPXfQzn cwfa/4F24vC+OWks4y+K96EtQZ/F+0qncWz/qdgTQ6vP8X60fjzLVXn/UstM CN5fxe52tHuW2NPmK9g7QmwUN9neULG3+dc8fp1Y/5227sv7lOKZCGvZHqQ7 0Pgb1i8n9t6mrRg53p88icePk3LfL5M5Px3+lnhdU2DXiAchdk9Ee3Nof5zY dYV2NojtXlOZr7Zi/0za95FYiaNd3UJtD0d/P05j/L+hv6rT2d5F9DeF9m1C /S4zYM9tsXWadusyHm/iTNavJlaez2L8kSgfNYf9H0W8I+bS/0Y+h1kcX4LY DNBaGuIZOo9+iHzems/5L4H2f13A9hqLnRu0T5PjtTzfsv1BUu6bTVvzxGbN RTw+SezvsRgONHqYbvfWaI5HFTuVlnA+m4j9ylLm54xYqUDbGR9Jf3/S/n1o r/0ytp9Nyl3PaP1dsV5qOcsXirU02h0rVg+vYH+rxZ773wXvn2IrdSXzUxPH D7GZv2Zicy9tDxX7b37P49eivwareL4cR/03VnO8f4mdn2ntxmtt917D8e5G /dh/83pyHfGeW8t4U8VK13UcTwriT6JdkY8lX1+vZ7xesf/EBtbPnBZiK5M4 cGwjx3NIjveOjuF4Doj1x7SZKPYU38T8PhUrNq1XkPasopsZTxWxrzmtNRd7 C2/h+TRXbN+lA5ND7bfE2uCt7H8q2t9Du6LFqu5l/Q1iJ5n2TJT4NNc2Hn9G bNShPfvFvjm0/xbyl+tHjmentOeKo42KT2T82WPp98R2Ddr5GPn9hA4MQX67 /cT8L0N8leM4P+fRfhfadzXUFuzPsJ3jT0Y+E2n/YYnXHB/P+TqF+Tj2M9v/ E/l7QpvTkb/WOzgfK5C/I7SxXWyqv3B+m4k9D2hrsNj4bWdwfpX0v+4lv/L4 Tk9lflNo7Qux7dvF4/eKjQG7Od4UsZrXx/wVfibjv0ZbBcV21B7G11xs5NzL 9uej/k+02hf57bGP9dfK8fo22v5JrE3ez/mpKg5UOsD8GWJH+Y318z+XfL6k jS8ypP/1rf2d450sVp/Renepb7ZNYPvDxZ53D3J8OyVe/0ja+jPUNqx+d4jj 6fNK8jHsMOdvJI4veITzv0Ns7aW9u1/IeN4+yuOPic1vaa8jx2tvHIOTfsN4 5tK+1UqIp8HqVVr7TMbj7e2nnyC+7bSdT4735DjO/gNSrsXSEUXQ3tQTcK36 Yn3Sn3ByQ7E/YyLj6YJ4TtIRX2K9dTgJp30rdr2gzQ1or8wpePR2sVHyNOtv Q/9HaX8C2ntMxx8VO18kcX7+wnj+ppVUxNf8DJ1d8mfdo43qYu/ds7y+VM6Y /lfTz7P/YWL1zQs8fonYO4/ub4s9dS5y/I7YP4defw/tXaE998W+Xpfg6GyZ JB/THbhzE7HS/S+uz7Fic/Nljs/A8RWvMP89xHpHWu0qtsZf5fpJFPvWBX1C 7B1zjfGtRnvHaM88tPeETohBPKuuM95VYu0IHb8Y/ak3mK+96K8l7VxG/A9o bbvYaZbM+TiI/pbTSU0yS/4K3YTLpqC/oTeD1yspdw+6xfVeSOzcCrqa2DPg NvNZU2zUu8PxtRX7LHraR2gvTwrX9zyxN4q2lyEe4y6vD3+JrchU1n+C9qrT 8bmzSHvb6Oj3xY4WYP9NxUrlezx+stiYSKfFiV0v7zM/dbOm/7XHPWB8htgo 9Tevz6PE7jRa+0nsjHzI/mPEnoe0tR3tFXvEfO9Bewm09lwcaPqY+a+STeZn SBrcfKZYyf+E87FL7NtNJySKPXWfcXwtImT+rtJKlFjd/pzxzRSbOV6wvUeh jj6O+bxIJ10VKz1ecn66Sr60qbS7n9iX5RXPn8/EalfaPUVsbqGtTWK9k5Ii Hr1R7D9JG1cwPx0y0CUkP9YEOqKZ2GyXEe4/SOwdSxsesf6Ujt8tVu3McC2X 5MtbNAu8vgby9zsdaC2279FuN/LfNCsc3VOseeiIsWJjKV3LElv7g+VezNdd etpacaBANthZKXZu0xGn0P/CCNi8ifbrR8JKbpkvtys7rNURO3Po+GZif68c cPIYsTKLLjAB62F6Ttgbi/m/QNs7xPqUXHDaZaynLrlhKzJSxnOabt5KHMiQ h/G3FasVae/X2aV9kx79ndhJpFWM37PkLcYPKwXehv0+nO8+2lmD+1HD/Iw3 TmwOoF2LcD+qVwBOWCFWfqFt3P+0a3TESXFgdkE4KSD21izE8n5yv3IMevR4 sR1ZGPZFi/3V6VrrxcY2OuE8nh+yFmE+LuP+d4bujPufZ+I7PL6d2N5Euwfg /naKjv8S97MNRZm/OLG7bDGuhxO4X46jrWuo/6XK/qrg+v4HrbbB/aNVca6X CeLASFqZIVa/p2vNwf1rxLs0xu9JoK11YveQklw/LZC/O7T/a7ErfynmYyry M78052ej2KxbhvEdE+tX6VrJYmV2WZa7MP7Ycox3udipVp7970E+z9FqMvKX VIHzW1fG4+5UkfmLEtsTKrF+gtgoU5nxDkH9sbQxR2yWrMLxXRQrIzWev7HI t00nxCHfRatyPZfB/e8ePW2p2N5fjcdXw/V1T3XO/06xd2ENxpsX95v677G8 L+4vrpqMfzPuV1do6zCun7neZ7wROF+coHu+1NP/1KjF82miWO1em/OzVOxk rsP1n12eXz3f0J5eYsusy/L3xeor2nGLbXd9Xn+r4nlzVQPGl4R4DjbkemyH 9RHQeX3eivNnXyOOLyfWt68x53+d2GjYhPNzEPO1gO6vZgpx2b54PrI+4Hin 4vnoGl1gB57H5vyL/T/B81fOpsxHdZkvdSadgOdVp3ozjv8uzu9tzYLXb6yv 87RTDPGcac716EE8p1pwPobj+K9aMj/RiCeR1vdhfZb9kOsbz5vqcTqiINZX 21YcX22sr3dbc/1Mx/19FK0swfPbYTr6d7GZ0Ib5zIfnpWZtWa7jfj6MDrQR e5bRBdrjeeEDN+drAtbzXnr9d3h+a9SO81MHz5e72wXvx3geadCe8Q4Sazfo /h+G2p1J3ketuh9xPe6S9zF1B60rUm7m7sD8lhDr22m7g9jO8THz0R/vtwZt DxAbsbTeQuyL6MjzvY84UC3oQWK1B62tCbW1DvH80DF4/RO7tE6czx/Enkm0 vhP9d+rM8ktoT+nC/k6JnfW0t7S83+ovaKOz2Hjald6I9+HR3ZivxXgffkyr m8WeQ925nn8Qa5/3YH8xaG8F7cwSq00/4Xh9YlfBnhxvPOJpQtu/iO3FPUOO 9y00OJ9rxe43e3E8SxFf/V7B81Xs7Ud7LLEzjzZGor/rtNJJ7P+0N9vPjfiv 0HYC1k+uKB6/AfmdFfRWzE/PTzneaMzPj7S3OtZLtT5srxvqV+nL/K3AeqvY j/P5EOvNpBVF4lFO0loRxFeuP+N9hvZO0L5xGO+YAYznexx/5DPWbynXa/fK gSxfhuv3O4N4fmWT67E+nHaK4vq9ZDDrLxR7Fw3hesiK3xNu080j8b6/YCjL y4qteh6uj0p4XrtGxw/C7w/xwzg/k8R2zuEc/33pz/hpeHB+cH/45HPmy43f H7KO4PVjDO4Xk+l4/N5hdP6C158ZeB6pMBKu9QrPIxvoiE24f4wbxfsN7ve+ tqMZz108H/xBmw1x/Xz4JfOP51NtxBi2nxHXt/t0fDG8j6aOZfwL5P6rpIxj vlJwv240ntfTj/B+sJvu/ADvB/MnwEl95Xnc88ZXPJ824vneorWc8vyt7aC9 VfF83tvkeJeIzb/o+M/leVyf8TXvXzNzSD4iJnJ+SuaU9nrQnWvkkvGdo5Mr 5Jb8dP2Gviw2J9GeBlLfu4VO2yf19UqTmL+t0r/9Na1GSP9Wh8nsL1Ks/kkH Rohda6cwH7ZY99Par2K75FS2l4j2HtMJj8TmoWns/4XY+zcdyCfx2r9PZ/+a 2Fo6g+dzQ7E5eCZctq/Yv3AW10spGZ9Vfzbzu0RsuuZw/TwRe+vQajbJl+XM ZTwz8f2qhsX8nRQ72ebRWeR7kt6dDkzB96gq8zl+E/VP00YUvseZC3g+zREb zxdyPcbh9+wn3zK+6vh9usQirp+8Yn0V7WuL36sf0Q5/r165mP2Xwe+tBxcH 76/4vbZ5NMvvof3faPtX6V//1xKWx+H7Q+OlbN+U71u+RbRvNr6vNVzG4xfg e90A2puM74XzlrM8Bd/naq/g/JST9szLtGeZ2L70HfNZTRzIajO++lLf3Y02 T+N74mRaxfdYvfL3rD9YvtfaE2mjNb73nqaVSLGWYRWdVex+GXQcvh+3X832 376Xbs8z2j9XrK1Zw/O/s9S30mhnpDjQ6t/Mx3y0/z2ttsD30vtrGV8brJfU dczvDHzPLbSex+/B+ttLK3nx/TSFdt7E+PNvYL7rof1vaXcK/v3wrxuZ741i p08M6/eT4z1XafsPfB+O2sRyRfIfeG8z85sR8xdLW53Eeo8tHG8Mvp+eo60R 8v3P6LqV630qvi/GeNnfYMz32G1s34v1VPJHjr+l2H5MG08RX6tYxvcz8lEk jvXfwPpLpQ1LbA3ezviaYf3q8SyPwPflhbQb38vt+j+zvf5Sblynzd743j93 B+drF+JzfmF+J4i1nju5Xiogf9l+5fyNRP9TaLUGxuulAw3Eni672F5LxPMN 7X0b14+Ku1m/jNj9irZmy/y61vvoXahfeg/z/RDfs8fS2i58zy6xl/lcKee/ o+5jf/XwfW0l7W6D73PL9/N4fM9TCx9geVl839pHu7rh+2yB39heIr5PL6Jd ZZHft37neC7h3yM0DHo0xpdMK1Ux3/MSOJ6pGF+eg1xfA7E+PqXtyfj3BTkP cb5wvpg/0dZ8tFfjMONfjuvHNtrZjOtHtiOc/xlio1vQOs7vykfZ3iq5PugZ /uD8x4p97Y9xvE/F7uO0PkKstD7O+Uf72ihaW4z+vqeVneL/2Z/G//63HP+F 97OF97PB4f1sUj+8ny28n03Kw/vZJP7wfrbgv48Qh/ezhfezoTy8ny3E4f1s mK/wfjbGF97Plu7wfrbwfjaMJ7yfTeIN72dj/sL72SQf4f1sLA/vZ5P+wvvZ 2F54P5vMT3g/G8cT3s8m+QvvZ+P8hvezST7D+9mY7/B+NokvvJ+NDu9nk/jC +9mY7/B+NhlfeD9b8N/vhPezKeH9bOH9bOH9bOLwfrbwfrb0/zu8ny14Pw7v Z1PC+9nC+9nC+9mQr/B+NhlveD8b8xHez5bu8H628H425Cu8n036D+9n43oJ 72dLd3g/2//jfrb/Ar2iJNU= "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lO0GIYSBdAb27Zt27Zt21bDNrZtO23MNrZt2/bbefnY68z/rDVzEjXu ULl94ICAgEC0C/I72wb5PbehNa1oSQua04ymNKExjWhIA+pTj7rUoTa1qEkN qlONqlShMpWoSAXKU46ylKE0pShJCYpTjKIUoTCFKEgB8pOPvOQhN7nISQ6y k42sZCEzmchIBtKTjrSkITWpSEkKkpOMpCQhMYlISALiE4+4xCE2sYhJDKIT jahEITKRiEgEwhOOsIQhNKEISQiCE4ygBCHwr50RwE+L/MF3vvGVL3zmEx/5 wHve8ZY3vOYVL3nBc57xlCc85hEPecB97nGXO9zmFje5wXWucZUrXOYSF7nA ec5xljOc5hQnOcFxjnGUIxzmEAc5wH72sZf/+Jc97GYXO9nBdraxlS1sZhMb +Ye/2cB61rGWNaxmFStZwXKWsZQlLGYRC1nAfOYxlznMZhYzmcF0pjGVKUxm EhOZwHjGMZYxjGYUIxnBcIYxlL/4kyEMZhADGUB//qAffelDb3rRkx50pxtd 6UJnOtGRDvw6Bu1oSxta04qWtKA5zWhKExrTiIY0oD71qEsdalOLmtSgOtWo ShUqU4mKVKA85ShLGUpTipKUoDjFKEoRClOIghQgP/nISx5yk4uc5CA72chK FjKTiYxkID3pSEsaUpOKlKQgOclIShISk4iEJCA+8YhLHGITi5jEIDrRiEoU IhOJiEQgPOEISxhCE4qQhCA4wQhKEAITiAB+Ot4/+M43vvKFz3ziIx94zzve 8obXvOIlL3jOM57yhMc84iEPuM897nKH29ziJje4zjWucoXLXOIiFzjPOc5y htOc4iQnOM4xjnKEwxziIAfYzz728h//sofd7GInO9jONrayhc1sYiP/8Dcb WM861rKG1axiJStYzjKWsoTFLGIhC5jPPOYyh9nMYiYzmM40pjKFyUxiIhMY zzjGMobRjGIkIxjOMIbyF38yhMEMYiAD6M8f9KMvfehNL3rSg+50oytd6Ewn OtKB9rSjLW1oTSta0oLmNKMpTWhMIxrSgPrUoy51qE0talKD6lSjKlWoTCUq UoHylKMsZShNKUpSguIUoyhFKEwhClKA/OQjL3nITS5ykoPsZCMrWchMJjKS gfSkIy1pSE0qUpKC5CQjKUlITCISkoD4xCMucYhNLGISg+hEIypRiEwkIhKB 8IQjLGEITShCEoLgBCMoQQhMoEC/C9xP8YPvfOMrX/jMJz7ygfe84y1veM0r XvKC5zzjKU94zCMe8oD73OMud7jNLW5yg+tc4ypXuMwlLnKB85zjLGc4zSlO coLjHOMoRzjMIQ5ygP3sYy//8S972M0udrKD7WxjK1vYzCY28g9/s4H1rGMt a1jNKlayguUsYylLWMwiFrKA+cxjLnOYzSxmMoPpTGMqU5jMJCYygfGMYyxj GM0oRjKC4QxjKH/xJ0MYzCAGMoD+/EE/+tKH3vSiJz3oTje60oXOdKIjHWhP O9rShta0oiUtaE4zmtKExjSiIQ2oTz3qUofa1KImNahONapShcpUoiIVKE85 ylKG0pSiJCUoTjGKUoTCFKIgBchPPvKSh9zkIic5yE42spKFzGQiIxlITzrS kobUpCIlKUhOMpKShMQkIiEJiE884hKH2MQiJjGITjSiEoXIRCIiEQhPOMIS htCEIiQhCE4wggb8v/L/evsB/wMeYpxq "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl11OwGIYSANAb27Zt27Zt20Yb27ZtW21s27aNJnkn8z7O7P7vrBI17lC5 faCAgIA2QQIC/sTASAOCEozghCAkoQhNGMISjvBEICKRiEwUohKN6MQgJrGI TRziEo/4JCAhiUhMEpKSjOSkICWpSE0a0pKO9GQgI5nITBayko3s5CAnuchN HvKSj/wUoCCFKEwRilKM4pSgJKUoTRnKUo7yVKAilahMFapSjerUoCa1qE0d 6lKP+jSgIY1oTBOa0ozmtKAlrWj9p1a0pR3t6UBHOtGZLnSlG93pQU960Zs+ 9OUv/qYf/RnAQAYxmCEMZRjDGcFIRjGaMYxlHOOZwEQmMZkpTGUa05nBTGYx mznMZR7zWcBCFrGYJSxlGctZwUpWsZo1rGUd69nARjaxmS1sZRvb2cFOdrGb PexlH//wL/s5wEEOcZgjHOUYxznBSU5xmjOc5RznucBFLnGZK1zlGte5wU1u cZs73OUe93nAQx7xmCc85RnPecFLXvGaN7zlHe/5wEc+8ZkvfOUb3/nBf/zk F7/50/yBCEwQghKM4IQgJKEITRjCEo7wRCAikYhMFKISjejEICaxiE0c4hKP +CQgIYlITBKSkozkpCAlqUhNGtKSjvRkICOZyEwWspKN7OQgJ7nITR7yko/8 FKAghShMEYpSjOKUoCSlKE0ZylKO8lSgIpWoTBWqUo3q1KAmtahNHepSj/o0 oCGNaEwTmtKM5rSgJa1oTRva0o4/w7sDHelEZ7rQlW50pwc96UVv+tCXv/ib fvRnAAMZxGCGMJRhDGcEIxnFaMYwlnGMZwITmcRkpjCVaUxnBjOZxWzmMJd5 zGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbGcHO9nFbvawl338 w7/s5wAHOcRhjnCUYxznBCc5xWnOcJZznOcCF7nEZa5wlWtc5wY3ucVt7nCX e9znAQ95xGOe8JRnPOcFL3nFa97wlne85wMf+cRnvvCVb3znB//xk1/85s/i D0RgghCUYAQnBCEJRWjCEJZwhCcCEYlEZKIQlWhEJwYxiUVs4hCXeMQnAQlJ RGKSkJRkJCcFKUlFatKQlnSkJwMZyURmspCVbGQnBznJRW7ykJd85KcABSlE YYpQlGIUpwQlKUVpylCWcpSnAhWpRGWqUJVqVKcGNalFbepQl3rUpwENaURj mtCUZjSnBS1pRWva0JZ2tKcDHelEZ7rQlW50pwc96UVv+tCXv/ibfvRnAAMZ xGCGMJRhDGcEIxnFaMYwlnGMZwITmcRkpjCVaUxnBjOZxWzmMJd5zGcBC1nE YpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbGcHO9nFbvawl338w7/s5wAH OcRhjnCUYxznBCc5xWnOcJZznOcCF7nEZa5wlWtc5wY3ucVt7nCXe9znAQ95 xGOe8JRnPOcFL3nFa97wlne85wMf+cRnvvCVb3znB//xk1/85s/RH4jABCEo wQhOCEISitCEISzhCE8EIhKJyEQhKtGITgxiEovYxCEu8YhPAhKSiMQkISnJ SE4KUpKK1KQhLelITwYykonMZCEr2chODnKSi9zkIS/5yE8BClKIwhShKMUo TglKUorSlKEs5ShPBSpSicpUoSrVqE4NalKL2tShLvWoTwMa0ojGNKEpzWhO C1rSitZB/v+r/Q9JgJuH "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1752]}, Annotation[#, {{Callout}, Charting`Private`Tag, {875}}]& ]}], {{{}, {{}, GraphicsGroupBox[{ {LightDarkSwitched[ RGBColor[0.87, 0.94, 1]], AbsoluteThickness[4], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]], CapForm["Butt"], JoinForm[ "Round"], BSplineCurveBox[{ Offset[{3., 0.}, {4.00304252475*^9, 76736.}], Offset[{8., 0.}, {4.00304252475*^9, 76736.}], Offset[{10., 0.}, {4.00304252475*^9, 76736.}], Offset[{12., 0.}, {4.00304252475*^9, 76736.}], Offset[{12., 0.}, {4.00304252475*^9, 76736.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{3., 0.}, {4.00304252475*^9, 76736.}], Offset[{8., 0.}, {4.00304252475*^9, 76736.}], Offset[{10., 0.}, {4.00304252475*^9, 76736.}], Offset[{12., 0.}, {4.00304252475*^9, 76736.}], Offset[{12., 0.}, {4.00304252475*^9, 76736.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{43., 5.5000000000000036`}, {4.00304252475*^9, 76736.}], Offset[{43., -5.4999999999999964`}, {4.00304252475*^9, 76736.}], Offset[{12.000000000000002`, -5.5000000000000036`}, { 4.00304252475*^9, 76736.}], Offset[{11.999999999999998`, 5.4999999999999964`}, { 4.00304252475*^9, 76736.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"76736\"\>", 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, 0.}, {4.00304252475*^9, 76736.}], 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: Thu 29 Oct 2026 15:33:25 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 4.0022208*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->{ 3.997518146010844*^9, 3.997781286629609*^9, 3.9979832705299664`*^9, 3.998334162359736*^9, {3.9985936039711027`*^9, 3.998593606199188*^9}, 3.9989270403515987`*^9, 3.999183179015541*^9, 3.999353495530822*^9, 3.9994643622919903`*^9, 3.999959989971051*^9, 4.0003869394810257`*^9, { 4.001017657821724*^9, 4.001017672133875*^9}, 4.001339756765244*^9, 4.001973333884987*^9, 4.001973550325618*^9, {4.0021214621462297`*^9, 4.0021214664779043`*^9}, {4.002202282323721*^9, 4.002202289690984*^9}, { 4.00227677578609*^9, 4.0022768059495687`*^9}}, CellLabel-> "Out[315]=",ExpressionUUID->"cc9aba74-db47-4d20-8ff4-5c5e20b3a4b7"] }, 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) (July 2, 2026)", 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[576, 22, 5618, 133, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False, InitializationCell->True], Cell[6197, 157, 1095, 19, 53, "Output",ExpressionUUID->"6a49f7aa-6e36-4d5c-b7b0-20d1fcf39054"] }, Open ]], Cell[CellGroupData[{ Cell[7329, 181, 5513, 119, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False, InitializationCell->True], Cell[12845, 302, 21010, 420, 546, "Output",ExpressionUUID->"cc9aba74-db47-4d20-8ff4-5c5e20b3a4b7"] }, Open ]] } ] *) (* End of internal cache information *)