(* 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[ 34819, 761] NotebookOptionsPosition[ 33949, 736] NotebookOutlinePosition[ 34377, 753] CellTagsIndexPosition[ 34334, 750] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData["\[IndentingNewLine]"], "Input", CellChangeTimes->{3.9838230626051273`*^9}, CellLabel-> "In[118]:=",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{"Buttons", " ", "to", " ", RowBox[{"hide", "/", "show"}], " ", "code"}], "*)"}], RowBox[{ RowBox[{ RowBox[{"CloseAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "False"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"OpenAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "True"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{"Row", "[", RowBox[{"{", RowBox[{ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"CloseAllInputsCells", "[", "]"}], "]"}]}], "]"}], ",", RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"OpenAllInputsCells", "[", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{"Import", "[", "\"\\"", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"graphtitle", "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "graphsubtitle", " ", "=", " ", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "]"}], ",", RowBox[{ "#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "}"}], "&"}], ")"}], "/@", "data"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"lastitem", "=", RowBox[{"Callout", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], ",", RowBox[{"ToString", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], ",", "Left", ",", " ", RowBox[{"LabelStyle", "->", "Small"}], ",", " ", RowBox[{"Background", "->", "LightBlue"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"Length", "[", "data", "]"}], "]"}], "]"}], "=", "lastitem"}], ";"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.867182545948308*^9, 3.867182555077017*^9}, { 3.8671856323646584`*^9, 3.867185655249*^9}, 3.867187032420275*^9, { 3.867187218478177*^9, 3.867187234045384*^9}, {3.867187352932571*^9, 3.867187371829939*^9}, {3.8671903940899982`*^9, 3.8671904257542353`*^9}, 3.867190458276375*^9, {3.867190733940156*^9, 3.867190734419613*^9}, { 3.867190798905361*^9, 3.86719081289338*^9}, {3.867190843782461*^9, 3.867190868878964*^9}, {3.867191008084812*^9, 3.867191008823593*^9}, { 3.867191045756618*^9, 3.86719109928176*^9}, {3.867191132601091*^9, 3.867191153305139*^9}, {3.867191256528245*^9, 3.867191304159674*^9}, { 3.867191352877194*^9, 3.867191356182763*^9}, {3.867191386467814*^9, 3.867191411094434*^9}, {3.867191451576531*^9, 3.867191464669776*^9}, { 3.867191517397131*^9, 3.867191585673174*^9}, {3.867191623805966*^9, 3.867191637345644*^9}, {3.867191694067857*^9, 3.867191832972144*^9}, { 3.867443529594183*^9, 3.867443565893339*^9}, {3.867445761749815*^9, 3.86744582007928*^9}, {3.867445877108981*^9, 3.867445877563551*^9}, { 3.88987554010293*^9, 3.889875542354431*^9}, {3.890909771395684*^9, 3.890909773446272*^9}, {3.89765774638717*^9, 3.897657747223047*^9}, { 3.898379436246955*^9, 3.898379440050661*^9}, {3.90338401735606*^9, 3.9033840200448112`*^9}, {3.906908185436775*^9, 3.9069081879516287`*^9}, { 3.925848183308426*^9, 3.925848185881434*^9}, {3.926438108465784*^9, 3.92643813766343*^9}, {3.928879584090178*^9, 3.928879587280989*^9}, { 3.9293606429237022`*^9, 3.929360645945132*^9}, {3.931376802792758*^9, 3.931376805515088*^9}, {3.954598230829558*^9, 3.954598269603718*^9}, { 3.96136444466888*^9, 3.961364449285103*^9}, {3.961420570214137*^9, 3.961420572598192*^9}, {3.972758024916869*^9, 3.972758025765842*^9}}, CellLabel-> "In[119]:=",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[BoxData[ TemplateBox[{ ButtonBox["\"Hide Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`CloseAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"], ButtonBox["\"Show Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`OpenAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"]}, "RowDefault"]], "Output", CellChangeTimes->CompressedData[" 1:eJwN0G1IkwEQB/Al+aBT1KmFU9QtGEGI9WFJKiqnI12N5SxIESlqSixFkPkS CIrfNsEXUPFlhrNla5ubbe7R2rR9qLCRGljL1Im6KRicCkmhKHofjh8c/7uD Ez6pLam8wOFwsqhuRv6B2gGEFUU/UzWI0FrKE3jIMlWRqmAIQWT7LOkgrwQK pBYdglrj3Hs6jGDIbBWGvUTY4H1MOCUzDuUx6SMIfZdZ/yPycW7hkpbUFFu/ 3NMj7Ggiow3k2FSvaIX8ftv5/+ooAusWAP8Vwj/RaOUL0o+e6ykGhJg7ysQ5 sjfovC94jaC4K8pTk/n7gYM5crM6UR/xBkHM7KsuGhEa03kcMSm7VuL9RJqy jdzwtwjxfLNUTNom2x+aSdYfPrtqQmDmJV0tZoRvndytUAvCAl9e3Eayu53S B+P0B3W93Ecat5VJWivtDZgcf0ldWdBVb6P5tHfGHxMIN6xNnkE7Qlpq6HaO A8H+e+0odhLhrIFZfk52hQ0tZ7CUO+iWxE0heE98a1oyqA/5WjpNd5PlMgdZ Ja0pqniPsK7rqGM+UH9R8dNCtsXlSgIuhBSzO6rcjdAz5pQJZxBudS/12Um9 69KzX6StYue4eRbhHBkI+Fo= "], CellLabel-> "Out[122]=",ExpressionUUID->"fb0d7d21-cd06-4e59-bb97-9aabe87d12f1"] }, 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[129]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt2/d3FdXaB/ChJzSPiFJEGBSkw1BEOgN4aSIcEOnIQKQp5YCISHNEeh2K EEB0BKSFcsQYIqKM2IKgHJAS+kgNJeQAAgn1vnm+3/Oude7irnX/gPEX7mft 9uxn7zMlc3fZfsM79c+pKMrivIqS/e///WfOTrnSLPt/uF2v6I9xMOm/2Oke bbOD2FdgN6x3EQf60PYbYntGxOgv9DXtwFrM73QPsdWLdnuKnam0vizaam+x ejzSHjZr7IGNfoi3O60ORLybaRvWUyP1F6Y/zoGce+nViL8LrSYg/gRa/1ps HKKdrZjPI9qG1Yl/cH5jo203RPwHaDXjssR/n9avit0X/6TPi/VxtHFSrJTb R58WO3v/mw+Iw7dpFfa/GqK3YPzPQ5H5YfzdtALrpfdzPySKA61pd7XYePYA 55eA8YfTzjyMd402LfQ/5C+2nyC2nz7I9qY41JRWYSuNVrphPo0OsRw2vzsU 2b/IT6EjHO8U2s+K2BWr+VOZn3uY/3TanYn9c5K252A/TDnK8T+Ntrs82g6s HaPVbdgvuY9xvH3YL9Vp/Zg4PIk2c12VeKocZ3+x4sDB/2K3kDhU8QT9nNja T5up4nD5k4y/8zXJ12pa7Sh2M2k3SX4PoT2n2H6bWL15mvXHiYMjXJYvwO+n 5N+cTxbaD4s4h/SvLj7DfDYQ+wafZTxxYm3AOZYfFjvnaHc62tc/T9cW++Mi roT+Cl6Iil+Lvch4N4mt3rTr/w93F4e/op1uYndyGn0d+c51ifPtiXx3pY0M XK8qX+Z4+VF/zRXOH1bKX2X9Caj/B22PxPXLTmf78dg/N64xvk/w+yqVwfqj xL74MOM5fSnb+q6Iffg97LjB/OYJZ9v+9ibLN2RI/GcjThY7Sf9wvu3E/pdu 0XPEesxtjj9bbNW4Q5/DeqTSxnlxqFIW/ZTUD794l150Q9azI23HSrmv3D3O NwP7oex9xn/rjMT3Oa3CgWcfsr9MsfYzrRc9K/WbP2J5MbG+SLkKq2JtYA5Y yS825+aEnTxie1Yu2IxBf9Nzs30+1K+Zh/4d42/Ky/42i/0b8sHuGrE+IYb1 k8TW6lhYD4rN9/OzfQLqqwUYzzSx8VxB9tdd7A4rxPb9Mf7iwiyvKfFZl2m1 CuIv+gTnAwcvRlwS+RngY/unxWrBIlHl/roRl0D92Kdguz7G04rS9dB/tafZ Hxyq/Ax9Efn/MOI0xPeAtq+K3bvF6JtiJbM4x89C+1+epe8jvl2l2B/se+c5 lj9C/UGl6Q7nsh32lWH//cTmPNqcIg5+G/EcsVagLPtfjPJez7N8uViZ/ALd E/nIWY75LxJtp0+07acw/6q0skr6C6wrz/Vdi/E7vsj+Nov97SuwfaLYKF2J 4w9AfyMjHoT8XKftu1LfHV6Z/V8SW1eqcH9mRNuG1bercv43MP6iiB+ivyLV 2P4R6heqwfFTkd++tOGKfS5tX8b8TmrMzxPnZT75arJ/2H+M1ouIQ1VqR1np QrszMP+HtBOH/bi/DsvfxP66R5tYD93/0uOtor71fl2W9xOH99A26pttX6bf Rf+fRfwO9v+IemyfITbCtPIoTeJ9pX5kv0bb+Q8rilzv/T/Vj+RfyoPFGjAf d8W+IbR7QqwvptVPxcbChiwvKv2pjRrRL4lNi9Yr4/5SvzHjqyHWCjZhPI3F zkxabY72tZuyv4b/k/UTtN4g2iqsbdFZ3k4c7tqM+0lHPjbS9iti3xvNaUMc ekA7Cu6n41vQZfA8eZdWXsPz4KpXOF4cnn+f/xfHG4/n33a0ivuxsidS/iH6 L9OS86sQbWMhnkfb0PZsjL+CVpbg/l2qFfvfinhaRpyE5+cA7WxDfL/QBuqH WrRmf8fEWjxtpz3WYb0N++Pz8CVauYPnjSZtWX4N/V+g1Y54vu3/KvNVLNpq RTzfzG7HfBST5yE3ibYrRVutLNYLvMb51BRrp2inoth/vD3b5xCbeTrQecV2 Tj/7K4Hn30oduX8Lo/+OnVgfNtq/zvoP8Dy+lzZyY7yynTl+Ft4n/6HdAlej 7MChkW9Eft9SX1lB6/fE/p+7sD3jWdKV41VAPIu6Mb7qGH9gd9ZfgXydp/X5 aN+gB934sQ4l0854ser2ZPlR9J+/F+d/GvmsQzsod6fT7lz0f5I2bmG9j/Vm vFXFbpU+LB+A96OHfSLXS7wPv9g3cn9DPl/ox/or0Z8ax/X6E/un1VuM5yD+ 3lCyP9uvx/tUOu2Ow/N1sQHMP/Zj8DJtl8T7kTWI5QnIxxOD2d/HmH8crbyD 95u6b3P8AXi/mUnb5fE+Ufsd5q+htHd6vxNVHp5Gm5XEZt4hj7faTNr7ptBK PSm3cw1lfD3xfjNpaOR+j/4rD+N4w7A+nYYzn6vx+ykfYPkvmG8mrSfifaXM SJZvwf67QRuzMJ+W77J8FPbLL7Rp4fd2dRTzH4/87nyP/f+AfC4YzfpPpkdZ KYL3yR3Rdi/QbhPMt/AYlhvId7+I8T7qzKbtD9Ffnw8Y/zz0N4N2F2P9eo3l em5H/1/RbhLeNyePY/yl8T60OeJjeF/pOp793xUHEmj1Pt6P1k1guSrvX2qF iZH7q9jfkfbPFgfafwgHR4mNsib7Gy4Otv6I9deK9d9o64a8TymBSbCW72a2 w80/ZvtK4uAV2kqQ+qG0yaw/Xsqd76ZwfTr/I/H6psK+UTej7J+E/ubSoSSx 7yztrhfbfacxXx3EoVm087pYSaJ9PaNtj8R4X09n/L9ivJoz2N8pjDeVdjai ffeZcOCK2DpC+3WZT/DgLLavJVbuz2b8sSh/fy7H/wPxjppHf4l8jrA4vxSx Gaa1TMQzfD59C/m8vIDr/wL6/34h+2sudi/Sjib1tSc+Yf9DpNyZQ1vzxWbd xayfKg71XgKHm93Ktn9LPOejit1qS7meLcQhZRnzc1SsVKHtnLdlvL/o0E/o r9Ny9p9Pyn33aP15sV7+U5YvEmuZtD9RrO5ZwfFWiQM3PovcP8VWxufMT13U H2Yzf63E5i7aHi4OXfqC9ddgvCYr+XvZj/ZPruJ8/xa739Laxcfa7rea892J 9olf8npyAfEeX8N4M8RKj7WcTzriT6V9sXckXx+tY7xBcejAerbPnRllK5c4 vG8D5/O71A+OSeB8fhHrd2jzoDhQdiPze1es2LReRfqzSm9iPDXETmtaay0O PruZv6d5YvsaHZ4S7ZAl1oZu4fjT0P+PtC9erOpBtl8vdtPowCSJT/NtZf2j YqMBHfhZ7MylQ5eRv0Jfcz47pD9fEm1UzZL550+kXxLbdWj3DeT3TTo8DPnt +Q3zvxzxVU/i+pxA/91p51y0LTiUYxvnn4Z8HqRDeyRec0Iy1+sw1mPft+z/ L+QvizZnIH+vbed6rED+9tLGNrGpfsf1bSUO3KStoWLj1x2R9VWy//Uv/Z71 u96V9U2ntffEtvMD6+8SG4N3cr7pYrWIw/w9e0/mf562SojtuB8ZX2uxUXAX +1+A9t/Q6gDkt/dPbL9G6utbafsbsTblZ65PTXG42i/MnyF2lV/Zvth9yedD 2ngvR/a/zprfON8pYvUerfeS9maHFPY/Uhx4fjfnt0PiDY2mrb+ibcPqZ79z Pv0fST5G7OH6jUb9Enu5/tvF1i46uPOBzOeZP1h/n9j8hA66Ul97ch+c+ivm M492VilRng6r52jtbZlPsF+IzkJ822i7qNQPFNjP8cNSriXSMaXQ37QDcL3G Yn3yX3BaU3Eo50HG0x3xHKJjPsB+63wIzvxE7HtAm+vRX4XD8JhtYqPcEbbf ivH/oEMp6O8OnfyH2H0vlevzN+bzD61kIL7WR+n8kj/rOm3UFgevHeP1pXrO 7H81/QTHHyFWnzrJ+kvFwfn0IFscaHCK83fFobn0uuvo7ywduCF2+p6G4/Pl knzMcOFuLcRKr7+5P8eJzU1nOD8D9aueZf57i/UutNpDbE04x/1zUOysjfiA ODj2PONbhf720YH56C+LTklAPCsvMN6VYm0vnbwE46kXma9dGK8t7Z5B/Ddp bZvYbZXG9diN8T6lU1vklvyVvARXTMd4wy9FrldS7h9ymfu9pNi9HHEtcWDw FeazrthodJXz6yB2LHr66+jviXTu7/niYBxtL0c8xjVeH/4WW7EZbJ+F/mrT yYXzSH9b6fiXxa4W5vgtxUr166w/RWxMojOTxL6HN5ifhnmz/7XH32R8htgo /w+vz++L/Zm09o3YHX2L4yeIA7doaxv6K3Ob+f4R/aXQ2n1xuOUd5r9GPlmf YZlw61lipVgW1+MHsbOTTjkoDjS8x/m1iZH1O0crcWJ1233GN0tsFnjA/m5H O34/1vMUnXpOrPR+yPXpIfnSptH+gWInzyP+ft4Wqz1o/1SxuZm2Nor1rkq6 eMwGcegQbZzF+nTOQb8g+bEm0jGtxGbHnPCgIeLgONoIiPW7dPJOsWrnhuv5 JF/B0nngdXWQv9/o8Gti+zrt9yP/LfPC8X3EWoCOGSc2ltH1LLH1c6Q8iPW6 Rk9fIw4Xzwe7n4vdK3TMYYy/KAY2L6H/xrGwUljWy+/LD2sNxO5cOrmVONS3 AJw2VqzMpotPxH6YURAOJmL9T9L2drE+tRCceQb7qXth2IqNlfkcoVu3E4dz PMH4O4jVqnTwo/zSv0mP+UzsHqRVzD+w9GnGDyvFn4FDDn7vDu2uxv2oaTHG myQ2B9O+xbgfNSoOp6wQK9/RNu5/2nk65pA4PKcEnBoWB+uWZPlAuV+5Bj1m gtiOfRZ24sWh2nS9dWJjK51yAs8PeUsxH2dw/ztKd8P9LzDpOdbvKLY30v7B uL8dppM/wP1sfWnmL0nsr1iG++EA7pfjaes82n+gcrwauL7/Savtcf9oV5b7 ZaI4PJpWZorVL+h6c3H/GvU8jfkHUmhrrdg/rBz3Txvk7yod+kjsK1ae+ZiG /Cx4keuzQWw2rMD49on1c3S9NLEypyLLfZh/YiXG+6nYrVWZ4/+IfB6n1TTk L7UK17ehzMfftSrzFye2J1Zj+xSxUaE64x2G9uNoY67YLFeD8zslVkZr/P0m It82nZKEfJeuyf1cAfe/6/T0ZWL751qsXwvX1x9rc/13iIOL6jDeIrjfNH6J 5QNwf/HVZfybcL86S1t7cP0s9DLjjcHvxY24z0M9+5869fh7miRWe9Xn+iwT u7kbcP/nl+fXwMd0oK/YMhuy/GWx+oh2/WLb35jX35p43lzZhPGlIp7dTbkf O2J/hHVen7fg9/NTM86vIPa305zrv1ZsNG3B9dmN9VpID1JzRbniADwfWa9w vtPwfHSeLr4dz2Nz/8Xxs/D8VbAl81Fb1kudRafgedWt3Yrzv4bf99ZWkes3 9tcJ2i2DeI625n4MIJ7DbbgeI1H/w7bMTzziOUjrP2F/VnyV+xvPm+p+OqYE 9leHdpxffeyv51/j/pmB+/v7tLIUz2976PjfxGZKe+azKJ6XWnVguY77+Qg6 3F4cWE4X74TnhVf8XK+J2M+76HWf4fmtWUeuTwM8X+7sGLkf43mkSSfGO0Ss XaQHvRptfy55H7Uavs79+IO8j6nbaV2RcrNwZ+b3BbG+jbY7i+0CbzAfg/B+ a9D2YLGRSOttxE5MF/7e+4vDtSIeIlZ709rqaFtrEc9XXSLXP7FP68r1/Eoc mEzrOzB+124sP43+lO4c77DYXUcHX5T3W/0BbXQTG3d70BvwPjymJ/O1BO/D d2h1kzjwey/u56/E2ru9OV4C+ltBu7PFass3OV9H7CvRh/NNRjwtaPs7sb2k T1R9Z5HB9Vwj9j/Vl/NZhvga9438XsXBgXTAErvzaWM0xrtAK13Fobf6sf/C iP8sbadg/xSKY/31yO/siLdgffq8xfnGY32+poO1sV9q9Wd/PdG+xgDmbwX2 W9WBXM9b2G8mrSgSj3KI1kohvkqDGO899HeAdsZjvmMHM54vUH/v22zfVq7X /s/fYflyXL+fG8LfVz65Husjabc0rt9Lh7L9InFw8TDuh7z4e8IVunUs3vcX Dmd5RbHVKMD9UQ3Pa+fp5CH4+0PyCK7PZLFdcCTnf0PGM74ZGVkf3B/efJf5 8uPvD3lH8foxFveLKXQy/t5hdHuP15+ZeB6pMhqu9wjPI+vpmI24f4x/n/cb 3O+dDmMYzzU8H/xJm01x/bz1AfOP51Nt1Fj2nxPXtxt0chm8j2aMY/wL5f6r pI9nvtJxv242gdfT1/F+sJPudhPvBwsmwqkD5Hk88OSH/D1twPO9RWsF5flb 204Ha+L5vJ/J+S4Vm3/Tye/K87g+8yPev2YVkHzETOL6lCso/fWmu9UpJPM7 TqdVKSz56fExfUZsTqYDTaR9cDOd+ZO016tNZv62yPj2R7QaI+NbnadwvFix +hcdHiX2rZnKfNhiPURr34vtctPY30H0d4dOuS02f5/O8R+Ig//Q4aISr/3b DI6via1lM/l7bio2h86CKw4QhxbN5n4pL/OzGs9hfpeKTd9c7p8scbABreaT fFnuPMYzC9+v6ljM3yGxm28+nUe+J+m96PBUfI+qsYDzN9H+CG3E4XucuZC/ p7li4/4i7sck/D076xPGVxt/n35hMfdPEbG+knY64O/Vt2mXf6/+fAnHr4C/ t+5eErm/4u+1reNZfh39/0rb38v4+r+WsjwJ3x+aL2P/pnzfchbTzhx8X2u6 nPUX4nvdYDqYhu+F8z9leTq+z9VfwfWpJP2ZZ+jAcrF9+jPms5Y4nNdmfI2l vb8nbR7B98QptIrvsXr1L9h+qHyvtSfRxmv43nuEVmLFWo6VdF6x/2HESfh+ 3GkV+3/merYD9+jQPLG2ejV//92kvZVJu6PF4XZfMh8L0P8XtNoG30tvrGF8 7bFfMtYyvzPxPbfkOtb/EftvF60UwffTdNp9CvMvtp75boT+P6H96fj/D3+/ gfneIHb7J7D9QKkfOEfbf+L7cNxGliuS//BLm5jfnFi/RNrqKtZ7b+Z8E/D9 9DhtjZLvf0aPLdzv0/B9MSHI8YZivcdtZf9B7KdyX3P+bcX2Hdq4i/jaJTK+ b5GPUkls/yT2XwZtWGJr6DbG1wr7V09meQy+Ly+i/fhebjf+lv0NknLjAm32 w/f+edu5Xj8gPvc75neiWOuzg/ulCvKX73uu32iMP5VW62C+QTrcRBzo/gP7 a4v9HjmPxP/+v5z/eeeXvPNLsHd+Sdp755e880tS7p1fkvi980uR7+Fi7/yS d34J5d75pSh755ewXt75JcbnnV/Ktnd+yTu/hPl455ckXu/8EvPnnV+SfHjn l1junV+S8bzzS+zPO78k6+OdX+J8vPNLkj/v/BLX1zu/JPn0zi8x3975JYnP O79Ee+eXJD7v/BLz7Z1fkvl555f4/3/xzi9J/r3zS6zvnV+S9fTOL7G+d35J 5u+dX2J+vPNL0p93fonl3vmlbHvnl7zzS+jfO78k8Xjnl9ifd34p2975Je/8 Evrzzi/J+N75Jc7vfzi/9G+wdN/C "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lPQGIYSBtA/tm3btm2zsW2jsdvYtu3GbGPbtu3ck5uHM7vP38wiUaP2 ldsFDggICETZIL9rmSC/+9KUoiQlKE4xilKEwhSiIAXITz7ykofc5CInOchO NrKShcxkIiMZSE860pKG1KQiJSlITjKSkoTEJCIhCYhPPOISh9jEIiYxiE40 ohKFyEQiIhEITzjCEobQhCIkIQhOMIIShMC/8iKAn0L8wXe+8ZUvfOYTH/nA e97xlje85hUvecFznvGUJzzmEQ95wH3ucZc73OYWN7nBda5xlStc5hIXucB5 znGWM5zmFCc5wXGOcZQjHOYQ//EvBznAfvaxlz3sZhc72cF2tvEPW9nCZjax kQ2sZx1rWcNqVrGSFSxnGUtZwmIWsZAFzGcec5nDbGYxkxlMZxpTmcJkJjGR CYxnHGMZw2j+5i9GMZIRDGcYQxnCYAYxkAH0px9/0pc+9KYXPelBd7rRlS50 phMd6UB7fg1iW9rQmla0pAXNaUZTmtCYRjSkAfWpR13q8Ae1qUVNalCdalSl CpWpREUqUJ5ylKUMpSlFSUpQnGIUpQiFKURBCpCffOQlD7nJRU5ykJ1sZCUL mclERjKQnnSkJQ2pSUVKUpCcZCQlCYlJREISEJ94xCUOsYlFTGIQnWhEJQqR iUREIhCecIQlDKEJRUhCEJxgBCUIgQlEAD8tzh985xtf+cJnPvGRD7znHW95 w2te8ZIXPOcZT3nCYx7xkAfc5x53ucNtbnGTG1znGle5wmUucZELnOccZznD aU5xkhMc5xhHOcJhDvEf/3KQA+xnH3vZw252sZMdbGcb/7CVLWxmExvZwHrW sZY1rGYVK1nBcpaxlCUsZhELWcB85jGXOcxmFjOZwXSmMZUpTGYSE5nAeMYx ljGM5m/+YhQjGcFwhjGUIQxmEAMZQH/68Sd96UNvetGTHnSnG13pQmc60ZEO tKcdbWlDa1rRkhY0pxlNaUJjGtGQBtSnHnWpwx/UphY1qUF1qlGVKlSmEhWp QHnKUZYylKYUJSlBcYpRlCIUphAFKUB+8pGXPOQmFznJQXaykZUsZCYTGclA etKRljSkJhUpSUFykpGUJCQmEQlJQHziEZc4xCYWMYlBdKIRlShEJhIRiUB4 whGWMIQmFCEJQXCCEZQgBCZQoN/P00/lB9/5xle+8JlPfOQD73nHW97wmle8 5AXPecZTnvCYRzzkAfe5x13ucJtb3OQG17nGVa5wmUtc5ALnOcdZznCaU5zk BMc5xlGOcJhD/Me/HOQA+9nHXvawm13sZAfb2cY/bGULm9nERjawnnWsZQ2r WcVKVrCcZSxlCYtZxEIWMJ95zGUOs5nFTGYwnWlMZQqTmcREJjCecYxlDKP5 m78YxUhGMJxhDGUIgxnEQAbQn378SV/60Jte9KQH3elGV7rQmU50pAPtaUdb 2tCaVrSkBc1pRlOa0JhGNKQB9alHXerwB7WpRU1qUJ1qVKUKlalERSpQnnKU pQylKUVJSlCcYhSlCIUpREEKkJ985CUPuclFTnKQnWxkJQuZyURGMpCedKQl DalJRUpSkJxkJCUJiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJREQiEJ5whCUM oQlFSEIQnGAEDfj/y//r7Af8D8w/j+k= "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl11OwGIYSANAb27Zt20bjNLZtJ41tq7HV2LZt27aTdzLv48zu986sEjVs V6ltoICAgNJBAgL+xMBIA4ISjOCEICShCE0YwhKO8EQgIpGITBSiEo3oxCAm sYhNHOISj/gkICGJSEwSkpKM5KQgJalITRrSko70ZCAjmchMFrKSjezkICe5 yE0e8pKP/BSgIIUoTBGKUozilKAkpf7UiTKU5S/KUZ4KVKQSlalCVf6mGtWp QU1qUZs61KUe9WlAQxrRmCY0pRnNaUFLWtGaNrSlHe3pQEc60ZkudKUb3elB T3rRmz78Q1/60Z8BDGQQgxnCUIYxnBGMZBSjGcNYxjGeCUxkEpOZwlSmMZ0Z zORfZjGbOcxlHvNZwEIWsZglLGUZy1nBSlbxH6tZw1rWsZ4NbGQTm9nCVrax nR3sZBe72cNe9rGfAxzkEIc5wlGOcZwTnOQUpznDWc5xngtc5BKXucJVrnGd G9zkFre5w13ucZ8HPOQRj3nCU57xnBe85BWvecNb3vGeD3zkE5/5wle+8Z0f /OQXv/nT/IEITBCCEozghCAkoQhNGMISjvBEICKRiEwUohKN6MQgJrGITRzi Eo/4JCAhiUhMEpKSjOSkICWpSE0a0pKO9GQgI5nITBayko3s5CAnuchNHvKS j/wUoCCFKEwRilKM4pSgJKUoTRnK8hflKE8FKlKJylShKn9TjerUoCa1qE0d 6lKP+jSgIY1oTBOa0ozmtKAlrWhNG/4M73a0pwMd6URnutCVbnSnBz3pRW/6 8A996Ud/BjCQQQxmCEMZxnBGMJJRjGYMYxnHeCYwkUlMZgpTmcZ0ZjCTf5nF bOYwl3nMZwELWcRilrCUZSxnBStZxX+sZg1rWcd6NrCRTWxmC1vZxnZ2sJNd 7GYPe9nHfg5wkEMc5ghHOcZxTnCSU5zmDGc5x3kucJFLXOYKV7nGdW5wk1vc 5g53ucd9HvCQRzzmCU95xnNe8JJXvOYNb3nHez7wkU985gtf+cZ3fvCTX/zm z+IPRGCCEJRgBCcEIQlFaMIQlnCEJwIRiURkohCVaEQnBjGJRWziEJd4xCcB CUlEYpKQlGQkJwUpSUVq0pCWdKQnAxnJRGaykJVsZCcHOclFbvKQl3zkpwAF KURhilCUYhSnBCUpRWnKUJa/KEd5KlCRSlSmClX5m2pUpwY1qUVt6lCXetSn AQ1pRGOa0JRmNKcFLWlFa9rQlna0pwMd6URnutCVbnSnBz3pRW/68A996Ud/ BjCQQQxmCEMZxnBGMJJRjGYMYxnHeCYwkUlMZgpTmcZ0ZjCTf5nFbOYwl3nM ZwELWcRilrCUZSxnBStZxX+sZg1rWcd6NrCRTWxmC1vZxnZ2sJNd7GYPe9nH fg5wkEMc5ghHOcZxTnCSU5zmDGc5x3kucJFLXOYKV7nGdW5wk1vc5g53ucd9 HvCQRzzmCU95xnNe8JJXvOYNb3nHez7wkU985gtf+cZ3fvCTX/zmz9EfiMAE ISjBCE4IQhKK0IQhLOEITwQiEonIRCEq0YhODGISi9jEIS7xiE8CEpKIxCQh KclITgpSkorUpCEt6UhPBjKSicxkISvZyE4OcpKL3OQhL/nITwEKUojCFKEo xShOCUpSKsj//6T/AZc6j0g= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1686]}, Annotation[#, {{Callout}, Charting`Private`Tag, {842}}]& ]}], {{{}, {{}, 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.991320680625*^9, 79015.}], Offset[{-8., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-10., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-12., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-12., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.991320680625*^9, 79015.}], Offset[{-8., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-10., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-12., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}], Offset[{-12., 9.797174393178826*^-16}, {3.991320680625*^9, 79015.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, { 3.991320680625*^9, 79015.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.991320680625*^9, 79015.}], Offset[{-43., -5.500000000000003}, {3.991320680625*^9, 79015.}], Offset[{-43., 5.499999999999997}, {3.991320680625*^9, 79015.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"79015\"\>", 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.991320680625*^9, 79015.}], NCache[ImageScaled[{Rational[1, 2], Rational[1, 2]}], ImageScaled[{0.5, 0.5}]]]}]}}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, False}, AxesLabel->{None, None}, AxesOrigin->{3.729024*^9, 0}, DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ TagBox[ TagBox[ RowBox[{"Unique", " ", "domains"}], HoldForm], HoldForm], TraditionalForm], None}, { FormBox[ TagBox[ TagBox["Year", HoldForm], HoldForm], TraditionalForm], None}}, FrameStyle->Automatic, FrameTicks->{{All, All}, { Charting`DateTicksFunction[Automatic, DateTicksFormat -> {Automatic}], Charting`DateTicksFunction[ Automatic, DateTicksFormat -> {Automatic}, "TickLabels" -> None]}}, GridLines->{{{3.6922176*^9, Thickness[Large]}, {3.7237536*^9, Thickness[Large]}, {3.7552896*^9, Thickness[Large]}, {3.7868256*^9, Thickness[Large]}, {3.818448*^9, Thickness[Large]}, {3.849984*^9, Thickness[Large]}, {3.88152*^9, Thickness[Large]}, {3.913056*^9, Thickness[Large]}, {3.9446784*^9, Thickness[Large]}, {3.9762144*^9, Thickness[Large]}, {4.0077504*^9, Thickness[Large]}, 3.6922176*^9, 3.6999936*^9, 3.707856*^9, 3.7158048*^9, 3.7237536*^9, 3.7315296*^9, 3.739392*^9, 3.7473408*^9, 3.7552896*^9, 3.7630656*^9, 3.770928*^9, 3.7788768*^9, 3.7868256*^9, 3.794688*^9, 3.8025504*^9, 3.8104992*^9, 3.818448*^9, 3.826224*^9, 3.8340864*^9, 3.8420352*^9, 3.849984*^9, 3.85776*^9, 3.8656224*^9, 3.8735712*^9, 3.88152*^9, 3.889296*^9, 3.8971584*^9, 3.9051072*^9, 3.913056*^9, 3.9209184*^9, 3.9287808*^9, 3.9367296*^9, 3.9446784*^9, 3.9524544*^9, 3.9603168*^9, 3.9682656*^9, 3.9762144*^9, 3.9839904*^9, 3.9918528*^9, 3.9998016*^9, 4.0077504*^9}, { 0, 10000, 20000, 30000, 40000, 50000, 60000, 70000, 80000, 90000, 100000, 110000, 120000, 130000, 140000, 150000, 160000, 170000, 180000, 190000, 200000, 210000, 220000, 230000, 240000, 250000, 260000, 270000, 280000, 290000, 300000, {0, Thickness[Large]}, {50000, Thickness[Large]}, {100000, Thickness[Large]}, {150000, Thickness[Large]}, {200000, Thickness[Large]}, {250000, Thickness[Large]}, {300000, Thickness[Large]}}}, GridLinesStyle->Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], ImageMargins->20, ImagePadding->{{All, All}, {All, All}}, ImageSize->Large, LabelStyle->{ GrayLevel[0]}, Method->{ "NoShowPlotTheme" -> "Detailed", "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "DefaultPlotStyle" -> { Directive[ RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Directive[ RGBColor[0.95, 0.627, 0.1425], AbsoluteThickness[2]], Directive[ RGBColor[0.455, 0.7, 0.21], AbsoluteThickness[2]], Directive[ RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[2]], Directive[ RGBColor[0.578, 0.51, 0.85], AbsoluteThickness[2]], Directive[ RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[2]], Directive[ RGBColor[0., 0.6, 0.6], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.36, 0.684], AbsoluteThickness[2]], Directive[ RGBColor[0.56, 0.7, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.54, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.585, 0.5976, 0.9], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.45, 0.45], AbsoluteThickness[2]], Directive[ RGBColor[0.7632186717367254, 0.8174402144034898, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.8554632469481959, 0.24885384718327969`, 0.8334053873948551], AbsoluteThickness[2]], Directive[ RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], "AllowMicroRanges" -> {True, False}, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentSet", "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotInteractivity:>True, PlotLabel->FormBox[ TagBox[ GridBox[{{ StyleBox[ "\"Hosts file size history\"", 16, Bold, StripOnInput -> False]}, { StyleBox[ "\"base version: (adware + malware) only\"", 12, Bold, StripOnInput -> False]}, { StyleBox[ "\"updated: Sat 4 Jul 2026 20:13:11 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.992112*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->CompressedData[" 1:eJwNz00owwEYx/HJEIvWvBSL7CBZMmnZCT02otZo06bkQBYjLaLMS+IoBw5W VvI2GZvt3zZvG0LMjOO8rxRN0Z5SRC3kOfz6XH9fQateqY1hsViFtGz7Ud79 IkIS4/nOX0KY5+ZD5jKCL2TTGsiI5VKUY0YQRXRZfvJ40qvKXUHgh4UVfeSc +vXdT/5w6hY5qwgLps9OtgVB6s1gickXuSZwQo4xG0mJawhLQqZWTH5JpjVW MtYsPXhYR6hUaKdGrQhBSfFTnA2hXKmqHycL0k21DRsIoeRBxTU51K7jT9gR tlodrg+S6+Hs9TsQHgc3LUEG4S1u5NDkRJg5LQqXuRBKPnlRnhuhjc257SKF v4e3pVsI8XqHLHUboaXqLzRBKrsTzht3EAYMGrmLtG321DTvIgRmz3rjPfS3 Wn1lI3lSo+zZi5DGXKQ07SGwfV65YJ/63XdGJ7k7rO24IbEhEh0+QPgHVVK+ ww== "], CellLabel-> "Out[131]=",ExpressionUUID->"ead1273d-8933-4169-87fc-75c1320a45a4"] }, Open ]] }, WindowSize->{1280.25, 878.25}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification:>1.25 Inherited, FrontEndVersion->"15.0 for Mac OS X ARM (64-bit) (May 19, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[554, 20, 172, 3, 62, "Input",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[751, 27, 5541, 131, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6295, 160, 1196, 23, 53, "Output",ExpressionUUID->"fb0d7d21-cd06-4e59-bb97-9aabe87d12f1"] }, Open ]], Cell[CellGroupData[{ Cell[7528, 188, 5486, 118, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[13017, 308, 20916, 425, 546, "Output",ExpressionUUID->"ead1273d-8933-4169-87fc-75c1320a45a4"] }, Open ]] } ] *) (* End of internal cache information *)