(* 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[ 31103, 764] NotebookOptionsPosition[ 30530, 746] NotebookOutlinePosition[ 30926, 762] CellTagsIndexPosition[ 30883, 759] 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", "]"}], "]"}], "]"}], ",", "Right", ",", " ", 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}}, CellLabel-> "In[163]:=",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[170]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, {{{}, {}, {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.007333333333333334], AbsoluteThickness[1.6], LineBox[CompressedData[" 1:eJyN2HucTeUaB/BlEOOSndQcl1gUGkOWI45LtKgTldij0ISsZo7p4jKbdDkh K5ncBjskJbVOpDTFjmmklJVQGbIw1Ri3VW5jzJjdSObics48v9/6Y/WZPp/T P9P3877v8z7P875777W0Tk4bOjZGUZTtNRSl6u///jMzvjvbr+p/3BFn9Woc yf4L20l+m0PEgfrfw/pwcWgMbQ0TW3M9I56zkbZhre4u+hFxeBTtjhTbr9D6 m36ro8XqIW89bHbOgY1k5JtEq48j33W0Bet53vwlxdU5FLObXo38h9NqJvLP pPWNYuNH2t6Aeq7SFqy+uIf1veC31Rv576fVkkLJ/xKtF4nddj/QJ8X6VNo4 IlZu2UsfE9u7/8r7xdE/aBUO3u/Q67H/O45XH/b/nlZgveU+3ocscWgg7a4W G833s75M7J9G24uw3znaDCP++ANcP11s3ZDL9abYuZNW4XABrTyMeu74keOw +cWP3v1Ffxr+zP2OYv18z65YrZfH/lSi/jm0Ow/35whtLcB9SD/I/d/y213h tw1r+bS6CfelVj7324v7chut54ujM2mzZpHkk3CI8WLFody/sNtQ7Nx6mL5J HN5Hm3niaNsjzP+hc9Kv1bSaKHbLaDdbPg9OzlGu3yRWzx/j/KniyCSX44vx +Wn2C+spx/qJnmtIfHXZr+xnL3HgyePMJ0WspZ7g+E9i+wTtzsH6nifpruJg iud4xGtwype/Fnua+X4sDo+m3eCfnCSOfkLbD4vdWQX0b+h3zTOsdyT6PYI2 SvB91aGQ+9XD/DVnWT+stC3i/OmYv4e2JuP7yyrm+mm4P6XnmN9r+Hy1KOH8 KeLA8ijzOXamyvo2zwF8HraUsr+1o1W2Np/n+Iclkv9xz5+J7ezfWe8gcbDb BXqBWK/7B/fPEIc7X6RP4DzyaOOk2Ikvp6+X+dF2FfTSUjnPRNqKlfHALZWs twT3ofUl5n/hV8nvHVqFQ82vMF6ZWNtO602Oy/z+VzkeJ9aXKkWwKtYerwEr 9cTmwhjYri225teEzbqIN6cW19fB/C616V3Y/+NrGG+dOPhhHdhdI9an1+X8 bHF4dSysR8Tmc/W4PhPz1frMZ7bYuKkB4yWJ3YkNuX4s9l92Lce7SH7hQlpN QP5NGrEeOHLaczP0JzXA9TeI1QaNfePB7p6bYn7s9bDVE/tpTegeiN/pBsaD nQ430qfR/xmeC5DfZdoqErsVcfR5sVL2N+5fjvU7mtOXkN+2FowHB8bdxPGr mP9ES3rIiSpHA60YP1lsLqLNdHFks+cFYq1+a8ZfhvFRbTi+QqzMupkeiX7E 3ML+N/bbHuO3dT3q70grqyRe6IO2PN/3sX9iO8ZbJw4Obs/1WWKjZTz3T0W8 yZ6fQH9+o60Kme+mdWD8M+Lw2QTezxK/LVh9qiPrL8X+Sz1fQbzGnbj+KuY3 7Mz989Dfx2jDFQdc2ipEfUc09qfRSamnThfGh4P5tN5Y7CR09VkZTrtzUf8V 2k7Bfdx3O8cfxf2qpE2chx7sVr1VzA8/153jyeJoDm1hvnnfP+inEf9tz+Nw /yf14PoSsRGllasFku/dPb376rf9JyuKfN8Hv+np9V/GI3G92I8KcWA87R4W 68to9S2xsaQ3x5tIPPWOO+huYjNM6x3w+9KzD/PrLNYa9GU+fcT2PFrtj/Vd 72S83v+X9cO03stvFdbW6xwfJI6O6Mf7pKMfH9HW3eLAsP60IXYu07aC39Np d9Gt8DxZQSsP4Hlw1d3cLwXPv23+yf2m4fl3EK3i91jJ8cZnIH6re1hfe7+N JXgevZe2MrD/Slp5Hb/fLQYw/gbkc4/nbDw/h2h7E/LbQRuY79w1kPHyxdpy 2iqo1lH9Xsbj8/AZWrmI542+93H8HOKfotVEPN+OvZ/9ivNbvRXPNxmD2I84 eR5ys2kr3m+1g1iv/wDr6SLWjtL2reLgocFcX0Ns1h5CXyO2YoKM1xTPv/GJ vL/XIn7iUM6HjcEPcv5lPI/vpo1a2K/1Q9y/HO+Tv9Nu/SKfbdiZPMz7fMt8 ZSWtV4qD24dzPfN5fQT3a498lj7M/G7D/o8ncf5K9Oskrb+K9b0eoftUa+cz 2p4mVt2RHD+I+PVGsf5j6OfttI1xdw7tLkT8I7RxAeedP5r5dhS7CWM4nor3 oytjvO9LvA+3e8z7fUM/b07m/HcRT03hef2A+zPgX8wnF//e0Gws16/F+1Qx 7U7F83VcKvuP+xgppK1meD8KP8HxTPSj0ZOM9zLqT6GVcXi/6f4U90/F+808 2mqL94mu49i/3rLeHj3ONx6dTZvxYvOa8dVb7SfrA+m00kPGrZoTmN9IvN/M nOD93iN+h4ncbyLOZ2ga+7kan5+2IY7vQL1ltJ6F95VWkzm+HvevlDbmo557 nub4FNyXHbQZxuetaAr7vxz93foM43+Ffi5+lvOvK/ZZaYz3yS1+u6doty/q vfZ5jhvod7JnvI/aGbQ1A/HG/Jv5L0K8ubS7DOc36gWe5+eI/wntZuN9c9ZU 5t8S70PrPOfjfWXENMavEIcyafUS3o8+mM5xVd6/1PYver+v4mAiHcwQhwbP gCNTxEZrk/HSxJGBL3H++2L9WzpcKu9TSmgmrNU5X+Vo/5e5Pl4cOUuHM2W+ UzCL86fJuP1FOs/nod8l38ArcGDKeZ+DMxFvIe1kiwPHaXet2HpsNvs1ROzM p+0HxUo2HRjptzUZ+22cw/x3Yr8ucxnvKPZ7hbY/wvqkeXDorDj8Mx3UpZ5I 7nyu/7tYuZTB/GMx/txC7r8H+U5ZRL+Hfk4Ks77vxGaU1sqQT9qr9AX0s3Ax z/9mxP9yCeP1F7unaVuT+Vqj1xh/vIzbC+jwq2Kz+zLOzxM7o1+Ho/0uVDm4 fjnrUcVupzd4nneJHeVN9uegWEmgrZg/ZL8DtPMN4g1dwfh1ZDxQSettxHrb tzi+VKyV0cEssZqzkvutEodK3/Z+P8XhknfYn+6YP9Fi/waIzW20lSZ2zvyH 89dgv77v8vOyD+uvW8V6fxG7m2ntdLW2klez3q1Yn/Uev09OId9Da5hviVh5 5H3WU4z88+hA7EXp10sfMN+I2Nm/lutrlfkcrimO7v2Q9eyS+ZHnM1nPDrF+ kTZzxaHWH7G/FWLFovUEiRdu+THz6Sy2B9LaQHGk+Tp+nhaJrXN0NN1vJyzW Jqzn/rMR/2s6sFys6hGuXyt2C+jQTMlPC2zg/INioxcd2i62F9JOIfrXcCPr 2SLxAtm00bFc6q+XRXcTW7fT7jD091E6OhH9Hfkp+78C+d2WzfM5jPhJtH3C 7zDs1NjE+gvQz1zayZF8zemf8bx+wnns3cz4B9C/ctqci/498DnPYyX6t5s2 NolN9Que7wBx6DwdniA2dm7xzlep+ht840vOH1Eh51tMa8+ILfsrzt8mNp7c ynqLxWpjm/1rXin1n6TDTcVWytfMb6DYaLCN8Rdj/ae0mor+jv6G69fIfH0D bX0q1tK383y6iKOddrB/hthVdnJ93CXp5xXaeKZG1V97zbesN12sVtL6KFlv DvmO8SeLQ22+Z31bJF/nWTp8wG8LVt/exXrGXpV+TMrh+T2L+U138/w/F4e3 0ZGtl6WeG/dw/l6x+RodcWW+dt1eOG8n6llE26sUn+fA6glae0rqiSQ7dDny 20RbTWR+qP4+7h+VcS2LrtsC8Wbvh3v0EeuzDsAFd4qdmFzmk6T0+y8CZYS1 "]]}}, TagBox[ {Opacity[0.], PointBox[{{3.8692512*^9, 133944.}}]}, Annotation[#, {{Callout}, Charting`Private`Tag$235872, { 452}}]& ]}, {{{}, {{}, GraphicsGroupBox[{ {RGBColor[0.87, 0.94, 1], AbsoluteThickness[4], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]], CapForm["Butt"], JoinForm[ "Round"], BSplineCurveBox[{ Offset[{3., 0.}, {3.86946421875*^9, 133944.}], Offset[{8., 0.}, {3.86946421875*^9, 133944.}], Offset[{10., 0.}, {3.86946421875*^9, 133944.}], Offset[{12., 0.}, {3.86946421875*^9, 133944.}], Offset[{12., 0.}, {3.86946421875*^9, 133944.}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{3., 0.}, {3.86946421875*^9, 133944.}], Offset[{8., 0.}, {3.86946421875*^9, 133944.}], Offset[{10., 0.}, {3.86946421875*^9, 133944.}], Offset[{12., 0.}, {3.86946421875*^9, 133944.}], Offset[{12., 0.}, {3.86946421875*^9, 133944.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{48., 6.0000000000000036`}, {3.86946421875*^9, 133944.}], Offset[{48., -5.9999999999999964`}, {3.86946421875*^9, 133944.}], Offset[{12., -6.0000000000000036`}, {3.86946421875*^9, 133944.}], Offset[{12., 5.9999999999999964`}, {3.86946421875*^9, 133944.}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"133944\"\>", 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[{30., 0.}, {3.86946421875*^9, 133944.}], 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.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.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.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[]}}}}], 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.}]]}}, 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 12 Aug 2022 16:02:08 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.8692512*^9}, {0, 145627.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { 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.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}, CellLabel-> "Out[172]=",ExpressionUUID->"698cd76a-d0cd-42f5-b85f-9b09dee3c51f"] }, Open ]] }, WindowSize->{1055, 911}, WindowMargins->{{Automatic, 334}, {Automatic, 148}}, FrontEndVersion->"13.1 for Mac OS X ARM (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, 2713, 64, 157, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[CellGroupData[{ Cell[3299, 88, 3323, 74, 409, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[6625, 164, 23889, 579, 427, "Output",ExpressionUUID->"698cd76a-d0cd-42f5-b85f-9b09dee3c51f"] }, Open ]] } ] *)