(* 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[ 38180, 905] NotebookOptionsPosition[ 37610, 887] NotebookOutlinePosition[ 38003, 903] CellTagsIndexPosition[ 37960, 900] 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.8671870324202747`*^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.8671913041596727`*^9}, { 3.867191352877194*^9, 3.8671913561827507`*^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.8909097713956842`*^9, 3.890909773446272*^9}, {3.89765774638717*^9, 3.8976577472230463`*^9}, { 3.898379436246955*^9, 3.898379440050661*^9}}, CellLabel->"In[1]:=",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[{"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.8671865652072144`*^9, 3.867186567959504*^9}, { 3.8671866556947737`*^9, 3.867186670522201*^9}, {3.867186775392453*^9, 3.867186776891725*^9}, 3.867186837903651*^9, {3.867186904930146*^9, 3.867186940968878*^9}, {3.8671872869760838`*^9, 3.867187304612606*^9}, { 3.867187379649686*^9, 3.867187384392969*^9}, {3.8671874248081408`*^9, 3.867187425393301*^9}, {3.8671874629428263`*^9, 3.867187467876066*^9}, { 3.8671875851202183`*^9, 3.8671875923328257`*^9}, {3.867190421572784*^9, 3.867190455350173*^9}, {3.867191170483214*^9, 3.867191170658471*^9}, { 3.8671912032969103`*^9, 3.867191245177144*^9}, {3.867443579626745*^9, 3.867443615991692*^9}, {3.867445864801002*^9, 3.867445865695055*^9}, { 3.8675854619929047`*^9, 3.867585470469511*^9}}, NumberMarks->False, CellLabel->"In[8]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ 0.0055000000000000005`], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJyN2HmcTXUfB/BjbDNju6EU4ihLljhSstZBD1NZrrKNJYd57OIS5bHUSdaI o8SU7TzINpabNKNSTqIUcjE0ZDkYjGHMNbaZsT3N5/s5f9xeer2e/mh6v36/ 3/f3/X5/v3vvOVXrP/K1AVGKojT4618Ff//6x5y9+1Krgv9wu1/SH+Bg8j/Y iY+02Qn2lfhVrHeDA31puytsz/Qs8UJf0Y5Yi/6N7glbvWm3F+xMo/XPI632 gdU/vfVis8EesdFf8o2n1UGS70baFutp3vxPsh7kQNReeqXk341WkyT/JFr/ CjYO085mqec+bYvVd/exvvGRtptL/gdpNTsT+d+h9cuwW/N3+hysT6CNE7BS fT99Cnb2/pMPwuGbtCr2vxqiN8n+y0JefbL/r7Qi1qsc4H3YAgfiaHclbFQ6 yPqSZP+RtDNX9rtCm5bEH36I6yfB9sOpXG/CoRdpVWxl0EoPqafFYY6Lze8O e/dX+lPqD+53UtbP8uzCamwa+3Nb6p9Bux/K/TlB2x/JfZh6lPsvjrS7KNKO WDtGqylyX4oc43775b7Up/VjcHgybRa+jHzq/sl4MXAg9R/sloJDTx2nH4et A7SZBodrnGD+Xa6gXytptTPs5tJuMj4PoT0nuT4FVq+d4vwJcHCUy/GP5fNT 8TTryZP1IzwXQnx1wRn2sxnsG3KW+STA2sB0jh+BnXTanSHrm56jG8H+BM+1 JV7J8xH5azEXmO8G2OpDu/6/OR4Of0k7PWB3SgZ9Vfpd+CLr7SX97k4b2fJ9 VSeT+8XK/FWXWL9YqXGZ8yfJ/H20PVq+v+wsrp8o9yfnCvP7VD5flbM5fwzs Swwzn1MXC6zv8OyTz8O2HPa3aLjA9jfXOL4uG/mf9bwVdpKvs972sP+5G/RH sB59k/vPhq0Gt+h0OY802jgHh2rn0eUwP1wzn56fg/PsTNsxGPdVv816s+U+ VLvD/G+cQX7LaFUcqHSP8XJhbSetlz+L+a3vc7wCrM9XLotVWBtUSKzEwuac KLFTFLZnFRab0RJvRhGuLy7zGxalf5P9NxRjvI2wf11xsbsK1idFc34ybK2M EetB2HwnluuTZL5agvlMh43HSzJePOyOKMX1A2T/BaU53hD5WZm0WlfyL1+G 9YiDFzxXlP4M9HH9w7BasmzEuL+x58dkfkw5sd1U9tPK000k/tMPM544VOcR +oL0/z3PGZLfXdq+DLv5FehrsJL7KPfPk/W7KtF3JL8dlRlP7Bv2OMfvy/zB VehO6QUO+6oyfn/YnEubU+HgN54/grUS1Rh/gYz3foLji2BlypN0L+lHVHX2 v2yknb6RtstJ/fVoZQXiBdbU4Pmulv0712S8jbC/Yy2u3wIbVWpz/4ESb7Tn wdKfq7Sdj/nuyDqMfxG2LtXl/cyOtC1Wh9Zj/Tmy/3zP9yRe2ae5/r7ML9WA +6dJf/vRhgv7XNrOlPpOaOxPmXOop3hDxhf7j9F6WThUt1GElW60O1Pqv0c7 CXIfDzzL8Tfkft2mTTkP3f/cg63KfOudxhzvD4f30LbMN195nn5L4i/1PEzu /6gmXJ8NG2FauZ+BfF9q6t3XSDt/s6Lg+97/U1Ov/xgPVmjGfuTDvuG0exzW F9DqYtj4pDnHyyOe2qIF/RxsWrReR35fmrZkfg1greQLzKcl7HxIq61lfaMX Ga/5/2X9OK03i7Qq1jbpHG8Ph7u34n3SpR/rafsl2Ne1NW3Aobu0o8jv6cQ2 dFV5nsynlQ7yPLjiJe6XIM+/T/yL+02U59/2tCq/x8oeb/w9iV+1LeurFWnj E3kefZm2Z8v+S2hlofx+V27H+Jsln7aek+X5OUA7KZLfLtqQ+aE2cYx3DNYS aTvjgQ7rLzMen4cv0soted544RWOX5H452m1szzfDniV/aoQafUpeb6Z3Z79 qIDnITeZtmtHWq0D6yU6sJ6GsHaSdp6C/X925PpCsFm0E10MtqP8jPeYPP/W 7sz7W1rid36N88VGx9c5/648j++ljSKyX7Uu3D9P3iev026JyxF2xKHRXb3P N+YrS2j9Nuzf2Y3rmc/C7tyvluQzvwfzqy/7D4rn/CXSr3O0Pk/WN+tJt3yg Q1tpZyKsur04flTix/Zm/aekn8/Sjoy7M2h3jsQ/QRs35LyP9WG+9WC3bl+O D5T3o3t9ve9LeR+u2c/7fZN+Ptmf85dLPDWB5/W73J92/2Y+qfL/GyoO4Pq1 8j6VRbsT5Pm6wkD2X+5jMJO2K8r7kTWY40nSjzJDGO8DqT+BVobJ+03jodx/ oLzffEjbNeR9otEw9q851jt9hkWMh6fTZm3YLDb8wVZbYb1vKq00wbhd+E3m 10vebya/6f3eS/w6I7jfCDmf10aynyvl81MjwPFdUm8urW+R95Wqozm+Se5f Dm3MknravsXxMXJfdtGmJZ+3y2PY/0Tp7/axjP+D9PPjtzn/oawIK2XlfXJb pN3ztPuC1Ft6HMcN6Xd/z/I+6sym7fckXt//MP+5Em8m7S6Q8+s9nuf5rcT/ knaT5X1zygTmX0XehzZ6PibvK90nMn4+HEii1TvyfrRmEsdVvH+ptd71fl9h f2faPxsOdHxPHBwDG9VMxhsJB+Pe5/zVsP4LbeXgfUoJTBZrxa8VONz6A66v DQcv0VYS5ocypnD+RIw7303l+XS5jnx908S+Mdci7J8s8ebQoWTYd5Z218J2 v+nsVyc4NIt2XoeVZNrXK9L2aNnvqxnM/2fZr+FMxjsp+02jnfWyPv5DceAS bP1B+3XUE0ydxfXPwMqd2cw/RsbfmcP990m+Y+bSX0g/R1msbzdshmktV/IZ OY++If3M/Jjn/6TE//4TxmsNuxdoR8N8rcynjD8c485HtDUPNhsv4Pw0ONRn oTjc6kaB/ZsSWY8Ku09/xvNsA4eUz9mfo7BSl7ajbmK/Q3ToJ4n32iLGL45x 321afwLWayzm+HxYy6X9W2B1zxLutwIO5Cz1fj9hK3sZ+9NY5o+w2b92sLmD tkfCoYv/5fxVst8Ly/l5OSDrH1rBek/D7je0duGBtvuvZL3bZf2WL/h9cl7y /XMV882GlZ6rWU+W5J9G+2JuoV/vr2G+QTh0cC3XF8mNsFUYDu9fx3p+w/zg uCTWswvWb9FmKhyotp79zYcVm9brIp5VZQPzaQA7cbQWBwcrbeTnaS5sX6HD UyMdsmDtzU3cf7rE/5H2JcKqHuT6tbCbQQcmIz/Nt5nzj8JGMzqwE3bm0KFM 6V+pr1jPNsTzJdNGvTzUH7uFfg62n6XdrtLfN+jwCOlvr6/Z/0WSX/1kns9x iR9PO+mRtsShQimsP0P6mUqH9iBfc9JWntcROY/93zD+IelfHm3OlP51+Jbn sUT6t5c2UmBT/Y7n2w4OXKOtN2Hj523e+SoFf/2ffc/53fNxvlm0Nha2nR84 fwdsDNnOerNgtazD/lW6jfrP0dZjsJ3wI/OLg42SOxj/Y1n/Na0OlP72+Ynr V2G+vpm2v4a1qTt5Pg3h8NO72D8DdpWfub7CHfTzHm2MLVTw11n1C+udCqu3 ab031puddjP+aDjwxK+sbxvyDb1NW4cibYvVpb+xngH30Y9Re3h+b8v8x/by /L+FrR10cPtd1PPIPs7fD5uf0kEX87WH9ovTfpZ65tLOCiXCM8RqOq0NRT3B /iE6T/JLoe3ymB8ocYD7hzGubaGjK0u86QfFTVrC+pRD4owX4VBUKvOJl3wO 09H/kfvW5bA491PYd5c210q8WkfE41Jgo/ofXL9Z9t9Hh3ZLvFv01n2wOzaN 53Na6rlOK9mSX9xROhb9s67SRiM4eOUYv1/qRxX81fTj3H8UrJY7wfmfwcF5 9GAbDjQ7yfpdODSHXnNV4p2lAzmw0++UOLF4YfRjpivu0QZWep/m/ZwAmxvO sD5D5tc7y/73gfVutNoTtial8/6kws5qzwfh4PhzzG+FxNtPB+ZJvDx6d5Lk s/w8810Oa3vprQtlP/UC+7VD9nuFds9I/tdoLQV222XwPH6V/RbTaW2KoH8V L4qfypL9Rl70vq8w7h+eyfteEXYzPT8DB4ZcYj8bw0aLy6yvE+xY9IzXJV6Z LN7veXAwgbYXST7GFX4/nIatmGyuz5N4jeitpYsi3mY68XnY1cLcvy2s1L/K +VNhYzKdmwz77uWwP82LFfy1J15jfgZs1LjO7+d3YH8urX0Nu2/f4P5JcOAG baVIvKo32e8fJd5uWrsDh9veYv8bFMf5jMgVx82ClQp5PI8fYGc7vTsVDjS/ zfpejsb5pdNKAqym3GF+s2CzxF3GuxnpxANynifptHRY6XOP59MT/dKm0/5B sFP0Pj8/Q2G1J+2fBpsbaWs9rHdXsuBx6+DQYdo4K+fTpRD9JPpjvUtHt4PN zlHiwcPh4ATaCMB6Pr11O6zaRcRNfOhXsEpR8ZpnpX+/0OEOsH2V9vul/22L iRP7wlqAjp4AG5/TTSzY2umNB+W8rtAzVsHhR4uL3WWwe4mOPiL7z48Wmxcl fssYsVIa5+X3xYq1ZrA7h97aDg71KyHOGA8rs+lH35X7MLOkOLhFzv8EbX8L 69NKiXPPyH2KLy22YmJQzx90XHs4XKgM8+8Eq/Xo4PuxiG/S45bGtvofSZs0 EA== "]]}}, TagBox[ {Opacity[0.], PointBox[{{3.9004416*^9, 218063.}}]}, Annotation[#, {{Callout}, Charting`Private`Tag$7661, { 559}}]& ]}, {{{}, {{}, 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.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 8.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 10.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 12.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 12.}, {3.9004416*^9, 218645.0611500443}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{1.8369701987210297`*^-16, 3.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 8.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 10.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 12.}, {3.9004416*^9, 218645.0611500443}], Offset[{4.898587196589413*^-16, 12.}, {3.9004416*^9, 218645.0611500443}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{18., 24.000000000000004`}, {3.9004416*^9, 218645.0611500443}], Offset[{18., 12.000000000000004`}, {3.9004416*^9, 218645.0611500443}], Offset[{-18., 11.999999999999996`}, {3.9004416*^9, 218645.0611500443}], Offset[{-18., 23.999999999999996`}, {3.9004416*^9, 218645.0611500443}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"218063\"\>", 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, 18.}, \ {3.9004416*^9, 218645.0611500443}], 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.7552896*^9, FormBox[ StyleBox["\"2019\"", 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.818448*^9, FormBox[ StyleBox["\"2021\"", 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.88152*^9, FormBox[ StyleBox["\"2023\"", 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.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7288512*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7341216*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.739392*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7447488*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7500192*^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.7552896*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7603872*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7656576*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.770928*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7762848*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7815552*^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.7920096*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.79728*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8025504*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8079072*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8131776*^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.818448*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8235456*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.828816*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8340864*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8394432*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8447136*^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.8550816*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.860352*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8656224*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8709792*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8762496*^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.88152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8866176*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.891888*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8971584*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9025152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9077856*^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.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { Rational[1, 72], 0}, Directive[]}, {3.7552896*^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.818448*^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.88152*^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.7237536*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7288512*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7341216*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.739392*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7447488*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7500192*^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.7552896*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7603872*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7656576*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.770928*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7762848*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.7815552*^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.7920096*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.79728*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8025504*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8079072*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8131776*^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.818448*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8235456*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.828816*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8340864*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8394432*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8447136*^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.8550816*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.860352*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8656224*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8709792*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8762496*^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.88152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8866176*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.891888*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.8971584*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9025152*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.9077856*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}, {3.913056*^9, FormBox[ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], { 0.009722222222222222, 0.}, Directive[]}}}}], GridLines->FrontEndValueCache[{Charting`ScaledTickValues[ ((Transpose[{#, Table[ Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], { Length[#]}]}]& )[ Part[ Select[ Charting`DateTicksFunction[Automatic, DateTicksFormat -> {Automatic}][ SlotSequence[1]], And[ FreeQ[#, Alternatives["", Spacer[{0, 0}]]], Head[#] === List, Length[#] > 0]& ], All, 1]]& )[ SlotSequence[1]], {Identity, Identity}]& , Automatic}, {{{3.7237536*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.7552896*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.7868256*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.818448*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.849984*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.88152*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}, {3.913056*^9, Directive[ GrayLevel[0.4], Opacity[0.5], AbsoluteThickness[1.], AbsoluteDashing[{1., 2.}]]}}, 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", "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ 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: Fri 8 Sep 2023 17:14:32 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9004416*^9}, {0, 218063.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.04217390500005444]}, { Scaled[0.02], Scaled[0.09598870824776704]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->{ 3.867186551570758*^9, {3.867186680772122*^9, 3.867186699782072*^9}, 3.867186777935874*^9, 3.86718694202357*^9, 3.8671870510449877`*^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.8671908750350323`*^9}, 3.867191085771729*^9, { 3.8671911399270573`*^9, 3.867191174532995*^9}, {3.867191217100472*^9, 3.867191249934973*^9}, {3.867191282486545*^9, 3.867191309118765*^9}, 3.8671913628847427`*^9, {3.8671913975749493`*^9, 3.8671914178619823`*^9}, 3.867191469212702*^9, 3.867191534117766*^9, {3.867191566041802*^9, 3.867191590853747*^9}, {3.867191700666916*^9, 3.8671917705466948`*^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.8685235167256823`*^9, 3.86906681078651*^9, 3.8693089287119427`*^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.8716416309599857`*^9, 3.871642275253429*^9, 3.871899229411577*^9, 3.8720932523644876`*^9, 3.8724283947882633`*^9, 3.8729292766301403`*^9, 3.8736608832707767`*^9, 3.874069338302347*^9, 3.874325909186389*^9, 3.874696457503956*^9, 3.8748618953441896`*^9, 3.875050962875978*^9, 3.8752651909751873`*^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.8836053597837353`*^9, 3.883843869256338*^9, 3.883866592728613*^9, 3.883867143448183*^9, 3.884153915891087*^9, 3.884641124197339*^9, 3.8847734015597982`*^9, 3.8847751656070967`*^9, 3.88477566967144*^9, 3.885548303427269*^9, 3.8858311230281477`*^9, 3.886191584864834*^9, 3.886621436378044*^9, 3.886855243870946*^9, 3.8871063081130733`*^9, 3.887235622274569*^9, 3.8874988606495256`*^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.8909081861102667`*^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.8931723751025543`*^9, 3.89362060069613*^9, 3.893686053639799*^9, 3.89397203764882*^9, 3.894751203039884*^9, 3.895084844111672*^9, 3.895439490125032*^9, 3.8955263216939163`*^9, 3.895657784061549*^9, 3.8957448599055853`*^9, 3.895931247787265*^9, 3.896013566564756*^9, 3.896095386373332*^9, 3.8965191786429*^9, 3.8968936313937263`*^9, 3.897216178858164*^9, 3.897657754621402*^9, 3.897926194231195*^9, 3.8983794149994497`*^9, 3.8983794476037083`*^9, 3.8984342923172283`*^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.9030252059821978`*^9}, 3.903174150401764*^9, 3.903182074275147*^9}, CellLabel->"Out[10]=",ExpressionUUID->"5ab5b80d-43ac-430d-8f29-a0583d8c993a"] }, Open ]] }, WindowSize->{1234, 1257}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"13.1 for Mac OS X x86 (64-bit) (June 21, 2022)", 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, 2906, 66, 157, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[CellGroupData[{ Cell[3492, 90, 3318, 73, 409, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[6813, 165, 30781, 719, 427, "Output",ExpressionUUID->"5ab5b80d-43ac-430d-8f29-a0583d8c993a"] }, Open ]] } ] *)