(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] NotebookDataLength[ 34761, 755] NotebookOptionsPosition[ 33891, 730] NotebookOutlinePosition[ 34319, 747] CellTagsIndexPosition[ 34276, 744] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData["\[IndentingNewLine]"], "Input", CellChangeTimes->{3.9838230626051273`*^9}, CellLabel->"In[1]:=",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SetDirectory", "[", RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"(*", RowBox[{"Buttons", " ", "to", " ", RowBox[{"hide", "/", "show"}], " ", "code"}], "*)"}], RowBox[{ RowBox[{ RowBox[{"CloseAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "False"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\n", RowBox[{ RowBox[{ RowBox[{ RowBox[{"OpenAllInputsCells", "[", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"nb", ",", "cells"}], "}"}], ",", RowBox[{ RowBox[{"nb", "=", RowBox[{"EvaluationNotebook", "[", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"cells", "=", RowBox[{"Cells", "[", RowBox[{"nb", ",", RowBox[{"CellStyle", "->", "\"\\""}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SetOptions", "[", RowBox[{"#", ",", RowBox[{"CellOpen", "->", "True"}]}], "]"}], "&"}], "/@", "cells"}], ";"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\n", RowBox[{"Row", "[", RowBox[{"{", RowBox[{ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"CloseAllInputsCells", "[", "]"}], "]"}]}], "]"}], ",", RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"SelectionEvaluate", "[", RowBox[{"OpenAllInputsCells", "[", "]"}], "]"}]}], "]"}]}], "}"}], "]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{"Import", "[", "\"\\"", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"graphtitle", "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "graphsubtitle", " ", "=", " ", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"data", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "]"}], ",", RowBox[{ "#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], "}"}], "&"}], ")"}], "/@", "data"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"lastitem", "=", RowBox[{"Callout", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], ",", RowBox[{"ToString", "[", RowBox[{ RowBox[{"Last", "[", "data", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], ",", "Left", ",", " ", RowBox[{"LabelStyle", "->", "Small"}], ",", " ", RowBox[{"Background", "->", "LightBlue"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"data", "[", RowBox[{"[", RowBox[{"Length", "[", "data", "]"}], "]"}], "]"}], "=", "lastitem"}], ";"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.867182545948308*^9, 3.867182555077017*^9}, { 3.8671856323646584`*^9, 3.867185655249*^9}, 3.867187032420275*^9, { 3.867187218478177*^9, 3.867187234045384*^9}, {3.867187352932571*^9, 3.867187371829939*^9}, {3.8671903940899982`*^9, 3.8671904257542353`*^9}, 3.867190458276375*^9, {3.867190733940156*^9, 3.867190734419613*^9}, { 3.867190798905361*^9, 3.86719081289338*^9}, {3.867190843782461*^9, 3.867190868878964*^9}, {3.867191008084812*^9, 3.867191008823593*^9}, { 3.867191045756618*^9, 3.86719109928176*^9}, {3.867191132601091*^9, 3.867191153305139*^9}, {3.867191256528245*^9, 3.867191304159674*^9}, { 3.867191352877194*^9, 3.867191356182763*^9}, {3.867191386467814*^9, 3.867191411094434*^9}, {3.867191451576531*^9, 3.867191464669776*^9}, { 3.867191517397131*^9, 3.867191585673174*^9}, {3.867191623805966*^9, 3.867191637345644*^9}, {3.867191694067857*^9, 3.867191832972144*^9}, { 3.867443529594183*^9, 3.867443565893339*^9}, {3.867445761749815*^9, 3.86744582007928*^9}, {3.867445877108981*^9, 3.867445877563551*^9}, { 3.88987554010293*^9, 3.889875542354431*^9}, {3.890909771395684*^9, 3.890909773446272*^9}, {3.89765774638717*^9, 3.897657747223047*^9}, { 3.898379436246955*^9, 3.898379440050661*^9}, {3.90338401735606*^9, 3.9033840200448112`*^9}, {3.906908185436775*^9, 3.9069081879516287`*^9}, { 3.925848183308426*^9, 3.925848185881434*^9}, {3.926438108465784*^9, 3.92643813766343*^9}, {3.928879584090178*^9, 3.928879587280989*^9}, { 3.9293606429237022`*^9, 3.929360645945132*^9}, {3.931376802792758*^9, 3.931376805515088*^9}, {3.954598230829558*^9, 3.954598269603718*^9}, { 3.96136444466888*^9, 3.961364449285103*^9}, {3.961420570214137*^9, 3.961420572598192*^9}, {3.972758024916869*^9, 3.972758025765842*^9}}, CellLabel->"In[2]:=",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5"], Cell[BoxData[ TemplateBox[{ ButtonBox["\"Hide Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`CloseAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"], ButtonBox["\"Show Code\"", ButtonFunction :> SelectionEvaluate[ $CellContext`OpenAllInputsCells[]], Appearance -> Automatic, Evaluator -> Automatic, Method -> "Preemptive"]}, "RowDefault"]], "Output", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmVkYGCwBGJTnleO+TPfOt4KnMGWNuutY0OEoMIBIB2Z5ZHlPPut o+r6oy59QFrpsbPnmjlvHUs6t75LnvvWcYllgyLHvLeODwT3S/wF0mZf/AT0 Frx1nCa27W48kE6wc7/cBaQ7A9Yd81/41vFZJw//EiC9bPtU1VtA+oLb1u/q i946btuj4Ci5+K3jN9VFqZVA+u7bA/pyS946CnilSJ0A0lOfbA1WWPrWMdBb 1b4ESDu9f/zhBJB+mCO1kHv5W0cTtvdZLCveOpbrCTKYAGkfraBTR4D0KusV XJwr3zqKSK72NAHS67d0h68G0tvucu67veqtI9tZlwn1q986nunnesS65q3j OUm/gCYgve1lv2fIWmA4lJT6XQPSK56mSHetA5r7eNXmz0B6TuST3aXrgfp1 Nq64suGto8G6igOzNr111JFnfWq7+a3jppt3fgpteev4v4ztRjaQnsAx+4bZ NqC6DxNdhLe/dTz159qdLiD9ZCHTyYgdQHtl/Xw2A+k0z1yP2J1vHe/N6Sti 2wUUPx94dQ2QbhK2c3m8+62j3Oo9fNF73jpOWbbVR3HvW0eLiZenbQLSC3eL ZlwH0gBmBvMF "], CellLabel->"Out[5]=",ExpressionUUID->"0186d530-485d-4272-afb1-fa1274c66bbe"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"graph", "=", RowBox[{"DateListPlot", "[", RowBox[{"data", "\[IndentingNewLine]", ",", RowBox[{"Filling", "->", "Axis"}], "\[IndentingNewLine]", ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{"Unique", " ", "domains"}], "]"}], ",", "None"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"HoldForm", "[", "Year", "]"}], ",", "None"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"FrameTicks", "->", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"All", ",", "All"}], "}"}], ",", "Automatic"}], "}"}]}], "\[IndentingNewLine]", ",", " ", RowBox[{"GridLines", "->", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Join", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"{", "x", "}"}], "]"}], ",", "Thick"}], "}"}], ",", RowBox[{"{", RowBox[{"x", ",", "2017", ",", "2027"}], "}"}]}], "]"}], ",", RowBox[{"DateRange", "[", RowBox[{ RowBox[{"{", "2017", "}"}], ",", RowBox[{"{", "2027", "}"}], ",", "\"\\""}], "]"}]}], "]"}], "\[IndentingNewLine]", ",", " ", RowBox[{"Join", "[", RowBox[{ RowBox[{"Range", "[", RowBox[{"0", ",", "300000", ",", "10000"}], "]"}], ",", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"#", ",", "Thick"}], "}"}], "&"}], "/@", RowBox[{"Range", "[", RowBox[{"0", ",", "300000", ",", "50000"}], "]"}]}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"ImageMargins", "\[Rule]", "20"}], "\[IndentingNewLine]", ",", RowBox[{"ImageSize", " ", "->", " ", "Large"}], "\[IndentingNewLine]", ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", RowBox[{"GrayLevel", "[", "0", "]"}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotLabel", " ", "->", " ", "\[IndentingNewLine]", RowBox[{"Column", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Style", "[", RowBox[{"graphtitle", ",", "16", ",", "Bold"}], "]"}], "\[IndentingNewLine]", ",", RowBox[{"Style", "[", RowBox[{"graphsubtitle", ",", "12", ",", "Bold"}], "]"}], "\[IndentingNewLine]", ",", RowBox[{"Style", "[", RowBox[{ RowBox[{"\"\\"", "<>", RowBox[{"DateString", "[", RowBox[{"TimeZone", "->", "\"\\""}], "]"}], " ", "<>", " ", "\"\< UTC\>\""}], ",", "12"}], "]"}]}], "\[IndentingNewLine]", "}"}], "\[IndentingNewLine]", ",", "Center"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotRange", "->", RowBox[{"{", RowBox[{"Automatic", ",", RowBox[{"{", RowBox[{"0", ",", "Automatic"}], "}"}]}], "}"}]}], "\[IndentingNewLine]", ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Export", "[", RowBox[{ RowBox[{ RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"ToLowerCase", "[", "graphtitle", "]"}], ",", RowBox[{"\"\< \>\"", "->", "\"\<_\>\""}]}], "]"}], "<>", " ", "\"\<.png\>\""}], ",", " ", "graph"}], "]"}], ";"}], "\[IndentingNewLine]", "graph"}], "Input", CellOpen->False, CellChangeTimes->{{3.867186565207215*^9, 3.867186567959504*^9}, { 3.867186655694774*^9, 3.867186670522201*^9}, {3.867186775392453*^9, 3.867186776891725*^9}, 3.867186837903651*^9, {3.867186904930146*^9, 3.867186940968878*^9}, {3.867187286976087*^9, 3.867187304612606*^9}, { 3.867187379649686*^9, 3.867187384392969*^9}, {3.8671874248081408`*^9, 3.867187425393301*^9}, {3.867187462942827*^9, 3.867187467876066*^9}, { 3.867187585120219*^9, 3.867187592332826*^9}, {3.867190421572784*^9, 3.867190455350173*^9}, {3.867191170483214*^9, 3.867191170658471*^9}, { 3.867191203296914*^9, 3.867191245177144*^9}, {3.867443579626745*^9, 3.867443615991692*^9}, {3.867445864801002*^9, 3.867445865695055*^9}, { 3.867585461992905*^9, 3.867585470469511*^9}, {3.904556674711198*^9, 3.90455667849632*^9}, {3.9218516314196*^9, 3.921851639595783*^9}, { 3.92185167067825*^9, 3.9218517351487503`*^9}, 3.9218517880751457`*^9, { 3.955049104125002*^9, 3.9550491107858753`*^9}, {3.955724397073245*^9, 3.955724433737275*^9}, {3.955724625452713*^9, 3.955724669412251*^9}, { 3.956329876096713*^9, 3.9563299103616667`*^9}, {3.956329970680182*^9, 3.9563299964577503`*^9}, {3.956330107899218*^9, 3.95633011499457*^9}, { 3.956330149847582*^9, 3.956330152663987*^9}, {3.95660104472755*^9, 3.956601064036846*^9}, {3.956601094494957*^9, 3.956601107665969*^9}, { 3.956601171882221*^9, 3.956601200199129*^9}, {3.956601252613394*^9, 3.9566012593755283`*^9}, {3.956601299500546*^9, 3.956601381489203*^9}}, NumberMarks->False, CellLabel->"In[12]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt2/d3FdXaB/ChJzSPiFJEGBSkw1BEOgN4KYpwQKQjA7k0pRwQEWmOSK8D RAggOgKXFsoRY4iIMmILgnJASugjNZSQAwgk1PfN8/2ed61zF671/gHjL9zP 2u3Zz95nSubu8v1HdB6QW1GU+PyKkvPv//5nzkm90iLnf7jdruiPcTD5H+z0 iLbZUewrtBvWu4oDfWn7TbE9M2L0F/qKdmAt5je6p9jqTbu9xM40Wl8WbbWP WD0eaQ+btfbARn/E24NWByHezbQN62mR+osyHudA7r30asTflVYTEX8irX8l Ng7RzlbM5xFtw+qk3zm/cdG2GyP+A7SaeVniv0/rV8Xui3/Q58X6eNo4KVYq 7KNPi529/+QD4vBtWoX9r4XoLRj/81Bkfhh/N63Aetn93A9J4kBb2l0tNp49 wPklYvwRtDMf412jTQv9D/2T7SeK7acPsr0pDjWnVdhKp5XumE+TQyyHzW8P RfYv8lPkCMc7hfazI3bFasE05uce5j+Ddmdh/5yk7bnYD1OPcvxPo+0uj7YD a8dodRv2S95jHG8f9ktNWj8mDk+mzTxXJZ5qx9lfrDhw8B/sFhGHKp+gnxNb +2kzTRyueJLxd7km+VpNq53EbhbtJsvvIbTnFNtvE6s3T7P+eHFwpMvyhfj9 lP6L88lG++ER55L+1cVnmM9GYt+Qs4wnTqwNPMfyw2LnHO3OQPuG5+m6Yn9c xFXQX+ELUfFrsRcZ7yax1Yd2/f/lHuLwl7TTXexOSaevI995LnG+vZDvbrSR ietV1cscryDqr7nC+cNKxausPxH1f6ftUbh+2RlsPwH758Y1xvcJfl9lMll/ tNiXEGY8py/lWN8VsQ+/hx03mN984Rzb39xk+YZMif9sxCliJ/lvzre92P/S LXquWI+5zfHniK1ad+hzWI802jgvDlXJpp+S+uEX79LxN2Q9O9F2rJT7Ktzj fDOxH8rfZ/y3zkh8n9MqHHj2IfvLEms/0Xrxs1K/5SOWlxDr8cpVWBVrg3LB SkGxOS837OQT27PzwGYM+puRl+0LoH7tfPRvGH9Tfva3WezfUAB214j1iTGs nyy2VsfCelBsvl+Q7RNRXy3EeKaLjecKs78eYnd4EbYfgPEXF2V5bYnPukyr 1RB/8Sc4Hzh4MeLSyM9AH9s/LVYLF4sq99ePuBTqxz4F2w0xnlacboD+azzN /uBQ1Wfoi8j/hxGnI74HtH1V7N4tQd8UK1klOX422v/8LH0f8e0qw/5g3zvP sfwR6g8uS3c8l+Owrxz77y8259PmVHHwm4jnirVC5dn/YpT3fp7ly8XKlBfo XshH7grMf7FoO32jbT+F+VenlVXSX2BdRa7vWozf6UX2t1ns71CJ7ZPERtkq HH8g+hsV8WDk5zpt35X67oiq7P+S2LpSjfszM9o2rL5dnfO/gfHjI36I/orV YPtHqF+kFsdPQ3770YYr9rm0fRnzO6kxP0+cl/kUqM3+Yf8xWi8mDlWrG2Wl K+3OxPwf0k4c9uP+eix/C/vrHm1iPXT/S4+3ivrW+/VZ3l8c3kPbqG+++jL9 Lvr/LOJ3sP9HNmD7TLERppVH6RLvKw0j+zXazn9ZUeR67/+xYST/Uh4s0Yj5 uCv2DaXdE2J9Ma1+KjYWNWZ5celPbdKEfklsWrReFfeXhk0ZXy2xVrgZ42kq dmbRaku0r9uc/TX+f1k/QeuNoq3C2had5e3F4W4tuJ905GMjbb8i9r3ZkjbE oQe0o+B+OqEVXQ7Pk3dp5XU8D656hePF4fn3+X9xvAl4/m1Pq7gfK3si5R+i /3KtOb9K0TYW4Xm0HW3PwfgraGUJ7t9l2rD/rYindcTJeH4O0M42xPczbaB+ qFVb9ndMrCXQdvpjHdbbsT8+D1+ilTt43mj2Ksuvof8LtNoJz7cDXmO+SkRb rYznmzntmY8S8jzkJtN2lWirVcV6odc5n9pi7RTtVBb7j3dg+1xiM19HOr/Y zu1nf6Xw/FulE/dvUfTfqTPrw0aHN1j/AZ7H99JGXoxXvgvHz8b75N+0W+hq lB04NOrNyO9b6israP2e2P9TV7ZnPEu6cbxKiCe+O+OrifEH9WD9FcjXeVpf gPaNetJNH+tQCu1MEKtuL5YfRf8Fe3P+p5HPerSDcncG7c5D/ydp4xbW+1gf xltd7Fbry/KBeD962DdyvcT78Iv9Ivc35POF/qy/Ev2pcVyvP7B/2vyb8RzE 3xtKD2D79XifyqDd8Xi+LjGQ+cd+DF6m7dJ4P7IGszwR+XhiCPv7GPOPo5V3 8H5T/22OPxDvN7NouyLeJ+q+w/w1lvZOn3eiysPTabOK2Mw/9PFWW0h731Ra aSDldp5hjK8X3m8mD4vc79F/1eEcbzjWp/MI5nM1fj8VAyz/GfPNovUkvK+U G8XyLdh/N2hjNubT+l2Wj8Z++Zk2Lfzero5m/hOQ353vsf/vkc+FY1j/yYwo K8XwPrkj2u4F2m2G+RYdy3ID+e4fMd5HnTm0/SH66/sB45+P/mbS7mKsX+9x XM/t6P9L2k3G++aU8Yy/LN6HNkd8DO8r3Saw/7viQCKt3sf70bqJLFfl/Uut NClyfxX7O9H+OeJAhw/h4GixUd5kfyPEwbYfsf5asf4rbd2Q9yklMBnWCtzM cbjlx2xfRRy8QluJUj+UPoX1J0i58+1Urk+XvyVe3zTYN/pmlP2T0d88OpQs 9p2l3fViu9905qujODSbdt4QK8m0r1e07VEY76sZjP8XjFd7Jvs7hfGm0c5G tO8xCw5cEVtHaL8u8wkenM32dcTK/TmMPxbl78/j+L8j3tHz6f8gnyMtzi9V bIZpLQvxjFhA30I+Ly/k+r+A/r9bxP5ait2LtKNJfe2JT9j/UCl35tLWArFZ fzHrp4lDfZbA4Ra3cuzfksD5qGK3xlKuZytxSFnG/BwVK9VoO/dtGe9POvQj +uu8nP0XkHLfPVp/XqxX/JTl8WIti/YnidU9KzjeKnHgxmeR+6fYyvyc+amP +sNt5q+N2NxF2yPEoUtfsP4ajNdsJX8v+9H+yVWc719i9xtau/hY2/1Xc747 0T7pP7yeXEC8x9cw3kyx0nMt55OB+NNoX+wdyddH6xhvUBw6sJ7t82ZF2coj Du/bwPn8JvWDYxM5n5/F+h3aPCgOlN/I/N4VKzatV5P+rLKbGE8tsdOW1tqK g89u5u9pvti+RoenRjtkibVhWzj+dPT/A+1LEKt6kO3Xi910OjBZ4tN8W1n/ qNhoRAd+Ejvz6NBl5K/IV5zPDunPl0wb1bNl/gWT6JfEdj3afRP5fYsOD0d+ e33N/C9HfDWTuT4n0H8P2jkXbQsO5drG+acjnwfp0B6J15yYwvU6jPXY9w37 /xP5y6bNmcjf69u5HiuQv720sU1sqt9yfduIAzdpa5jY+GVHZH2VnH/9S79j /W53ZX0zaO09se18z/q7xMaQnZxvhlgt5jB/z96T+Z+nrVJiO+4HxtdWbBTe xf4Xov3XtDoQ+e3zI9uvkfr6Vtr+WqxN/YnrU1scrvEz82eIXeUXti9xX/L5 kDbey5Xzr7PmV853qli9R+u9pb3ZMZX9jxIHnt/N+e2QeENjaOvPaNuw+tlv nM+AR5KPkXu4fmNQv9Rerv92sbWLDu58IPN55nfW3yc2P6GDrtTXntwHp/2C +cynnVVKlGfA6jlae1vmE+wforMR3zbaLi71A4X2c/ywlGtJdEwZ9Df9ANyg qVif8iec3lwcyn2Q8fRAPIfomA+w37ocgrM+Efse0OZ69FfpMDx2m9iocITt t2L83+lQKvq7Q6f8LnbfS+P6/IX5/E0rmYiv7VG6oOTPuk4bdcXBa8d4famZ O+dfTT/B8UeK1adOsv5ScXABPdgWBxqd4vxdcWgeve46+jtLB26InX6n4YQC eSQfM124eyux0vsv7s/xYnPTGc7PQP3qZ5n/PmK9K632FFsTz3H/HBQ7ayM+ IA6OO8/4VqG/fXRgAfrLplMTEc/KC4x3pVjbS6cswXjqReZrF8Z7lXbPIP6b tLZN7LZJ53rsxnif0mmt8kr+Sl+CK2dgvBGXItcrKfcPvcz9XlrsXo64jjgw 5ArzWV9sNLnK+XUUOxY94w3090QG9/cCcTCOtpcjHuMarw9/ia3YTLbPRn91 6ZSi+aS/rXTCy2JXC3P81mKl5nXWnyo2JtNZyWLfwxvMT+P8Of/aE24yPkNs VPyb1+f3xf4sWvta7I65xfETxYFbtLUN/ZW7zXz/gP5Sae2+ONz6DvNfq4Cs z/AsuO1ssVIim+vxvdjZSaceFAca3+P82sXI+p2jlTixuu0+45stNgs9YH+3 o52wH+t5ik47J1b6POT69JR8adNp/yCxk+8Rfz9vi9WetH+a2NxMWxvFejcl Qzx2gzh0iDbOYn265KJfkPxYk+iYNmKzU2548FBxcDxtBMT6XTplp1i188IN fJKvYNl88Lp6yN+vdPh1sX2d9vuR/9b54YS+Yi1Ax4wXG8voBpbY+ilSHsR6 XaNnrBGHSxaA3c/F7hU65jDGj4+BzUvov2ksrBSV9fL7CsJaI7E7j05pIw71 KwSnjxMrc+iSk7AfZhaGg0lY/5O0vV2sTysCZ53BfupRFLZiY2U+R+i27cXh XE8w/o5itTod/Kig9G/SYz8TuwdpFfMPLH2a8cNKyWfgkIPfu0O7q3E/al6C 8SaLzSG0bzHuR01KwqkrxMq3tI37n3aejjkkDs8tBaeFxcH6pVk+SO5XrkGP nSi2Y5+FnQRxqC7dYJ3Y2EqnnsDzQ/4yzMcZ3P+O0t1x/wtMfo71O4ntjbR/ CO5vh+mUD3A/W1+W+UsW+yuX4344gPvlBNo6j/YfqByvFq7vf9BqB9w/2pfn fpkkDo+hlVli9Qu6wTzcv0Y/T2P+gVTaWiv2D6/A/dMO+btKhz4S+0pUZD6m Iz8LX+T6bBCbjSsxvn1i/RzdIF2szK3Mch/mn1SF8X4qdutU5fg/IJ/HaTUd +UurxvVtLPPxd6vO/MWJ7Uk12D5VbFSqyXiHo/142pgnNivU4vxOiZUxGn+/ Sci3TacmI99la3M/V8L97zo9Y5nY/qkO69fB9fWHulz/HeJgfD3GWwz3m6Yv sXwg7i+++ox/E+5XZ2lrD66fRV5mvDH4vbgR932o5/xTrwF/T5PFau+GXJ9l YjdvI+7/gvL8GviYDvQTW2Zjlr8sVh/Rrl9s+5vy+lsbz5srmzG+NMSzuzn3 Yyfsj7DO6/MW/H5+bMH5Fcb+dlpy/deKjeatuD67sV6L6MFqnihXHojnI+sV znc6no/O0yW343ls3r84fjaevwq3Zj7qynqps+lUPK+6ddtw/tfw+97aJnL9 xv46QbvlEM/RttyPAcRzuB3XYxTqf/gq85OAeA7S+o/Yn5Vf4/7G86a6n44p hf3VsT3n1xD76/nXuX9m4v7+Pq0sxfPbHjrhV7GZ2oH5LI7npTYdWa7jfj6S DncQB5bTJTvjeeEVP9drEvbzLnrdZ3h+a9GJ69MIz5c7O0Xux3geadaZ8Q4V axfpwa9F259H3ketxm9wP34v72PqdlpXpNws2oX5fUGsb6PtLmK70JvMx2C8 3xq0PURsJNF6O7ET05W/9wHicJ2Ih4rVPrS2OtrWWsTzZdfI9U/s07pxPb8U B6bQ+g6M3607y0+jP6UHxzssdtfRwRfl/VZ/QBvdxcbdnvQGvA+P7cV8LcH7 8B1a3SQO/Nab+/lLsfZuH46XiP5W0O4csdr6Lc7XEftK9eV8UxBPK9r+Vmwv 6RtV34k3uJ5rxP6n+nE+yxBf036R36s4OIgOWGJ3AW2MwXgXaKWbOPTv/uy/ KOI/S9up2D9F4lh/PfI7J+ItWJ++/+Z8E7A+X9HButgvdQawv15oX2sg87cC +636IK7nLew3k1YUiUc5RGtlEF+VwYz3Hvo7QDsTMN9xQxjPF6i/9222f1Wu 1/7P32H5cly/nxvK31cBuR7ro2i3LK7fS4exfbw4uHg490N+/D3hCt02Fu/7 i0awvLLYahLg/qiB57XzdMpQ/P0hZSTXZ4rYLjyK878h4xlfj4qsD+4Pb73L fPnx94f8o3n9GIf7xVQ6BX/vMLq/x+vPLDyPVBsDN3iE55H1dMxG3D8mvM/7 De73TsexjOcang/+oM3muH7e+oD5x/OpNnoc+8+N69sNOqUc3kczxzP+RXL/ VTImMF8ZuF+3mMjr6Rt4P9hJd7+J94OFk+C0gfI8HnjyQ/6eNuD53qK1wvL8 rW2ng7XxfN7f5HyXis2/6JR35Xlcn/UR71+zC0k+YiZzfSoUlv760N3rFZH5 HafTqxWV/PT8mD4jNqfQgWbSPriZzvpR2us1pjB/W2R8+yNajZHxrS5TOV6s WP2TDo8W+9ZMYz5ssR6ite/EdoXp7O8g+rtDp94Wm7/N4PgPxMG/6XBxidf+ dSbH18TWsln8PTcXm8Nmw5UHikPxc7hfKsr8rKZzmd+lYtM3j/snWxxsRKsF JF+WO5/xzMb3q3oW83dI7BZYQOeT70l6bzo8Dd+jai3k/E20P0IbcfgeZy7i 72me2Lgfz/2YjL9nZ3/C+Ori79MvLOb+KSbWV9JOR/y9+jbt8u/Vny/h+JXw 99bdSyL3V/y9tm0Cy6+j/19o+zsZX//XUpYn4/tDy2Xs35TvW85i2pmL72vN l7P+InyvG0IH0/G9cMGnLM/A97mGK7g+VaQ/8wwdWC62T3/GfNYRh/PbjK+p tPf3os0j+J44lVbxPVav+QXbD5PvtfZk2ngd33uP0EqsWMu1ks4v9j+MOBnf jzuvYv/PXM9x4B4dmi/WVq/m77+7tLeyaHeMONz+P8zHQvT/Ba22w/fSG2sY Xwfsl8y1zO8sfM8tvY71f8D+20UrxfD9NIN2n8L8S6xnvpug/09ofwb+/8Pf bWC+N4jdAYlsP0jqB87R9h/4Phy3keWK5D/80ibmNzfWL4m2uon1Pps530R8 Pz1OW6Pl+5/Rcwv3+3R8X0wMcrxhWO/xW9l/EPupwlec/6ti+w5t3EV87ZMY 3zfIR5lktn8S+y+TNiyxNWwb42uD/aunsDwG35fjaT++l9tNv2F/g6XcuECb /fG9f/52rtf3iM/9lvmdJNb67uB+qYb8FfiO6zcG40+j1XqYb5AON0N55PwR //u/cv7nnVfyzivB3nklae+dV/LOK0m5d15J4vfOK0W+f4u980reeSWUe+eV ouydV8J6eeeVGJ93XinH3nkl77wS5uOdV5J4vfNKzJ93Xkny4Z1XYrl3XknG 884rsT/vvJKsj3deifPxzitJ/rzzSlxf77yS5NM7r8R8e+eVJD7vvBLtnVeS +LzzSsy3d15J5uedV+L/38U7ryT5984rsb53XknW0zuvxPreeSWZv3deifnx zitJf955JZZ755Vy7J1X8s4roX/vvJLE451XYn/eeaUce+eVvPNK6M87ryTj e+eVOL/HnFf6H/0m1xI= "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1lPQGIYSBtA/tm3btq3GttHYDRrbdhrbtm2nsW00xj25eTiz+/zNLBI1 alepbeCAgIBAlAnyu5YO8rsvRUlKUJxiFKUIhSlEQQqQn3zkJQ+5yUVOcpCd bGQlC5nJREYykJ50pCUNqUlFSlKQnGQkJQmJSURCEhCfeMQlDrGJRUxiEJ1o RCUKkYlERCIQnnCEJQyhCUVIQhCcYAQlCIF/ZUUAPwX4g+984ytf+MwnPvKB /3jPO97yhte84iUveM4znvKExzziIQ+4zz3ucofb3OImN7jONa5yhX+5zCUu coHznOMsZzjNKU5yguMc4yhHOMwhDnKA/exjL3vYzS52soPtbGMrW9jMJjay gfWsYy1rWM0qVrKC5SxjKUtYzCIWsoD5zGMuc/iH2cxiJjOYzjSmMoXJTGIi ExjPOMYyhtGMYiQjGM4whjKEwQxiIAPoTz/60oe/6U0vetKDv+hON7rShc50 oiMdaE87fg1hG1rzJ61oSQua04ymNKExjWhIA+pTj7rUoTa1qEkNqlONqlSh MpWoSAXK8wflKEsZSlOKkpSgOMUoShEKU4iCFCA/+chLHnKTi5zkIDvZyEoW MpOJjGQgPelISxpSk4qUpCA5yUhKEhKTiIQkID7xiEscYhOLmMQgOtGIShQi E4mIRCA84QhLGEITipCEIDjBCEoQAhOIAH5amj/4zje+8oXPfOIjH/iP97zj LW94zSte8oLnPOMpT3jMIx7ygPvc4y53uM0tbnKD61zjKlf4l8tc4iIXOM85 znKG05ziJCc4zjGOcoTDHOIgB9jPPvayh93sYic72M42trKFzWxiIxtYzzrW sobVrGIlK1jOMpayhMUsYiELmM885jKHf5jNLGYyg+lMYypTmMwkJjKB8Yxj LGMYzShGMoLhDGMoQxjMIAYygP70oy99+Jve9KInPfiL7nSjK13oTCc60oH2 tKMtbWjNn7SiJS1oTjOa0oTGNKIhDahPPepSh9rUoiY1qE41qlKFylSiIhUo zx+UoyxlKE0pSlKC4hSjKEUoTCEKUoD85CMvechNLnKSg+xkIytZyEwmMpKB 9KQjLWlITSpSkoLkJCMpSUhMIhKSgPjEIy5xiE0sYhKD6EQjKlGITCQiEoHw hCMsYQhNKEISguAEIyhBCEygQL8fp5/KD77zja984TOf+MgH/uM973jLG17z ipe84DnPeMoTHvOIhzzgPve4yx1uc4ub3OA617jKFf7lMpe4yAXOc46znOE0 pzjJCY5zjKMc4TCHOMgB9rOPvexhN7vYyQ62s42tbGEzm9jIBtazjrWsYTWr WMkKlrOMpSxhMYtYyALmM4+5zOEfZjOLmcxgOtOYyhQmM4mJTGA84xjLGEYz ipGMYDjDGMoQBjOIgQygP/3oSx/+pje96EkP/qI73ehKFzrTiY50oD3taEsb WvMnrWhJC5rTjKY0oTGNaEgD6lOPutShNrWoSQ2qU42qVKEylahIBcrzB+Uo SxlKU4qSlKA4xShKEQpTiIIUID/5yEsecpOLnOQgO9nIShYyk4mMZCA96UhL GlKTipSkIDnJSEoSEpOIhCQgPvGISxxiE4uYxCA60YhKFCITiYhEIDzhCEsY QhOKkIQgOMEIGvD/l//X2Q/4H6Yqj5k= "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl11OwGIYSANAb27Zt27aTxrbtxrZtO2mcNrZt27bfybyPM7vfO7NK1Kh9 5XaBAgICSgUJCPgTAyMNCEowghOCkIQiNGEISzjCE4GIRCIyUYhKNKITg5jE IjZxiEs84pOAhCQiMUlISjKSk4KUpCI1aUhLOtKTgYxkIjNZyEo2spODnOQi N3nISz7yU4CCFKIwRShKMYpTgpJ/akRpylCWcpSnAhWpRGWqUJVqVKcGf1GT WtSmDnWpR30a0JBGNKYJTWlGc1rQkla0pg1taUd7OtCRTnSmC13pRnd60JNe 9KYPffmbfvRnAAMZxGCGMJRhDGcEIxnFaMYwlnGMZwITmcRkpjCVaUxnBjOZ xWzmMJd5zGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnA/+wkU1sZgtb2cZ2dvAv /7GTXexmD3vZx34OcJBDHOYIRznGcU5wklOc5gxnOcd5LnCRS1zmCle5xnVu cJNb3OYOd7nHfR7wkEc85glPecZzXvCSV7zmDW95x3s+8JFPfOYLX/nGd37w k1/85k/zByIwQQhKMIITgpCEIjRhCEs4whOBiEQiMlGISjSiE4OYxCI2cYhL POKTgIQkIjFJSEoykpOClKQiNWlISzrSk4GMZCIzWchKNrKTg5zkIjd5yEs+ 8lOAghSiMEUoSjGKU4KSlKI0ZShLOcpTgYpUojJVqEo1qlODv6hJLWpTh7rU oz4NaEgjGtOEpjSjOS1oSSta04a2/Bne7elARzrRmS50pRvd6UFPetGbPvTl b/rRnwEMZBCDGcJQhjGcEYxkFKMZw1jGMZ4JTGQSk5nCVKYxnRnMZBazmcNc 5jGfBSxkEYtZwlKWsZwVrGQVq1nDWtaxng38w0Y2sZktbGUb29nBv/zHTnax mz3sZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGb O9zlHvd5wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+8Zs/ iz8QgQlCUIIRnBCEJBShCUNYwhGeCEQkEpGJQlSiEZ0YxCQWsYlDXOIRnwQk JBGJSUJSkpGcFKQkFalJQ1rSkZ4MZCQTmclCVrKRnRzkJBe5yUNe8pGfAhSk EIUpQlGKUZwSlKQUpSlDWcpRngpUpBKVqUJVqlGdGvxFTWpRmzrUpR71aUBD GtGYJjSlGc1pQUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGbPvTlb/rRnwEM ZBCDGcJQhjGcEYxkFKMZw1jGMZ4JTGQSk5nCVKYxnRnMZBazmcNc5jGfBSxk EYtZwlKWsZwVrGQVq1nDWtaxng38w0Y2sZktbGUb29nBv/zHTnaxmz3sZR/7 OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFNbnGbO9zlHvd5 wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+8Zs/R38gAhOE oAQjOCEISShCE4awhCM8EYhIJCIThahEIzoxiEksYhOHuMQjPglISCISk4Sk JCM5KUhJKlKThrSkIz0ZyEgmMpOFrGQjOznISS5yk4e85CM/BShIIQpThKIU ozglKBnk/z/S/wBM1476 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1684]}, Annotation[#, {{Callout}, Charting`Private`Tag, {841}}]& ]}], {{{}, {{}, GraphicsGroupBox[{ {LightDarkSwitched[ RGBColor[0.87, 0.94, 1]], AbsoluteThickness[4], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]], CapForm["Butt"], JoinForm[ "Round"], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.990976120125*^9, 82927.}], Offset[{-8., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-10., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-12., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-12., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.990976120125*^9, 82927.}], Offset[{-8., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-10., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-12., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], Offset[{-12., 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, { 3.990976120125*^9, 82927.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.990976120125*^9, 82927.}], Offset[{-43., -5.500000000000003}, {3.990976120125*^9, 82927.}], Offset[{-43., 5.499999999999997}, {3.990976120125*^9, 82927.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"82927\"\>", BoxRotation->0.], StripOnInput->False, LineColor->GrayLevel[0], LineOpacity->1, FrontFaceColor->GrayLevel[0], BackFaceColor->GrayLevel[0], FrontFaceOpacity->1, BackFaceOpacity->1, GraphicsColor->GrayLevel[0], Opacity->1, FontSize->Small, FontColor->GrayLevel[0], FontOpacity->1], Offset[{-27.5, 9.797174393178826*^-16}, {3.990976120125*^9, 82927.}], NCache[ImageScaled[{Rational[1, 2], Rational[1, 2]}], ImageScaled[{0.5, 0.5}]]]}]}}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, False}, AxesLabel->{None, None}, AxesOrigin->{3.729024*^9, 0}, DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{True, True}, {True, True}}, FrameLabel->{{ FormBox[ TagBox[ TagBox[ RowBox[{"Unique", " ", "domains"}], HoldForm], HoldForm], TraditionalForm], None}, { FormBox[ TagBox[ TagBox["Year", HoldForm], HoldForm], TraditionalForm], None}}, FrameStyle->Automatic, FrameTicks->{{All, All}, { Charting`DateTicksFunction[Automatic, DateTicksFormat -> {Automatic}], Charting`DateTicksFunction[ Automatic, DateTicksFormat -> {Automatic}, "TickLabels" -> None]}}, GridLines->{{{3.6922176*^9, Thickness[Large]}, {3.7237536*^9, Thickness[Large]}, {3.7552896*^9, Thickness[Large]}, {3.7868256*^9, Thickness[Large]}, {3.818448*^9, Thickness[Large]}, {3.849984*^9, Thickness[Large]}, {3.88152*^9, Thickness[Large]}, {3.913056*^9, Thickness[Large]}, {3.9446784*^9, Thickness[Large]}, {3.9762144*^9, Thickness[Large]}, {4.0077504*^9, Thickness[Large]}, 3.6922176*^9, 3.6999936*^9, 3.707856*^9, 3.7158048*^9, 3.7237536*^9, 3.7315296*^9, 3.739392*^9, 3.7473408*^9, 3.7552896*^9, 3.7630656*^9, 3.770928*^9, 3.7788768*^9, 3.7868256*^9, 3.794688*^9, 3.8025504*^9, 3.8104992*^9, 3.818448*^9, 3.826224*^9, 3.8340864*^9, 3.8420352*^9, 3.849984*^9, 3.85776*^9, 3.8656224*^9, 3.8735712*^9, 3.88152*^9, 3.889296*^9, 3.8971584*^9, 3.9051072*^9, 3.913056*^9, 3.9209184*^9, 3.9287808*^9, 3.9367296*^9, 3.9446784*^9, 3.9524544*^9, 3.9603168*^9, 3.9682656*^9, 3.9762144*^9, 3.9839904*^9, 3.9918528*^9, 3.9998016*^9, 4.0077504*^9}, { 0, 10000, 20000, 30000, 40000, 50000, 60000, 70000, 80000, 90000, 100000, 110000, 120000, 130000, 140000, 150000, 160000, 170000, 180000, 190000, 200000, 210000, 220000, 230000, 240000, 250000, 260000, 270000, 280000, 290000, 300000, {0, Thickness[Large]}, {50000, Thickness[Large]}, {100000, Thickness[Large]}, {150000, Thickness[Large]}, {200000, Thickness[Large]}, {250000, Thickness[Large]}, {300000, Thickness[Large]}}}, GridLinesStyle->Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], ImageMargins->20, ImagePadding->{{All, All}, {All, All}}, ImageSize->Large, LabelStyle->{ GrayLevel[0]}, Method->{ "NoShowPlotTheme" -> "Detailed", "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "DefaultPlotStyle" -> { Directive[ RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Directive[ RGBColor[0.95, 0.627, 0.1425], AbsoluteThickness[2]], Directive[ RGBColor[0.455, 0.7, 0.21], AbsoluteThickness[2]], Directive[ RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[2]], Directive[ RGBColor[0.578, 0.51, 0.85], AbsoluteThickness[2]], Directive[ RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[2]], Directive[ RGBColor[0., 0.6, 0.6], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.36, 0.684], AbsoluteThickness[2]], Directive[ RGBColor[0.56, 0.7, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.54, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.585, 0.5976, 0.9], AbsoluteThickness[2]], Directive[ RGBColor[0.9, 0.45, 0.45], AbsoluteThickness[2]], Directive[ RGBColor[0.7632186717367254, 0.8174402144034898, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.8554632469481959, 0.24885384718327969`, 0.8334053873948551], AbsoluteThickness[2]], Directive[ RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], "AllowMicroRanges" -> {True, False}, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> "CurrentSet", "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (DateString[ Identity[#], "DateShort"]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotInteractivity:>True, PlotLabel->FormBox[ TagBox[ GridBox[{{ StyleBox[ "\"Hosts file size history\"", 16, Bold, StripOnInput -> False]}, { StyleBox[ "\"base version: (adware + malware) only\"", 12, Bold, StripOnInput -> False]}, { StyleBox[ "\"updated: Tue 30 Jun 2026 22:01:38 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9917664*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->CompressedData[" 1:eJwNz00owwEYx/HJNrFozUsh4qBlyiTZCT02slqjTZuSA1mMtIjymjjKgYOV ldhMhtn+bTZsCDEzjvO+UjRFnlJECXkOvz7X3ze3xaDSxbBYrAJaluMg79aM kMD4voQWhHm+ENIXEQIRu26AfLWdi7OtCOJXfUaQPJz0q3OWEDKjoopeck7z /BYkf3i1Zt4ywoLpo4NtQ5D601gl5JNCGzoix5j1hPgVBIuIkZeQn5Jp7RoZ a5Xu3a0iVCp1U6NrCGFJ0QPHjlCuUteNk/mpJnn9OkIkcVB5SQ616TMnHAje Fqf7neT7eDt9ToT7QY8tzCC8cEb2TS6EmePCaJkbofhD8C3YQGhl8647SdHv /nWpF4FrcMqSNxGaq/4iE6SqK+60YQuhf0CrcJN2T3dN0zZCaPakh+ujv9Wa CzspkBplj36EFOYsqXEHgR3wK3J3qX/jxugit4d17VfkP2+ZuTM= "], CellLabel->"Out[14]=",ExpressionUUID->"187ed9df-a448-487d-9a0f-7fa761f6259b"] }, Open ]] }, WindowSize->{1280.25, 878.25}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification:>1.25 Inherited, FrontEndVersion->"15.0 for Mac OS X ARM (64-bit) (May 19, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[554, 20, 167, 2, 62, "Input",ExpressionUUID->"4758e301-de41-43dc-8b9d-10592e1aa6bd"], Cell[CellGroupData[{ Cell[746, 26, 5536, 130, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6285, 158, 1179, 22, 53, "Output",ExpressionUUID->"0186d530-485d-4272-afb1-fa1274c66bbe"] }, Open ]], Cell[CellGroupData[{ Cell[7501, 185, 5482, 117, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[12986, 304, 20889, 423, 546, "Output",ExpressionUUID->"187ed9df-a448-487d-9a0f-7fa761f6259b"] }, Open ]] } ] *) (* End of internal cache information *)