(* 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[ 37462, 914] NotebookOptionsPosition[ 36888, 896] NotebookOutlinePosition[ 37285, 912] CellTagsIndexPosition[ 37242, 909] 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[321]:=",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[328]:=",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:eJyN2Hl8DecaB/CxlVjqFK1rKUPt61Hl2jvoLW2VQ22x1EgupZYcSjfUVKmd sWvRzkUtTXGKJrRaU0WtNYg2Yht7RCJHUEls9+b5/eaP049+Prf/pN/P+77P +zzP+55zZlSJies2KL+iKLfzKUre3//9Z8zad71t3v+4va5rj3Eo4W9sR0fa 6CL2FdsPaz3FwQG01UNsTfeMeM4W2ob9RQ7QfcRmP9rtK7Y/pbXPI632F6un vPWw0fAgrMcg32hafQv5bqQtWEv25i/IeJyD+Q/Rq5F/T1qNR/7xtLZFrJ+g 7c2o5xFtwepHh1nfh5G2WiL/Y7SamSb536e1dLFb4zf6slgbR+tnxEq1I/Q5 sX3o73xMHP6TVuHAaw69Cft/6Xj1Yf/9tAJrlY7yPmwVBzvS7mqxXuEY64vH /nG0PRf73aANE/GHH+f6CWLr6SSuN8TOi7QKm6m00hv1tDrBcdj44YR3f9Gf En9wv7NYP9OzK1aLJrM/91D/NNqdgftzhrZm4z5MOcn9l0faXRZpG/an0Goi 7kvBFO53BPelAa2liMOTaKNAuuRT9xTjRYmDSX9jt4TYqXWaflZsHqWNZHG4 +hnm3/2G9Gs1rXYVu9m0myCfB+fgWa5PFKu3znH+OHFolMvx+fj8lD/PenKw fqTnfBJfXXyB/Wwh9g29yHxixf7Blzj+u9i+RLvTsL75ZbqxOBDruTbiFb8S kb8/6irz3SA2+9Nu4C+OFoe/pe3eYndyKn0T/S5wjfX2Rb970Xomvq/qpHG/ opi/5jrrh5Xq6Zw/AfMP09ZofH9ZGVw/Hvcn6wbzW4TPV8VMzh8j9i0NM59z 1/Ks7fLsw+dhRxb7WyicZ2v7LY5/nSn5X/S8TWwn3Ga9ncSBJnfo2WKtyJ/c f5bYbHiXvoTzSKb1y2Kndg5dWuaHa+TSC7PkPLvSVpSM+6rdY72ZuA9V7jP/ Oxckvy9pFQ5WeMh42WL/blorc1Hmt3vE8bJibaGSDqti/1v5YKWo2JiTH7YL ia2ZBWCjCOJNK8j1hTG/USH6APbf8ATjbRQHvi4Mu2vE2oQinJ8gNldHwVpI bLxXlOvjMV8txnymivVnizNetNgdWYLrB2H/xU9yvJHkZ6bRal3kX6Yk64FD Vz2XR38G+7j+abFavFTEeKCp53KYH1UatppjP38Zuhni13+a8WCnzjP0VfR/ oudU5PeAttLFbm5Z+pZYyf4H98/B+j0V6PvIb1dFxoN9w57l+CPMH1KJ7nIp z2FfZcaPERtzaWOKOLTd82yxv1gVxl+M8X5VOb5MrEx+ju6LfuSvxv6XirQ9 INJWadRfj1ZWSbzguuo837XYv2sNxtsoDnSuyfVbxXql2tx/MOKN9jwE/blJ W7ky342rw/jXxOb1uryfmZG2YPXteqw/C/sv9PwQ8UrV5/pHmF+iIfdPRn8H 0ror9rm0lYb6zvjZn5KXpZ7CjRgfDqTQWimxU7dxhJWetDsd9T+k7Vjcx6Mv cPxN3K97tIHz0AJNHm8V8833mnI8Rhw+SFuYb7z6T/odxP/C8zDc/1HNuD5T rIdp5VGq5PtSc+++Rtr+ixVFvu8DvzT3+i/jobIt2I9csW847Z4Wa4tpdblY X9CS42UkntqqFd1EbJi0Vge/L81bM7+GYn/xNsyntdieQavtsL7xi4zX8v+y dprWWkRahf2bNI53Eod7teV90tCPb2jrJbGvRztaFzsPaFvB7+n49nRlPE/m 0srreB5c9RL3i8Xzb9V/cb/xeP7tRKv4PVYOeuMTEb/yy6yvZqT1BXgefYW2 ZmH/FbSyBL/fFTsw/mbk87LnBDw/B2k7EfntoXXMd9p3ZLwUsX8pbaU+1mHt Fcbj8/A1WrmL5402r3L8BuJfodWueL4d9Br7VTbSai0838zqxH6UlechN4G2 akdarSPWir3OehqJ/Wdpu5Y4cKoz1+cTG4W60E+IrfwBxiuH59/aXXl/n0T8 rt04H9Y7v8H5D/A8fojWC2K/Kt25fw7eJ2/TbrH0CNuwM7qH9/mW+coKWrsn DuzuyfXMZ0kv7lcT+SzszfwaYP+3ojl/Bfp1mdbmYX2LPnTrx9rZRtvjxarb l+MnEb9oP9Z/Dv18gbYx7k6j3TmIf4bW7+C8U/oz33pit+4Ajg/G+9HDAd73 Jd6Hawz0ft/Qz+diOH8l4qmxPK/fcH86/Jv5JOHfG8oP4vr1eJ/KoN1xeL4u O5j9x30MpdFWebwfmUM4Ho9+lBzKeJ+g/lhaGYb3m6Zvc//BeL+ZQVvV8T7R eBj711LW2/2HRYyHp9JGbbHxxPDHW20r631TaKWZjFsFRjC/vni/mTTC+71H /Dojud9InE+3OPZzNT4/1YMc34N6s2ltK95XKo/m+Cbcvyxan4l6Xn6H42Nw X/bQhonPW/oY9n8p+rtzLOP/hH7Of5fzn8qIsFIK75M7Iu1eod02qPfJ9zmu o98xnvE+as+irYmIN+AD5j8X8abT7mKcX78PeZ7fI/63tJuA983J45h/JbwP bfScgveVXuMZP1ccjKfV+3g/WjeB46q8f6k1P/J+X8WBrnRgljjYeSIcGiPW qxiMFycOdfyY89eKtV9pM0vep5TgJNhf+Faew+0+4fra4tB12oyX+U7qZM4f L+P2D1N4Pt1vS76+T2HfmFsRDkxCvDm0kyD2XaTd9WJr4FT2q4vYmUnbb4iV BNrXN9LWaOy3ZRrz34v9Gk1nvLPY71Pa/gbro2fAweti8w86oEk9oaSZXP+8 WLk/i/lHYfy9Odz/MPIdM5f+Cv0cZbK+fWIjTPuzkU/cPPoO+pk2n+f/HOL/ uIDx2ondq7Ttl/n+kosYf7iM27Npc57YaLqY85PFTv8lcLjtnTwHNi1lParY rf8Zz7O92FE+Z39OipW6tJX/T9nvOO38gnjdljF+YRn33aO1qmKt+nKOLxT7 s+nAVrF6cAX3WyUOZn3h/X6Kzcwv2Z+mmD/SYv86iI1dtBUndq79h/PXYL82 K/l5OYr1T61ivefF7nbaf/WxtmJWs96dWL/1K36fXEG+p9Yw30yx0mct68lA /sm0L+qu9Ovjdcw3JHaOref6gtkRNguIw0e+Zj0HZH7o/XjWs0es3aWNJHGw yjfsb65YsWitrsQzK21gPg3Fdkfa31EcqrCRn6e5YusGHZ4SaccU+0ds4v5T Ef9n2rdUrGohrl8vdlPp4CTJz+/bzPknxXoLOrhbbM+hnTT0r8QW1rND4vkS aL1ejtRfdCvdRGy9QLs90N836fBI9Lfvd+z/MuTXIIHncxrxo2n7UqRN2MmX yPpT0c8k2jko+RoTtvG8fsd5HNnO+MfRvxzamI7+vf49z2MF+neI1hPFhvoD z7eDOHiLNkeI9b07vPNV8v4GPvuR83vlyvlm0P6xYsv+ifN3ifWhO1lvhlgt ZbN/Fe5J/Zdps5zYiv2Z+XUU68V3Mf58rP+OVgejv/1/4fo1Ml/bTFvfif1T dvN8GonD9fewf7rYVfZyfdn70s+HtD42X95fe82vrHeKWL1Ha/1kvdFlH+OP Fger7md9OyRf513aPB5pC1a/OMB6Bj2Sfow6yPN7F/PLHeL5fy82d9GhnQ+k nmcOc/4RsbGIDrky3//UETh5L+qZS9urlAhPg9VLtP9tqScU49A5yC+RtsrI /GCxo9w/LOP+rXSRiog39RjcrLVYm3wcTn1R7ORPYj7RyOcEXeQD3LfuJ+Ds RWLfA9pYj3g1f4ffTxTr1f7g+s3Y/zDt7EO8u/S2w2J3bDLP5zzquU0rmciv 40m6qPTPvEnrjcWhGyn8fmmQP++vXzvN/UeJ1dJnOP8zcWgePcQSB1ucZf2u 2JlDr7uJeBfpYJbYHngOXlq4gPRjugv3bi9W+p3n/RwnNjZcYH065te7yP73 F2s9abWP2JxwifcnSWyv9XxMHPrwMvNbhXhH6OA8xMuh98Ujn5VXmO9Ksf8Q vW0J9lOvsl+7sN+rtHsB+d+i/Ylit0Mqz2M/9ltOJ7cvKP0rfw2ulYH94q55 31cyHhiexvteXuymeX5eHBx6nf1sKtZbpbO+LmLbpKe9gXglM3i/54lDsbS1 DPnoN/j9cF5sRmVyfQ7iNaa3PVmo7X8BlKdT8A== "]]}}, TagBox[ {Opacity[0.], PointBox[{{3.8835072*^9, 172503.}}]}, Annotation[#, {{Callout}, Charting`Private`Tag$624101, { 500}}]& ]}, {{{}, {{}, 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.883741875*^9, 172503.}], Offset[{8., 0.}, {3.883741875*^9, 172503.}], Offset[{10., 0.}, {3.883741875*^9, 172503.}], Offset[{12., 0.}, {3.883741875*^9, 172503.}], Offset[{12., 0.}, {3.883741875*^9, 172503.}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{3., 0.}, {3.883741875*^9, 172503.}], Offset[{8., 0.}, {3.883741875*^9, 172503.}], Offset[{10., 0.}, {3.883741875*^9, 172503.}], Offset[{12., 0.}, {3.883741875*^9, 172503.}], Offset[{12., 0.}, {3.883741875*^9, 172503.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{48., 6.0000000000000036`}, {3.883741875*^9, 172503.}], Offset[{48., -5.9999999999999964`}, {3.883741875*^9, 172503.}], Offset[{12., -6.0000000000000036`}, {3.883741875*^9, 172503.}], Offset[{12., 5.9999999999999964`}, {3.883741875*^9, 172503.}]}]}, {RGBColor[0.6666666666666666, 0.6666666666666666, 0.6666666666666666], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"172503\"\>", 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.883741875*^9, 172503.}], 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", "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[1.6]], Directive[ RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], Directive[ RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], Directive[ RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[1.6]], Directive[ RGBColor[0.528488, 0.470624, 0.701351], AbsoluteThickness[1.6]], Directive[ RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[1.6]], Directive[ RGBColor[0.363898, 0.618501, 0.782349], AbsoluteThickness[1.6]], Directive[ RGBColor[1, 0.75, 0], AbsoluteThickness[1.6]], Directive[ RGBColor[0.647624, 0.37816, 0.614037], AbsoluteThickness[1.6]], Directive[ RGBColor[0.571589, 0.586483, 0.], AbsoluteThickness[1.6]], Directive[ RGBColor[0.915, 0.3325, 0.2125], AbsoluteThickness[1.6]], Directive[ RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], AbsoluteThickness[1.6]], Directive[ RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142], AbsoluteThickness[1.6]], Directive[ RGBColor[0.736782672705901, 0.358, 0.5030266573755369], AbsoluteThickness[1.6]], Directive[ RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], AbsoluteThickness[1.6]]}, "DomainPadding" -> Scaled[0.02], "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], "AllowMicroRanges" -> {True, False}, "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: Wed 25 Jan 2023 03:15:59 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.8835072*^9}, {0, 172503.}}, 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, 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}, CellLabel-> "Out[330]=",ExpressionUUID->"38be56fe-cd14-4945-9604-6cfc904b2191"] }, Open ]] }, WindowSize->{1234, 1257}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, FrontEndVersion->"13.2 for Mac OS X ARM (64-bit) (November 18, 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, 30247, 729, 426, "Output",ExpressionUUID->"38be56fe-cd14-4945-9604-6cfc904b2191"] }, Open ]] } ] *)