(* 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[ 33075, 730] NotebookOptionsPosition[ 32407, 711] NotebookOutlinePosition[ 32804, 727] CellTagsIndexPosition[ 32761, 724] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], "\[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", "]"}], "]"}], "]"}], ",", "Above", ",", " ", RowBox[{"LabelStyle", "->", "Small"}], ",", " ", RowBox[{"Background", "->", "LightBlue"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"Length", "[", "data", "]"}], "]"}], "]"}], "=", "lastitem"}], ";"}]}], "Input", 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}}, CellLabel-> "In[647]:=",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"graph", "=", RowBox[{"DateListPlot", "[", RowBox[{"data", "\[IndentingNewLine]", ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], "\[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[{"{", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"{", "x", "}"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "2017", ",", "2025"}], "}"}]}], "]"}], ",", " ", "Automatic"}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"ImageMargins", "\[Rule]", "10"}], "\[IndentingNewLine]", ",", RowBox[{"ImageSize", " ", "->", " ", "Large"}], "\[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[{"LabelStyle", "\[Rule]", RowBox[{"{", RowBox[{"GrayLevel", "[", "0", "]"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Export", "[", RowBox[{ RowBox[{ RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"ToLowerCase", "[", "graphtitle", "]"}], ",", RowBox[{"\"\< \>\"", "->", "\"\<_\>\""}]}], "]"}], "<>", " ", "\"\<.png\>\""}], ",", " ", "graph"}], "]"}], ";"}], "\[IndentingNewLine]", "graph"}], "Input", 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}, NumberMarks->False, CellLabel-> "In[654]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJyN2Hd4FVX6B/ChJ6FdEQ1NGJBeh2roA7iALsKNIp1lID+aIFxYRJTiiPQS hiJGis4CSwvlLsYEkZUBQYOAXCBg6AMkEGouPaHu5v1+7x93H3yeH39w+Tzn nPe85z1nGpUHjX53cH5FUSb996+83//+MeelXm+X9w+353X9BfYn/4md3uE2 u4k9RffDeg+xbwBtvy+2Z4eMeIHvaAfWIn6j+4itfrTbV+zMoPVl4Vb7i9XT ofGw2eAAbAxCvr1pdSjy3ULbsJ4e6r/45ovsy3+QXoP8e9BqIvJPpPXvxMZx 2tmG9TynbVidcojr+zTcdkvkf5RWs69J/k9o/YbYrf47nSnWJ9LGWbFS9TB9 Xuwc/DMfFQcf0Crs/WuA3or5vw2E1of599MKrFc8wvOQJPZ1pt01YqP8Ua4v EfOPpp0FmO8WbVqIP/IYx08W26+kcbwpDrSlVdjKopVeWE+r42yHzR+Ph84v 6lP8D853DuPnhuyK1ah01ucx1j+Ldufg/Jyl7fk4D9NPcv4V4XaXh9uBtVO0 moLzUvAU5zuM81Kf1k+Jg1Nps8ANyafOacaLFPvS/sRucXGg5hn6NbF1hDbT xcFqZ5l/91tSrzW0Git2c2g3Wa6HwIFzHJ8iVu+eZ/+JYv8Yl+2LcP2Uu8D1 5GL8qJDzSXx16UXWs4XYM/wS84kTa0My2H5C7GTQ7iyMb55JNxZ740KuhXjF Loflr0VeYb6bxVZ/2vX+j3uLg/+inV5id1oWfRv1LnCV6+2LevekjWzcr2pf 43xR6L/2OtcPK9VusP9k9D9E22Nx/7JvcvwknJ87t5jfl7i+KmSz/zixJyHI fM5fzbO+J2QProedd1jfQsE82z/cZfvGbMn/UsjbxU7yPa63i9jb9D49X6xH POD888RWg4d0BvYjnTYyxYFaufTL0j9Y/RG95I7sZyxtR0q7p+pjrjcb56Hy E+Z//6Lk9y2twr7yzxgvR6ztpfXSl6R/++dsjxbrS5QbsCrWhuaDlSixGZ8f dgqJ7bkFYDMC8WYV5Pgi6N+wEP0b5t9cmPG2iL0bi8DuWrE+OYL9k8XWmkhY 94vNj6M4PhH91aLMZ6bYeK0Y4/UWu6OKc/xgzL+0BNsbSn7WNVqtg/xLl+R6 YP+VkMuhPkM8HP+KWC1WKqzd2yzksugf+TJsN8d8Wmk6BvHrvcJ4cKD2q/QV 1P+zkLOQ31PaviF2H0XTd8VKThnOn4vx+8rTT5DfngqMB3tGvMb25+g/rCLd LSPPQU8lxh8kNhfQ5nSx/4eQ54u1opUZfyna+1Vh+3KxMu11ui/qkb8q618q 3M6AcNsvY/11aWW1xPOtr8b9XYf5Y6sz3haxt2sNjk8SGxVrcf4hiDc25GGo z23afiT93dG1Gf+q2Lpeh+czO9w2rH5Ql+u/g/mXhPwM8UrV4/jn6F+8AedP R30H0oYr9ri0fQ3rO6uxPiUzZT1FGjI+7D1F66XEgTqNw6z0oN3ZWP8z2onD eTzShO1/w/l6TJvYD93b9MVW0d/6uBnbB4mDB2gb/c2336D/jvjfhDwC539M DMdni40grTzPknzfbB46r+F2/seKIvd778/NQ/WXdn90C9bjkdgzknbPiPWl tLpCbCxuyfbSEk9t1YpuKjYtWq+N50vz1syvgVgr1ob5tBY7c2i1PcY3bst4 Lf9f1s/Qeotwq7C2VWd7F3GwZzueJx312ETbb4o977enDXHgKe0oeJ5O6kBX wvvkI1p5B++Dq9/kfHF4/63yF843Ce+/XWgVz2PlQKj9M8Sv1JHrqxFuYzHe R9+i7XmYfyWtfIXnd4VOjL8N+XQMORnvzz7aSUF++2gD/QMdOjPeKbGWQNtZ L3RQf4vx+D58lVYe4n2jzdtsv4X4l2k1Fu+3g//KekWHW62J95t5XViPaHkf cpNpu1a41dpiveg7XE9DsXaOdmqKvae7cnw+sVmoG11YbOf3Ml5ZvP/WiuX5 LYH4se+yP2x0fY/9n+J9/CBtFMR8lbtz/lx8T96j3aI3wuzAgbHvh65v6a+s pPXHYu/eHhzPfL7qyflqIJ8lvZhffcw/tDf7r0S9Mml9Ica36EO3fqED22ln klh1+7L9JOJH9eP6z6OeTWgH7e4s2o1H/LO0cR/7fao/860rdusMYPsQfB89 GxC6X+J7uPrA0PMN9Xx9EPuvQjw1jvv1O85Pp/9jPmn4/4Zygzl+A76nbtLu RLxfRw9h/XEe/ddouxy+j6xhbE9EPUoOZ7wvsP44WhmB75tmH3D+Ifi+mUPb 1fA90XgE69dSxjv9R4S1B2fSZi2xWXjki622k/Ge6bQSI+12gQ+ZX19830z9 MPS8R/zaozjfKOzPu6NZzzW4fqr52L4P682h9SR8r1Qay/atOH93aGMu1tPx 72wfh/OyjzYtXG83xrH+Cajvro8Y/yfUc9F49n/pZpiVUvie3Blu9zLttsF6 S0xgu4F6DwoZ36POPNr+DPEGfML8FyDebNpdiv3r9yn3cwfi/4t2k/G9OW0i 86+I76EtIZ/C90rPSYz/SOxLpNUn+D5aP5ntqnx/qTWmhJ6vYm8s7Z0n9nX9 DPaPExuVTcYbLfZ3/pz914n1X2nrjnxPKb6psFbkbp6D7b/g+Fpi/3XaSpT+ gaxp7D9J2p0fp3N/ut+TfD0zYM+4u2H2TkW8eDqQLPZcot0NYnvgTNarmzgw l3beEyvJtKdvuO2xmO+7Wcz/F8zXcDbjncN8M2hnE8b3ngP7routP2ivLuvx p83l+EZi5ck85h+J9o/jOf8h5DtuAf1P1HOMxfWlis0greUgn9EL6fuo57VF 3P/XEf/fixmvvdi9Qjua9NdKfsn4I6XdmU9bC8Vms6Xsny4O9P8KDra7n2fv 1gSuRxW79b7mfnYQB5RlrM9JsVKHtvM/kPmO0YGfEe/d5YxfRNo9j2m9iliv toLtS8RaDu1NEqsHVnK+1WLfnW9Cz0+xlf0t69MM/UfZrF8nsbmHtkeLA1f/ wf5rMV+bVbxejmD8S6u53gti9wdau/JC24PWcL27MD7pn7yfXEa+p9cy32yx 0mcd13MT+afTnsiHUq/P1zNfvzhwdAPHF8wJs1VAHDy8kev5Tfr7JyRyPfvE +kPaTBP7Km9ifR+JFZvW60g8q+Jm5tNA7HSmtc5if/ktvJ4WiO1bdHB6uAOW WPtwK+efifi7aU+CWNX9HL9B7GbRvqmSn+bZxv4nxUYL2rdX7MTTgWuoX/Hv uJ6dEs+TTBt1c2X9UUl0U7HdhHbfR33/RgdHob59v2f9lyO/+sncnzOI35t2 MsJtwYF8KVx/FuqZRgcOSL7m5O3crxPYj8M/MP4x1C+XNmejfu/s4H6sRP0O 0kaK2FR/5P52Evvu0taHYuOXnaH9VfJ+vV//m/17PpL9vUlrH4lt5yf23yM2 hu/iem+K1VIO61f+saw/k7bKiu243cyvs9gotofxF2H897Q6BPXt/zPHr5X+ +jba/l6sTd/L/WkoDtbbx/oZYlf5heOjn0g9n9HGR/nyfp21v3K908XqY1rv J+PNbqmMP1bsq7Kf69sp+QbG09axcNuw+s1vXM/g51KPMQe4f+PRv+xB7v8O sbWH9u96Kut59RD7HxabX9J+V/prLx2G03/BehbQzmolzLNgNYPWPpD1+AcF 6Fzkl0LbpaW/r+gRzh+Udi2JjqiAeDOPwjGtxfq0Y3BWW3Egfxrz6Y18jtMR n+C8dT8O53wp9jylzQ2IV+MEPCFFbFT9g+O3Yf5DdCAV8R7S2w+J3Y/SuT8X sJ57tJKN/DqfpKOkftZt2mgs9t86xftL/fx5v5p+hvOPEasvn2X/r8X+hfQw W+xrcY7rd8WBeHr9bcS7RPvuiJ2B5+GEIgWkHrNduFcHsdLvAs/nRLG5+SLX Z6B/3Uusf3+x3oNW+4ityRk8P2liZ13IR8X+TzOZ32rEO0z7FiJeLp2aiHxW XWa+q8TaQXr7V5hPvcJ67cF8b9PuReR/l9ZSxG6nLO7Hfsy3gk7vUFDqV+4q XPMm5ht9NXS/knbvyGs87+XE7rWQG4l9w6+zns3ERqsbXF83sWPRs95DvJI3 eb4Xiv1xtL0c+Ri3eH+4ILYiszk+F/Ea09tLFJJ42+iEN8SuFuT8HcVK/dvs P11sTKVzksWeZ3dYn5aF837tSXeZnyE2qt3j/fljsTeH1r4Xu+Pvc/5Ese8+ baUgXqUHrPduxEultSfiYMeHrH+DIrI/o3LgznPFSnQu9+MnsbOLTk0T+1o+ 5vreipD9y6CVOLGa8oT5zRWbRZ8y3oNwJxzBfp6j0zPESv9n3J8+Ui9tJu0d KnYKPef184FY7UN7Z4jNLbS1Saz3VG6KJ2wUB47TxiXsT/d89OtSH2sKHdFJ bMbmh4eNFPsn0oZPrD+it+8Sq3ZBOMYj9fJXLASvb4L6/UoH3xHbt2mvF/Xv WBhOGCDWfHTERLGxjI6xxNbeULsf+3WLnrVWHCxTBHa/FbvX6YgTmH9JBGxe RfzWkbBSQvbL64mCtRZiN57e3kkcGFgUzvpUrMyjy0zBeZhdDPYnYf/P0vYO sT6jOJxzEeepdwnYioyU9fxBd+4iDuYryfy7idW6tP/zKIlv0hO+EbtptIr1 +75+hfnDSplX4YCD692h3TV4HrWNZr7JYnM47VmK51GrMnDqSrHyI23j+adl 0hHHxcH5ZeH0oNjfrBzbh8rzyjXoCZPFdmR52EkQBxrTMevFxjY69QzeHwpX YD0u4vl3ku6F559v6mvsHyu2N9He4Xi+naC3f4Ln2YaKrF+y2FuzEs/DUTwv J9FWJsZ/onK+Bri//06rXfH86FKZ52WKODieVuaI1X/QMfF4fo2rQmP9vlTa Wif2jqrK8/MW6neDDnwu9kRXYz1moj6LqnN/NorNljWY32GxnkHHZImV+TXZ 7sH6k2ox3xVit1Ftzr8b9TxNq1moX3od7m9LWY+3Z13WL05sT6nH8alio0Z9 5jsK4yfSRrzYrNqA6zsnVsZrvH6TUG+bTk1GvSs25HmugeffbXrWMrG9txH7 N8L9dXdj7v9OsX9JE+ZbCs+b1k3ZPgTPF08z5r8Zz6tLtHUA98/ibzDfCFwv bsgDnul5P01ieD1NFav9mnN/londgi14/qPk/dX3Be0bKLbMlmx/Q6w+p12v 2Pa25v23Id43V7VhfunIZ39bnsdYnI+gzvvzVlw/P7fj+orhfDvtuf/rxEbb Dtyf/divxfQwtUCYaw7B+5H1Jtc7E+9HmXSZHXgfi/8L58/F+1exjqxH44Lt /gNpb1ek "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[{{3.92904*^9, 165492.}}]}, Annotation[#, {{Callout}, Charting`Private`Tag, {636}}]& ]}, {{{}, {{}, GraphicsGroupBox[{ {RGBColor[0.87, 0.94, 1], AbsoluteThickness[4], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]], CapForm["Butt"], JoinForm[ "Round"], BSplineCurveBox[{ Offset[{1.8369701987210297`*^-16, 3.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 8.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 10.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 12.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 12.}, {3.92904*^9, 166625.14226602245`}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{1.8369701987210297`*^-16, 3.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 8.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 10.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 12.}, {3.92904*^9, 166625.14226602245`}], Offset[{4.898587196589413*^-16, 12.}, {3.92904*^9, 166625.14226602245`}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{18., 23.000000000000004`}, {3.92904*^9, 166625.14226602245`}], Offset[{18., 12.000000000000004`}, {3.92904*^9, 166625.14226602245`}], Offset[{-18., 11.999999999999996`}, {3.92904*^9, 166625.14226602245`}], Offset[{-18., 22.999999999999996`}, {3.92904*^9, 166625.14226602245`}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"165492\"\>", 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[{4.898587196589413*^-16, 17.5}, \ {3.92904*^9, 166625.14226602245}], 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}, 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->FrontEndValueCache[{{All, All}, { Charting`DateTicksFunction[Automatic, DateTicksFormat -> {Automatic}], Charting`DateTicksFunction[ Automatic, DateTicksFormat -> {Automatic}, "TickLabels" -> None]}}, {{ All, All}, {{{3.7237536*^9, FormBox[ StyleBox["\"2018\"", Directive[], {}, StripOnInput -> False], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.7868256*^9, FormBox[ StyleBox["\"2020\"", Directive[], {}, StripOnInput -> False], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.849984*^9, FormBox[ StyleBox["\"2022\"", Directive[], {}, StripOnInput -> False], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.913056*^9, FormBox[ StyleBox["\"2024\"", Directive[], {}, StripOnInput -> False], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.9762144*^9, FormBox[ StyleBox["\"2026\"", Directive[], {}, StripOnInput -> False], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7552896*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7868256*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7868256*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.818448*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.849984*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.849984*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.88152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9446784*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9762144*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}}, {{3.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.7868256*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.849984*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.9762144*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7552896*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7868256*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7868256*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.818448*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.849984*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.849984*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.88152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9446784*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9762144*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}}}}], GridLines->{{3.6922176*^9, 3.7237536*^9, 3.7552896*^9, 3.7868256*^9, 3.818448*^9, 3.849984*^9, 3.88152*^9, 3.913056*^9, 3.9446784*^9}, Automatic}, GridLinesStyle->Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], ImageMargins->10, 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.368417, 0.506779, 0.709798], AbsoluteThickness[2]], Directive[ RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[2]], Directive[ RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[2]], Directive[ RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[2]], Directive[ RGBColor[0.528488, 0.470624, 0.701351], AbsoluteThickness[2]], Directive[ RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[2]], Directive[ RGBColor[0.363898, 0.618501, 0.782349], AbsoluteThickness[2]], Directive[ RGBColor[1, 0.75, 0], AbsoluteThickness[2]], Directive[ RGBColor[0.647624, 0.37816, 0.614037], AbsoluteThickness[2]], Directive[ RGBColor[0.571589, 0.586483, 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" -> "CurrentSet", "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> (({ DateString[ Part[#, 1], "DateShort"], Part[#, 2]}& )[{ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}]& ), "CopiedValueFunction" -> (({ DateString[ Part[#, 1], "DateShort"], Part[#, 2]}& )[{ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}]& )}}, 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 4 Jul 2024 14:58:06 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.92904*^9}, {0, 218063.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.04217390500005365]}, { Scaled[0.02], Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->{ 3.867186551570758*^9, {3.867186680772122*^9, 3.867186699782072*^9}, 3.867186777935874*^9, 3.86718694202357*^9, 3.867187051044989*^9, 3.867187255654533*^9, 3.867187310041932*^9, 3.867187431429256*^9, 3.867187477376759*^9, 3.867187602705633*^9, {3.867190444725642*^9, 3.86719046295945*^9}, 3.867190761611189*^9, 3.867190819779409*^9, { 3.867190852467555*^9, 3.867190875035033*^9}, 3.867191085771729*^9, { 3.867191139927058*^9, 3.867191174532995*^9}, {3.867191217100472*^9, 3.867191249934973*^9}, {3.867191282486545*^9, 3.867191309118765*^9}, 3.867191362884745*^9, {3.86719139757495*^9, 3.867191417861985*^9}, 3.867191469212702*^9, 3.867191534117766*^9, {3.867191566041802*^9, 3.867191590853747*^9}, {3.867191700666916*^9, 3.867191770546698*^9}, { 3.867191813970607*^9, 3.867191837153657*^9}, {3.8674436061237383`*^9, 3.867443624613255*^9}, 3.867444944515202*^9, 3.867445839945568*^9, { 3.867445870303279*^9, 3.867445881911745*^9}, 3.867584995471957*^9, 3.867585478130906*^9, 3.86774687062293*^9, 3.868098851430778*^9, 3.868523516725683*^9, 3.86906681078651*^9, 3.869308928711943*^9, 3.869735161175044*^9, 3.870007810203533*^9, 3.870340372505321*^9, 3.870340403401229*^9, 3.87045361082372*^9, 3.870942972286525*^9, 3.8713065010498323`*^9, 3.871395829118849*^9, 3.871641630959985*^9, 3.871642275253429*^9, 3.871899229411577*^9, 3.8720932523644876`*^9, 3.87242839478826*^9, 3.8729292766301403`*^9, 3.8736608832707767`*^9, 3.874069338302347*^9, 3.874325909186389*^9, 3.874696457503956*^9, 3.874861895344188*^9, 3.875050962875978*^9, 3.87526519097518*^9, 3.875891090297274*^9, 3.876342003848527*^9, 3.876998312579729*^9, 3.8772936096656237`*^9, 3.877382516377141*^9, 3.877964348832008*^9, 3.87804450687954*^9, 3.878470212323723*^9, 3.8786395885601797`*^9, 3.878639620334971*^9, 3.878757847201033*^9, 3.879112223224792*^9, 3.879170520951467*^9, 3.879289724404871*^9, 3.879371591147833*^9, 3.879797285624524*^9, 3.879923975629261*^9, 3.880151317819726*^9, 3.880393658429194*^9, 3.880543046724104*^9, 3.881056375670085*^9, 3.881325738216374*^9, 3.881334367469533*^9, 3.881592959478129*^9, 3.882027365892887*^9, 3.88219345383886*^9, 3.882466370101098*^9, 3.882613249735723*^9, 3.883174805016778*^9, 3.883439999108673*^9, 3.883605359783735*^9, 3.883843869256338*^9, 3.883866592728613*^9, 3.883867143448183*^9, 3.884153915891087*^9, 3.884641124197339*^9, 3.884773401559798*^9, 3.884775165607097*^9, 3.88477566967144*^9, 3.885548303427269*^9, 3.885831123028147*^9, 3.886191584864834*^9, 3.886621436378044*^9, 3.886855243870946*^9, 3.887106308113074*^9, 3.887235622274569*^9, 3.887498860649525*^9, 3.887834971429055*^9, 3.8884179282247667`*^9, 3.888752672205769*^9, 3.889131678960092*^9, 3.889875549917007*^9, 3.890245716755601*^9, {3.890686789876093*^9, 3.8906868143380527`*^9}, 3.8908207849213142`*^9, 3.890908186110266*^9, 3.89090978001711*^9, 3.891285151358225*^9, 3.891545263571479*^9, 3.8916073042523813`*^9, 3.891872341652968*^9, 3.892072401751935*^9, 3.89228235594491*^9, 3.892544999424947*^9, 3.892806179970969*^9, 3.893095552437428*^9, 3.893172375102555*^9, 3.89362060069613*^9, 3.893686053639799*^9, 3.89397203764882*^9, 3.894751203039884*^9, 3.895084844111672*^9, 3.895439490125032*^9, 3.895526321693917*^9, 3.895657784061549*^9, 3.8957448599055853`*^9, 3.895931247787265*^9, 3.896013566564756*^9, 3.896095386373332*^9, 3.8965191786429*^9, 3.896893631393726*^9, 3.897216178858164*^9, 3.897657754621402*^9, 3.897926194231195*^9, 3.898379414999449*^9, 3.8983794476037083`*^9, 3.898434292317229*^9, 3.898951274337104*^9, 3.899121622375916*^9, 3.899475149831279*^9, 3.899911501496304*^9, 3.900175205856585*^9, 3.900270527812401*^9, 3.900491563343502*^9, {3.903025185560467*^9, 3.903025205982198*^9}, 3.903174150401764*^9, 3.903182074275147*^9, 3.903383990135808*^9, 3.903384025396119*^9, 3.903726387165244*^9, 3.903971852825098*^9, 3.904336629052966*^9, 3.904556665826528*^9, 3.904660734636202*^9, 3.905083048189001*^9, 3.905285129053268*^9, 3.905441042720232*^9, 3.905782272103561*^9, 3.906106379419388*^9, 3.90620708413487*^9, 3.906558811905631*^9, 3.906635301595938*^9, 3.906908194396344*^9, 3.907055587466549*^9, 3.907452024145508*^9, 3.90783837173269*^9, 3.90797214412626*^9, 3.908034764359009*^9, 3.908469310792593*^9, 3.908732154353013*^9, 3.908732190062996*^9, 3.908901085229148*^9, {3.909427575397406*^9, 3.909427588602787*^9}, 3.909612415221402*^9, 3.909847575834868*^9, 3.909936481017467*^9, 3.909991254378272*^9, 3.910005424673617*^9, 3.910456143107051*^9, 3.910647476573389*^9, 3.911433387460314*^9, 3.911728222756092*^9, 3.9118237070907784`*^9, 3.912544596386341*^9, 3.912962757486238*^9, 3.91332901505127*^9, 3.913585485561975*^9, 3.914191899559814*^9, 3.91452905381531*^9, 3.914864261401607*^9, 3.915353459292568*^9, 3.915612436883578*^9, 3.916243653217845*^9, 3.916581681635819*^9, 3.916758553791595*^9, 3.917042927532581*^9, 3.91779822205876*^9, 3.917830311292558*^9, 3.918163568568325*^9, 3.918587407268053*^9, 3.9190016728292847`*^9, 3.9195037040688963`*^9, 3.9198942834595957`*^9, 3.920234712218867*^9, 3.920662078423338*^9, 3.921093853155019*^9, 3.921237317218327*^9, 3.921696325797345*^9, 3.921851598339695*^9, 3.921851647511963*^9, {3.921851723783431*^9, 3.921851736631104*^9}, 3.921851789631633*^9, 3.922439881880352*^9, 3.922748366740074*^9, 3.923045431914585*^9, 3.923572464604835*^9, 3.923778956655144*^9, 3.924544421212076*^9, 3.925203572822671*^9, 3.925848169754739*^9, 3.925848217744079*^9, 3.926438083805722*^9, {3.9264381205815907`*^9, 3.9264381421853952`*^9}, 3.9268502289991503`*^9, 3.927388977392035*^9, 3.92757446555766*^9, 3.92782075468937*^9, 3.927990566625127*^9, 3.928273181747738*^9, 3.928273253177276*^9, 3.928445235964464*^9, 3.928879595108038*^9, 3.929093886948715*^9}, CellLabel-> "Out[656]=",ExpressionUUID->"7c797fc1-6b16-4ced-ad68-78db63cc2100"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{3.925848220471898*^9}, CellLabel-> "In[657]:=",ExpressionUUID->"9aab5b2a-ae2c-4df2-a982-81d9ac1f2cca"] }, WindowSize->{1234, 1257}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"14.0 for Mac OS X ARM (64-bit) (December 16, 2023)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[561, 20, 3145, 70, 157, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[CellGroupData[{ Cell[3731, 94, 3849, 86, 430, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[7583, 182, 24654, 521, 426, "Output",ExpressionUUID->"7c797fc1-6b16-4ced-ad68-78db63cc2100"] }, Open ]], Cell[32252, 706, 151, 3, 30, "Input",ExpressionUUID->"9aab5b2a-ae2c-4df2-a982-81d9ac1f2cca"] } ] *)