(* 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[ 33913, 733] NotebookOptionsPosition[ 33141, 709] NotebookOutlinePosition[ 33569, 726] CellTagsIndexPosition[ 33526, 723] 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"}], ";"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\n", 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"}], ";"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\n", 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[609]:=",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}, CellLabel-> "Out[612]=",ExpressionUUID->"70c5ff85-3053-4c12-9604-8dafab572c5b"] }, 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[619]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eUFNW6BuAiz5BsESUKhYJkKIJIpgAlKKFBJCMFSJLUIAISSyTHIghD 0hKQqNAiDiOilJiGJE0ekFAShzBMAwIzxHPne9++a/VZuNb9dX+VfzjP2unb 396Vps8u0XNI296ZFUXpml1RMv79n//MWYnXGmb8D7fDNf0pDsb/i51O0TZb i325dsN6e3GgO22/I7anR4z+Qt/SDqzF7KE7i62utNtF7Eyh9aXRVruJ1b8i 7WGz8l7Y6Il4O9FqX8S7ibZhPSlSf0HK0xzIvI9ejfjb0+pGxL+R1r8VG0dp Zwvm84S2YXX8fs5vdLTtOoj/EK2mXpX4H9L6dbH7yp/0RbE+hjZOi5WSB+iz Ymffv/mQOHyXVmH/WyF6M8b/PBSZH8bfTSuwXuwg98NWcaAZ7a4WG0UOcX4b Mf4Q2pmL8W7QpoX+Bx5m+3Fi+/kjbG+KQw1oFbaSaaUj5lP3KMth84ejkf2L /OQ5zvHOoP3MiF2xmjOJ+XmA+U+j3RnYP6dpezb2w+QTHH95tN1l0XZg7SSt bsN+yXqS4x3AfqlE6yfF4Ym0meW6xFP+L/YXKw4c+Re7ecShMqfoF8XWQdpM EodLnWb87W5IvlbTahuxm0a78XI9hPaeYfttYvX2WdYfIw4OdVk+H9dP4b85 n3S0HxxxJulfXXSO+awt9vU/z3h6ibU+F1h+TOxcoN1paF/rIl1N7O8VcVn0 l/tSVPxa7GXG+7XY6ka7/v9yJ3H4G9rpKHYnJdM3ke8sVzjfLsh3B9pIxf2q 3FWOlxP111zj/GGl1HXWH4f6+2l7GO5fdgrbj8X+uXWD8X2K66toKusPF/vi wozn7JUM67si9uF62HGL+c0WzrD9/W2Wb0iV+M9HnCB24v/hfFuI/a/eoWeL 9Zi7HH+W2Kp8j76A9UiijYviUNl0+jmpH37lPr3wlqxnG9qOlXJfyQecbyr2 Q4mHjP/OOYnvc1qFA0Ues780sfYrrec/L/UbPWF5AbG+ULkOq2KtbyZYySk2 52SGnWxie2YW2IxBf9Oysn0O1K+Sjd6D8b/Ozv42if0bcsDuGrE+Lob148XW 6lhYD4rNkTnZfiPqq7kYz1Sx8WJu9tdJ7A7Ow/a9Mf6ivCyvIvFZV2m1POLP /wznAwcvR1wY+enjY/vnxWrufFHl/hoRF0L92OdguxbG0/LTNdF/xefZHxwq 9wJ9GfmfEHEy4ntE29fF7v0C9G2xklaQ46ej/W9F6IeIb1dR9gf7BrzI8ieo 368Y3fpChsO+4uy/p9icS5uTxcHvI54t1nKVYP+LUN71JZYvEyuTXqa7IB+Z SzL/+aLtdI+2/RzmX4FWVkl/gXWluL5rMX6bV9jfJrG/VWm23yo2ipXl+H3Q 37CI+yE/N2n7vtR3h5Rj/1fE1rXy3J+p0bZh9f0KnP8tjL8w4sfoL19Ftn+C +nkqc/wk5LcHbbhin0vbVzG/0xrz88xFmU+OKuwf9p+k9XziUPlqUVba0+50 zP8x7fTCfjxYneXvYn89oE2sh+5/9elWUd8aWYPlPcXhvbSN+uabr9EfoP/P Ih6A/T+0Jtunio0wrTxJlnhfrxXZr9F2/suKIvd7/y+1IvmX8mCB2szHfbFv IO2eEuuLaHW52FhQh+X5pT+1bl36VbFp0Xo5PF9q1WN8lcVa7vqMp57YmUGr jdC+WgP2V+f/ZP0UrdeOtgprm3WWtxCHOzTkftKRj69o+3Wx751GtCEOPaId Bc/TsY3p4nifvE8rLfE+uOp1jtcL778vvcHxxuL9twWt4nms7I2UT0D/xZtw fqWjbSzA+2hz2p6F8VfQymI8v4s2Zf9bEE+TiOPx/hygnW2I7zfaQP1Q42bs 76RYi6Pt5Kc6rDdnf3wfvkIr9/C+Uf9Nlt9A/5dotQ3eb3u/xXwViLZaBu83 s1owHwXkfciNp+2y0VbLifVcLTmfKmLtDO2UEfv/asX2mcRmttZ0drGd2c/+ CuH9t2wb7t+86L9NW9aHjVZvs/4jvI/vo42sGK9EO46fju/Jf2g31/UoO3Bo 2DuR61vqKyto/YHY/2t7tmc8iztwvNKIZ2FHxlcJ4/ftxPorkK+LtD4P7Wt3 pus91aEE2hkrVt0uLD+B/nN25fzPIp/VaQfl7jTanYP+T9PGHaz3yW6Mt4LY Ld+d5X3wffS4e+R+ie/hV3pEnm/I58s9WX8l+lN7cb3+xP5p+h7jOYK/NxTu zfbr8T2VQrtj8H5doA/zj/0YvErbhfF9ZPVj+Ubk45n+7O8TzL8XrQzA902N 9zl+H3zfzKDtUvieqDaA+asj7Z1uA6LKw1Nps6zYzD7w6VYbSnvfZFqpKeV2 lkGMrwu+byYOijzv0X+5wRxvMNan7RDmczWun1IBlv+G+abR+lZ8rxQfxvLN 2H+3aGMm5tPkA5YPx375jTYtXG/XhzP/ccjvzg/Z/0/I5/wRrP9sSpSVfPie 3BFt9xLt1sd8845iuYF894wY36POLNqegP66f8T456K/6bS7COvXdTTXczv6 /4Z24/G9OWkM4y+G76FNEZ/E90qHsez/vjiwkVYf4vto3TiWq/L9pZYeH3m+ iv1taP8scaDVBDg4XGyUMNnfEHGw2cesv1as/0Fbt+R7SglMhLUctzMcbvQJ 25cVB6/R1kapH0qexPpjpdz5YTLXp90/Eq9vCuwbfjvK/onobw4dihf7ztPu erHdYyrz1Vocmkk7b4uVeNrXJdr2MIz37TTG/zvGqzKd/Z3BeFNo5yu07zQD DlwTW8dpvy7zCR6ZyfZVxcrDWYw/FuUj53D8/Yh3+Fz6S+RzqMX5JYrNMK2l IZ4h8+g7yOfV+Vz/l9H/jwvYXyOxe5l2NKmvPfMp+x8o5c5s2ponNmssYv0k cajbYjjc8E6G/ZvjOB9V7FZcwvVsLA4pS5mfE2KlPG1nvivjHaZDv6C/tsvY fw4p9z2g9ZfEeqnlLF8o1tJo/1axuncFx1slDtz6LPL8FFupnzM/NVB/sM38 NRWbu2h7iDh05QvWX4Px6q/k9XIQ7Z9dxfn+LXa/p7XLT7XdczXnuxPtt37J +8klxPvXGsabKlY6r+V8UhB/Eu2LvSf5+ngd4w2KQ4fWs33WtChbWcThAxs4 nz1SPzhqI+fzm1i/R5tHxIESXzG/98WKTevlpT+r2NeMp7LYaUZrzcTBIpt4 Pc0V2zfo8ORohyyxNmgzx5+K/n+mfXFiVQ+y/Xqxm0wHJkp8mm8L658QG7Xp wK9iZw4duor85fmW89kh/fniaaNCusw/51b6VbFdnXbfQX7fpcODkd8u3zH/ yxBfpXiuzyn034l2LkTbgkOZtnH+ycjnETq0V+I1xyVwvY5hPQ58z/4PI3/p tDkd+Wu5neuxAvnbRxvbxKb6A9e3qThwm7YGiY3fd0TWV8n417/kR9bvcF/W N4XWPhTbzk+sv0ts9N/J+aaI1XwO81fkgcz/Im0VEtu9fmZ8zcRG7l3sfz7a f0erfZDfbr+w/Rqpr2+h7e/E2uRfuT5VxOGKvzF/hthVfmf7Ag8ln49p48NM Gf86a/7gfCeL1Qe03lXam60T2f8wceCl3ZzfDok3NIK2DkfbhtXP9nA+vZ9I Pobu5fqNQP1C+7j+28XWLjq485HM54X9rH9AbH5KB12prz17AE76HfOZSzur lChPg9ULtPa+zCfYM0SnI75ttJ1f6gdyHeT4YSnXttIxRdHf1ENwzXpifdJh OLmBOJT5COPphHiO0jEfYb+1OwqnfSr2PaLN9eiv9DF41DaxUfI422/B+Pvp UCL6u0cn7Be7HyZxff7GfP6hlVTE1+wEnVPyZ92kjWri4I2TvL9Uypzxr6af 4vhDxepzp1l/iTg4j+5niwO1z3D+rjg0h153E/2dpwO3xE6Ps3BcjiySj+ku 3LGxWOn6N/fnGLH59TnOz0D9CueZ/25ivT2tdhZb4y5w/xwRO2sjPiQOjr7I +FahvwN0YB76S6cTNyKelZcY70qxto9OWIzx1MvM1y6M9ybtnkP8t2ltm9ht msz12I3xltNJjbNK/gpfgcukYLwhVyL3Kyn3D7zK/V5Y7F6NuKo40P8a81lD bNS9zvm1FjsWPe1t9PdMCvf3PHGwF20vQzzGDd4f/hZbsalsn47+qtEJebNJ f1vouNfErhbm+E3ESqWbrD9ZbEyk0+LFvse3mJ862TP+tcfeZnyG2Cj1D+/P I8X+NFr7TuyOuMPxN4oDd2hrG/orfpf5/hn9JdLaQ3G4yT3mv3IOWZ/BaXCz mWKlQDrX4yexs5NOPCIO1HnA+TWPkfW7QCu9xOq2h4xvptjM9Yj93Y123EGs 5xk66YJY6faY69NZ8qVNpf19xU62J7x+3hernWn/FLG5iba+EusdlBTxqA3i 0FHaOI/1aZeJflnyY42nY5qKzTaZ4X4DxcExtBEQ6/fphJ1i1c4K1/RJvoLF ssHrqiN/f9DhlmL7Ju33I/9NssNx3cVagI4ZIzaW0jUtsfVrpDyI9bpBT1sj DhfMAbufi91rdMwxjL8wBjavoP96sbCSV9bL78sJa7XF7hw6oak41CMXnDxa rMyiC47HfpieGw5uxfqfpu3tYn1KHjjtHPZTp7ywFRsr8zlON2shDmd6hvG3 FqsV6ODHOaV/kx71mdg9QquYf2DJ84wfVgq+AIccXO8O7a7G86hBAcYbLzb7 075FeB7VLQgnrhArP9A2nn/aRTrmqDg8uxCcFBYHaxRmeV95XrkGPWqc2I4t Ajtx4lA1uuY6sbGFTjyF94fsRZmPc3j+naA74vkXmPgi67cR21/R/v54vh2j Ez7C82x9MeYvXuwvU5z74RCel2Np6yLaf6RyvMq4v/9Jq63w/GhRgvtlvDg8 glZmiNUv6Jpz8Pwa/hKN+QcSaWut2D+4JPdPc+TvOh36WOwrUIr5mIr8zH+F 67NBbNYpzfgOiPULdM1ksTK7DMt9mP/Wsox3uditWo7j/4x8/kWrychfUnmu bx2Zj79DBeavl9geX5HtE8VG6UqMdzDaj6GNOWKzZGXO74xYGaHx+t2KfNt0 YjzyXawK93NpPP9u0tOWiu1fq7J+Vdxff67G9d8hDi6sznjz4XlT71WW98Hz xVeD8X+N59V52tqL+2ee1xhvDK4XN+Luj/WMf6rX5PU0Uax2rcX1WSp2s9bm /s8p76+BT+hAD7Fl1mH5a2L1Ce36xba/Hu+/VfC+ubI+40tCPLsbcD+2wf4I 67w/b8b180tDzi839rfTiOu/Vmw0aMz12Y31WkD3U7NEuUwfvB9Zr3O+U/F+ dJEuuB3vY3Pe4PjpeP/K3YT5qCbrpc6kE/G+6lZryvnfwPW9pWnk/o39dYp2 iyOeE824HwOI51hzrscw1J/wJvMTh3iO0Pov2J9l3uL+xvumepCOKYT91boF 51cL++ulltw/0/F8H0krS/D+tpeO+0NsJrZiPvPjfalpa5breJ4PpcOtxIFl dMG2eF943c/1Go/9vIte9xne3xq24frUxvvlzjaR5zHeR+q3ZbwDxdplut9b 0fZnke9Rq87b3I8/yfeYup3WFSk387Zjfl8W69tou53YzvUO89EP37cGbfcX G1tpvbnYiWnP6723OFw14oFitRutrY62tRbxfNM+cv8T+7QOXM9vxIFJtL4D 43foyPKz6E/pxPGOid11dPAV+b7VH9FGR7FxvzO9Ad/Do7owX4vxPXyPVr8W B/Z05X7+Rqx90I3jbUR/K2h3llht8i7n64h9hbpzvgmIpzFt/yC2F3ePqu8s NLiea8T+53pwPksRX70eketVHOxLByyxO482RmC8S7TSQRx6ryf7z4v4z9N2 IvZPnl6svx75nRXxZqxP9/c43zisz7d0sBr2S9Xe7K8L2lfuw/ytwH6r0Jfr eQf7zaQVReJRjtJaUcRXth/jfYD+DtHOWMx3dH/G8wXq73uf7d+U+7X/8wEs X4b794sDeX3lkPuxPox2i+H+vWQQ2y8UBxcN5n7Ijr8nXKObxeJ7f8EQlpcR W3UD3B8V8b52kU4YiL8/JAzl+kwS27mHcf63ZDzju2GR9cHz4d0PmC8//v6Q fTjvH6PxvJhMJ+DvHUbHD3n/mYH3kfIj4JpP8D6yno75Cs+PsSP5vMHz3mk9 ivHcwPvBn7TZAPfPOx8x/3g/1YaPZv+ZcX+7RScUx/do6hjGv0Cev0rKWOYr Bc/rhuN4P30b3wc76Y638X0wfzyc1EfexwPPTuD1tAHv9xat5Zb3b207HayC 9/OeJue7RGz+TSd8IO/j+oyP+fyamUvyETOR61Myt/TXje5YPY/M7y86uXxe yU/nT+hzYnMSHagv7YOb6LRfpL1ecRLzt1nGtz+m1RgZ32o3mePFitXDdHi4 2LdmCvNhi/UQrf0otktOZX9H0N89OvGu2NwzjeM/Egf/ocP5JV77j+kcXxNb S2fwem4gNgfNhMv0EYcWzuJ+KSXzs+rNZn6XiE3fHO6fdHGwNq3mkHxZ7lzG MxO/X1W3mL+jYjfHPDqb/J6kd6XDU/B7VOX5nL+J9sdpoxd+jzMX8HqaIzYe LuR+jMffs9M/ZXzV8Pfplxdx/+QT6ytppzX+Xn2Xdvn36s8Xc/zS+Hvr7sWR 5yv+XtssjuU30f/vtP2jjK+/sYTl8fj9odFS9m/K71vOItqZjd/XGixj/QX4 va4/HUzG74XzlrM8Bb/P1VrB9Skr/Znn6MAysX32M+azqjic3WZ89aS9vwtt HsfviZNpFb/H6pW+YPtB8nutPZE2WuL33uO0EivWMq2ks4v9jyOOx+/HbVex /xduZjjwgA7NFWurV/P67yjtrTTaHSEOt/iS+ZiP/r+g1eb4vfTWGsbXCvsl dS3zOwO/5xZex/o/Y//topV8+P00hXafw/wLrGe+6yI/kfMr/O9/y/mfd97F O+8Ce+ddpL133sU77yLl3nkXid877xL5/VTsnXfxzrug3DvvEmXvvAvWyzvv wvi88y4Z9s67eOddMB/vvIvE6513Yf688y6SD++8C8u98y4ynnfehf15511k fbzzLpyPd95F8uedd+H6euddJJ/eeRfm2zvvIvF5511o77yLxOedd2G+vfMu Mj/vvAv//yLeeRfJv3fehfW98y6ynt55F9b3zrvI/L3zLsyPd95F+vPOu7Dc O++SYe+8i3feBf17510kHu+8C/vzzrtk2Dvv4p13QX//D+dd/gPLGbVC "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lPYEIgSANA/27Zta7PdZm+23cbNtq3Nttts27btuqfbw/lmHmceBoka tK3YJnBAQEAgMgT5HdMH+Z2nIy1pSE0qUpKC5CQjKUlITCISkoD4xCMucYhN LGISg+hEIypRiEwkIhKB8IQjLGEITShCEoLgBCMoQQj8q3YC+KmhH3znG1/5 wmc+8ZEPvOcdb3nDa17xkhc85xlPecJjHvGQB9znHne5w21ucZMbXOcaV7nC ZS5xkQuc5xxnOcNpTnGSExznGEc5wmEOcZAD7Gcfe9nDbv5jFzvZwXa2sZUt bGYTG9nAetaxljWsZhUrWcFylrGUJSxmEQv5lwXMZx5zmcNsZjGTGUxnGlOZ wmQmMZEJjGccYxnDaEYxkhEMZxhDGcJgBjGQAfSnH//Qlz70phc96cHfdKcb XelCZzrRkQ60px1t+TUUrWlFS1rQnGY0pQmNaURDGlCfevxFXepQm1rUpAbV qUZVqlCZSlTkTypQnnKUpQylKUVJSlCcYhSlCIUpREEKkJ985OUP8pCbXOQk B9nJRlaykJlMZCQD6UlHWtKQmlSkJAXJSUZSkpCYRCQkAfGJR1ziEJtYxCQG 0YlGVKIQmUhEJALhCUdYwhCaUIQkBMEJRlCCEJhABPDTEvvBd77xlS985hMf +cB73vGWN7zmFS95wXOe8ZQnPOYRD3nAfe5xlzvc5hY3ucF1rnGVK1zmEhe5 wHnOcZYznOYUJznBcY5xlCMc5hAHOcB+9rGXPezmP3axkx1sZxtb2cJmNrGR DaxnHWtZw2pWsZIVLGcZS1nCYhaxkH9ZwHzmMZc5zGYWM5nBdKYxlSlMZhIT mcB4xjGWMYxmFCMZwXCGMZQhDGYQAxlAf/rxD33pQ2960ZMe/E13utGVLnSm Ex3pQHva0ZY2tKYVLWlBc5rRlCY0phENaUB96vEXdalDbWpRkxpUpxpVqUJl KlGRP6lAecpRljKUphQlKUFxilGUIhSmEAUpQH7ykZc/yENucpGTHGQnG1nJ QmYykZEMpCcdaUlDalKRkhQkJxlJSUJiEpGQBMQnHnGJQ2xiEZMYRCcaUYlC ZCIRkQiEJxxhCUNoQhGSEAQnGEEJQmACBfr9yPwUfvCdb3zlC5/5xEc+8J53 vOUNr3nFS17wnGc85QmPecRDHnCfe9zlDre5xU1ucJ1rXOUKl7nERS5wnnOc 5QynOcVJTnCcYxzlCIc5xEEOsJ997GUPu/mPXexkB9vZxla2sJlNbGQD61nH WtawmlWsZAXLWcZSlrCYRSzkXxYwn3nMZQ6zmcVMZjCdaUxlCpOZxEQmMJ5x jGUMoxnFSEYwnGEMZQiDGcRABtCffvxDX/rQm170pAd/051udKULnelERzrQ nna0pQ2taUVLWtCcZjSlCY1pREMaUJ96/EVd6lCbWtSkBtWpRlWqUJlKVORP KlCecpSlDKUpRUlKUJxiFKUIhSlEQQqQn3zk5Q/ykJtc5CQH2clGVrKQmUxk JAPpSUda0pCaVKQkBclJRlKSkJhEJCQB8YlHXOIQm1jEJAbRiUZUohCZSEQk AuEJR1jCEJpQhCQEwQlG0ID/v/y/zn7A/wDqBIhv "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl10O0GIYSANAX27Ztu7FtNHZj27Zt22xsO2ls2/a/OX9xz8xyNqNEDdtW ahMoICAgXZCAgD8xMNKAoAQjOCEISShCE4awhCM8EYhIJCIThahEIzoxiEks YhOHuMQjPglISCISk4SkJCM5KUhJKlKThrR/aiY9GchIJjKThaxkIzs5yEku cpOHvOTjL/JTgIIUojBFKEoxilOCkpSiNGUoSznKU4GKVKIyVahKNapTg5rU 4m9qU4e61KM+DWhIIxrThKY0ozn/0IKWtKI1bWhLO9rTgY50ojNd6Eo3utOD nvSiN33oSz/6M4CBDGIwQxjKMIYzgpGMYjRjGMs4xjOBiUxiMlOYyjSmM4OZ zGI2c5jLPOazgIUsYjFLWMoylrOClaxiNWtYyzrWs4GNbGIzW9jKv2xjOzvY yS52s4e97GM/BzjIIQ5zhKMc4zgnOMkpTnOGs5zjPBf4j4tc4jJXuMo1rnOD m9ziNne4yz3u84CHPOIxT3jKM57zgpe84jVveMs73vOBj3ziM1/4yje+84Of /OI3f5o/EIEJQlCCEZwQhCQUoQlDWMIRnghEJBKRiUJUohGdGMQkFrGJQ1zi EZ8EJCQRiUlCUpKRnBSkJBWpSUNa0pGeDGQkE5nJQlaykZ0c5CQXuclDXvLx F/kpQEEKUZgiFKUYxSlBSUpRmjKUpRzlqUBFKlGZKlSlGtWpQU1q8Te1qUNd 6lGfBjSkEY1pQlOa0Zx/aEFLWtGaP8O7Le1oTwc60onOdKEr3ehOD3rSi970 oS/96M8ABjKIwQxhKMMYzghGMorRjGEs4xjPBCYyiclMYSrTmM4MZjKL2cxh LvOYzwIWsojFLGEpy1jOClayitWsYS3rWM8GNrKJzWxhK/+yje3sYCe72M0e 9rKP/RzgIIc4zBGOcozjnOAkpzjNGc5yjvNc4D8uconLXOEq17jODW5yi9vc 4S73uM8DHvKIxzzhKc94zgte8orXvOEt73jPBz7yic984Svf+M4PfvKL3/xZ /IEITBCCEozghCAkoQhNGMISjvBEICKRiEwUohKN6MQgJrGITRziEo/4JCAh iUhMEpKSjOSkICWpSE0a0pKO9GQgI5nITBayko3s5CAnuchNHvKSj7/ITwEK UojCFKEoxShOCUpSitKUoSzlKE8FKlKJylShKtWoTg1qUou/qU0d6lKP+jSg IY1oTBOa0ozm/EMLWtKK1rShLe1oTwc60onOdKEr3ehOD3rSi970oS/96M8A BjKIwQxhKMMYzghGMorRjGEs4xjPBCYyiclMYSrTmM4MZjKL2cxhLvOYzwIW sojFLGEpy1jOClayitWsYS3rWM8GNrKJzWxhK/+yje3sYCe72M0e9rKP/Rzg IIc4zBGOcozjnOAkpzjNGc5yjvNc4D8uconLXOEq17jODW5yi9vc4S73uM8D HvKIxzzhKc94zgte8orXvOEt73jPBz7yic984Svf+M4PfvKL3/w5+gMRmCAE JRjBCUFIQhGaMIQlHOGJQEQiEZkoRCUa0YlBTGIRmzjEJR7xSUBCEpGYJCQl GclJQUpSkZo0pA3y/5/lf+WqiAg= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1628]}, Annotation[#, {{Callout}, Charting`Private`Tag, {813}}]& ]}], {{{}, {{}, 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.9802086045*^9, 78787.}], Offset[{-8., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-10., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-12., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-12., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.9802086045*^9, 78787.}], Offset[{-8., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-10., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-12., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}], Offset[{-12., 9.797174393178826*^-16}, {3.9802086045*^9, 78787.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, {3.9802086045*^9, 78787.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.9802086045*^9, 78787.}], Offset[{-43., -5.500000000000003}, {3.9802086045*^9, 78787.}], Offset[{-43., 5.499999999999997}, {3.9802086045*^9, 78787.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"78787\"\>", 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.9802086045*^9, 78787.}], 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 Feb 2026 16:31:09 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9809664*^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}, CellLabel-> "Out[621]=",ExpressionUUID->"4d391eb2-73a5-4954-b021-6c881e7f018a"] }, 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, 1209, 20, 53, "Output",ExpressionUUID->"70c5ff85-3053-4c12-9604-8dafab572c5b"] }, Open ]], Cell[CellGroupData[{ Cell[7373, 180, 5486, 118, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[12862, 300, 20263, 406, 587, "Output",ExpressionUUID->"4d391eb2-73a5-4954-b021-6c881e7f018a"] }, Open ]] } ] *)