(* 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[ 34090, 742] NotebookOptionsPosition[ 33318, 718] NotebookOutlinePosition[ 33746, 735] CellTagsIndexPosition[ 33703, 732] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ 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"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", 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"}], ";"}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", 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[773]:=",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->{3.97275803131399*^9, 3.9732634127599916`*^9, 3.973447936542053*^9, 3.973716818262982*^9, 3.97387011817763*^9, 3.974455882121476*^9, 3.974831989673029*^9, 3.975168268007036*^9, 3.975669957970932*^9, 3.976294530467311*^9, 3.976396525690257*^9, 3.976484506226364*^9, 3.976887861447331*^9, 3.9770604723918333`*^9, 3.977171244678668*^9, 3.977330621664894*^9, 3.977824777023036*^9, 3.978021677067134*^9, 3.978359166029036*^9, 3.978707155134041*^9, 3.978887837684153*^9, 3.979059705165444*^9, 3.9792331591229563`*^9, 3.979894024825791*^9, 3.980403543469507*^9, 3.980500992536922*^9, 3.980797522567663*^9, 3.980937301257283*^9, 3.9810258693468113`*^9, 3.981269692365806*^9}, CellLabel-> "Out[776]=",ExpressionUUID->"34dfe339-234c-49a5-bfdc-0aca9482267b"] }, 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[783]:=",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309"], Cell[BoxData[ GraphicsBox[{{}, GraphicsComplexBox[CompressedData[" 1:eJzt22eUFNW6BuAiz5BsESWIUCTJUASRTAFKUIQGkYwUIEkJDSIgsURyLPKQ tAQkKrSIw4goJYoOQWmQMCChJA5hmCbPEO+d7337rNVn4Vr33/1T/uE8a6dv f3tXmj67eM/BbXtnVhTl3eyKkvHv//5nzky82ijjf7gdrupPcTD+X+x0irbZ WuzLtQfW24sD3Wn7HbE9LWL0F/qWdmAtZi/dWWx1pd0uYmcyrS+NttpNrP4d aQ+bVfbBRk/E24lW+yLeTbQN60mR+vNTnuZA5v30asTfnlY3Iv6NtP6t2DhC O1swnye0Davj/uD8RkXbrov4D9Fq6hWJ/yGtXxO7L/9JXxDro2njlFgpdYA+ I3b2/5sPicN3aRX2vxmiN2P8z0OR+WH8PbQC60UPcj9sFQea0+5qsfHiIc5v I8YfTDtzMN512rTQ/4C/2H6s2H7+MNub4lBDWoWtZFrpiPnUO8Jy2PzhSGT/ Ij95jnG802g/I2JXrOZMYn4eYP5TaXc69s8p2p6F/TDpOMdfHm13WbQdWDtB q9uwX7Ke4HgHsF8q0/oJcXgCbWa5JvFU+Jv9xYoDh//Fbh5xqOxJ+iWxdZA2 k8Th0qcYf7vrkq/VtNpG7KbRbrxcD6F9p9l+m1i9dYb1R4uDQ1yWz8P1U/gf zicd7QdFnEn6VxedZT7riH39zzGeXmKtz3mWHxU752l3KtrXvkBXF/t7RVwO /eW+GBW/FnuJ8X4ttrrRrv+/3Ekc/oZ2Oordicn0DeQ7y2XOtwvy3YE2UnG/ Kn+F4+VE/TVXOX9YKX2N9cei/h+0PRT3LzuF7cdg/9y8zvgW4voqksr6w8S+ uDDjOXM5w/quiH24HnbcZH6zhTNsf3+L5RtSJf5zESeInfjbnG9Lsf+VO/Qs sR5zl+PPFFtV7tHnsR5JtHFBHCqXTj8n9cMv36cX3JT1bEPbsVLuK/WA803F fij+kPHfOSvxfU6rcODFx+wvTaz9Suv5z0n9xk9YXkCsL1CuwapY65sJVnKK zdmZYSeb2J6RBTZj0N/UrGyfA/WrZqP3Yvyvs7O/TWL/hhywu0asj41h/Xix tToW1oNic0ROtt+I+mouxjNFbLyUm/11EruD8rB9b4y/KC/Lq0p81hVarYD4 8z/D+cDBSxEXRn76+Nj+ebGaO19Uub9mxIVQP/Y52K6N8bT8dC30X+l59geH yr9AX0L+x0ecjPge0fY1sXu/AH1LrKQV5PjpaL/7Rfoh4ttVhP3Bvg9eYvkT 1O9XlG59PsNhXzH231NszqHNSeLg9xHPEmu5irP/RSjvWoLly8TKxJJ0F+Qj cynmP1+0ne7Rtp/D/CvSyirpL7CuNNd3LcZv8zL72yT2tyrD9lvFRtFyHL8P +hsacT/k5wZt35f67uDy7P+y2LpagfszNdo2rL5fkfO/ifEXRPwY/eWrxPZP UD9PFY6fhPz2oA1X7HNp+wrmd0pjfp65IPPJUZX9w/4TtJ5PHKpQPcpKe9qd hvk/pp1e2I8Ha7D8XeyvB7SJ9dD9rzzdKupbI2qyvKc4vI+2Ud9841X6Q/T/ WcQfYP8PqcX2qWIjTCtPkiXe12pH9mu0nf+yosj93v9L7Uj+pTxYoA7zcV/s G0C7J8X6IlpdLjbm12V5fulPrVePfkVsWrReHs+X2vUZXxWxlrsB46kvdqbT amO0r96Q/dX9P1k/Set1oq3C2mad5S3F4Q6NuJ905OMr2n5N7HunMW2IQ49o R8HzdEwTuhjeJ+/Tylt4H1z1GsfrhfffEq9zvDF4/21Jq3geK/si5ePRf7Gm nF+ZaBvz8T7agrZnYvwVtLIYz+8izdj/FsTTNOJ4vD8HaGcb4ttNG6gfatKc /Z0Qa3G0nfxUh/UW7I/vw5dp5R7eNxq8wfLr6P8irbbB+23vN5mvAtFWy+L9 ZmZL5qOAvA+58bRdLtpqebGe6y3Op6pYO007ZcX+v1uxfSaxma01nV1sZ/az v0J4/y3Xhvs3L/pv05b1YaPV26z/CO/j+2kjK8Yr3o7jp+N78jbt5roWZQcO DX0ncn1LfWUFrT8Q+39tz/aMZ3EHjlcG8SzoyPgqY/y+nVh/BfJ1gdbnon2d znT9pzqUQDtjxKrbheXH0X/Orpz/GeSzBu2g3J1Ku7PR/ynauIP1PtGN8VYU uxW6s7wPvo8ed4/cL/E9/HKPyPMN+SzZk/VXoj+1F9frT+yfZu8xnsP4e0Ph 3my/Ht9TKbQ7Gu/XBfow/9iPwSu0XRjfR1Y/lm9EPp7pz/4+xfx70coH+L6p +T7H74Pvm+m0XRrfE9U/YP7qSnun2wdR5eEptFlObGYf8HSrjaS9bxKt1JJy O8tAxtcF3zcTBkae9+i//CCONwjr03Yw87ka10/pAMt3Y75ptL4V3yvFhrJ8 M/bfTdqYgfk0/ZDlw7BfdtOmhevt2jDmPw753fkR+/8J+Zw3nPWfTYmykg/f kzui7V6k3QaYb96RLDeQ754R43vUmUnb49Ff948Z/xz0N412F2H9uo7iem5H /9/Qbjy+NyeOZvxF8T20KeIT+F7pMIb93xcHNtLqQ3wfrRvLclW+v9Qy4yLP V7G/De2fKQ60Gg8Hh4mN4ib7GywONv+E9deK9d9p66Z8TymBCbCW41aGw40/ Zfty4uBV2too9UPJE1l/jJQ7P0zi+rS7LfH6JsO+Ybei7J+A/mbToXix7xzt rhfbPaYwX63FoRm087ZYiad9XaJtD8V4305l/L9hvKrT2N9pjDeZdr5C+07T 4cBVsXWM9usyn+DhGWxfTaw8nMn4Y1E+YjbH/wPxDptDf4l8DrE4v0SxGaa1 NMQzeC59B/m8Mo/rXxL9/zif/TUWu5doR5P62jML2f8AKXdm0dZcsVlzEesn iUPdFsPhRncy7N8cx/moYrfSEq5nE3FIWcr8HBcrFWg7810Z7y869Av6a7uM /eeQct8DWi8h1ksvZ/kCsZZG+7eK1X0rON4qceDmZ5Hnp9hK/Zz5qYn6g2zm r5nY3EXbg8Why1+w/hqM12Alr5eDaP/sKs73H7H7Pa1deqrtnqs5351ov/VL 3k8uIt6/1zDeVLHSeS3nk4L4k2hf7D3J1yfrGG9QHDq0nu2zpkXZyiIOH9jA +eyV+sGRGzmf3WL9Hm0eFgeKf8X83hcrNq1XkP6sol8znipipzmtNRcHX9zE 62mO2L5OhydFO2SJtYGbOf4U9P8z7YsTq3qQ7deL3WQ6MEHi03xbWP+42KhD B34VO7Pp0BXkL8+3nM8O6c8XTxsV02X+ObfSr4jtGrT7DvL7Lh0ehPx2+Y75 X4b4KsdzfU6i/060cz7aFhzKtI3zT0Y+D9OhfRKvOTaB63UU63Hge/b/F/KX TpvTkL+3tnM9ViB/+2ljm9hUf+D6NhMHbtHWQLHx247I+ioZ//qX/Mj6He7L +qbQ2kdi2/mJ9XeJjf47Od8UsZrPYf5efCDzv0BbhcR2r58ZX3OxkXsX+5+H 9t/Rah/kt9svbL9G6utbaPs7sTbpV65PVXG40m7mzxC7ym9sX+Ch5PMxbXyU KeNfZ83vnO8ksfqA1rtKe7N1IvsfKg6U2MP57ZB4Q8Np669o27D62V7Op/cT yceQfVy/4ahfaD/Xf7vY2kUHdz6S+bzwB+sfEJsL6aAr9bVnD8BJv2E+c2hn lRLlqbB6ntbel/kEe4bodMS3jbbzS/1AroMcPyzl2lY6pgj6m3IIrlVfrE/8 C05uKA5lPsx4OiGeI3TMx9hv7Y7AaQvFvke0uR79lTkKj9wmNkodY/stGP8P OpSI/u7RCX+I3Y+SuD7/YD63aSUV8TU/TueU/Fk3aKO6OHj9BO8vlTNn/Kvp Jzn+ELH63CnWXyIOzqX72eJAndOcvysOzabX3UB/5+jATbHT4wwclyOL5GOa C3dsIla6/sP9OVpsfn2W8zNQv+I55r+bWG9Pq53F1tjz3D+Hxc7aiA+Jg6Mu ML5V6O8AHZiL/tLpxI2IZ+VFxrtSrO2nExZjPPUS87UL471Bu2cR/y1a2yZ2 myVzPfZgvOV0UpOskr/Cl+GyKRhv8OXI/UrK/QOucL8XFrtXIq4mDvS/ynzW FBv1rnF+rcWORU99G/09k8L9PVcc7EXbyxCPcZ33h3/EVmwq26ejv+p0Qt5s 0t8WOu5VsauFOX5TsVL5ButPEhsT6LR4se/xTeanbvaMf+0xtxifITZK3+b9 eYTYn0Zr34nd4Xc4/kZx4A5tbUN/xe4y3z+jv0RaeygON73H/FfJIeszKA1u PkOsFEjnevwkdnbSiYfFgboPOL8WMbJ+52mll1jd9pDxzRCbuR6xv7vRjjuI 9TxNJ50XK90ec306S760KbS/r9jJ9oTXz/titTPtnyw2N9HWV2K9g5IiHrlB HDpCG+ewPu0y0SUlP9Y4OqaZ2GyTGe43QBwcTRsBsX6fTtgpVu2scC2f5CtY NBu8rgby9zsdfkts36D9fuS/aXY4rrtYC9Axo8XGUrqWJbZ+jZQHsV7X6alr xOGCOWD3c7F7lY45ivEXxMDmZfRfPxZW8sp6+X05Ya2O2J1NJzQTh3rkgpNH iZWZdMFx2A/TcsPBrVj/U7S9XaxPzgOnncV+6pQXtmJjZT7H6OYtxeFMzzD+ 1mK1Ih38JKf0b9IjPxO7h2kV8w8seZ7xw0rBF+CQg+vdod3VeB41LMB448Vm f9q3CM+jegXhxBVi5QfaxvNPu0DHHBGHZxWCk8LiYM3CLO8rzyvXoEeOFdux L8JOnDhUna61TmxsoRNP4v0hexHm4yyef8fpjnj+BSa8xPptxPZXtL8/nm9H 6YSP8TxbX5T5ixf7yxbjfjiE5+UY2rqA9h+rHK8K7u9/0morPD9aFud+GScO D6eV6WL1C7rWbDy/hpWgMf9AIm2tFfsHleL+aYH8XaNDn4h9BUozH1OQn3kv c302iM26ZRjfAbF+nq6VLFZmlWW5D/PfWo7xLhe71cpz/J+Rz79pNRn5S6rA 9a0r8/F3qMj89RLb4yqxfaLYKFOZ8Q5C+9G0MVtslqrC+Z0WK8M1Xr9bkW+b ToxHvotW5X4ug+ffDXrqUrH9azXWr4b768/Vuf47xMEFNRhvPjxv6r/C8j54 vvhqMv6v8bw6R1v7cP/M8yrjjcH14kbc/bGe8U+NWryeJojVrrW5PkvFbtY6 3P855f018Ckd6CG2zLosf1WsPqFdv9j21+f9tyreN1c2YHxJiGdPQ+7HNtgf YZ335824fn5pxPnlxv52GnP914qNhk24PnuwXvPpfmqWKJftg/cj6zXOdwre jy7QBbfjfWz26xw/He9fuZsyH9VlvdQZdCLeV93qzTj/67i+tzSL3L+xv07S bjHEc7w592MA8RxtwfUYivrj32B+4hDPYVr/Bfuz7Jvc33jfVA/SMYWwv1q3 5PxqY3+VeIv7Zxqe7yNoZQne3/bRcb+LzcRWzGd+vC81a81yHc/zIXS4lTiw jC7YFu8Lr/m5XuOwn3fR6z7D+1ujNlyfOni/3Nkm8jzG+0iDtox3gFi7RPd7 M9r+LPI9atV9m/vxJ/keU7fTuiLlZt52zG9Jsb6NttuJ7VzvMB/98H1r0HZ/ sbGV1luInZj2vN57i8PVIh4gVrvR2upoW2sRzzftI/c/sU/rwPX8RhyYSOs7 MH6Hjiw/g/6UThzvqNhdRwdflu9b/RFtdBQb9zvTG/A9PLIL87UY38P3aPVr cWBvV+7nb8Tah9043kb0t4J2Z4rVpu9yvo7YV6g755uAeJrQ9g9ie3H3qPrO AoPruUbsf64H57MU8dXvEblexcG+dMASu3NpYzjGu0grHcSh93qy/7yI/xxt J2L/5OnF+uuR35kRb8b6dH+P843D+nxLB6tjv1Trzf66oH2VPszfCuy3in25 nnew30xaUSQe5QitFUF85fox3gfo7xDtjMF8R/VnPF+g/v732f4NuV/7P/+A 5ctw/35pAK+vHHI/1ofSblHcv5cMZPsF4uCiQdwP2fH3hKt081h8788fzPKy YqtegPujEt7XLtAJA/D3h4QhXJ+JYjv3UM7/poxnfDc0sj54Prz7IfPlx98f sg/j/WMUnheT6AT8vcPo+BHvP9PxPlJhOFzrCd5H1tMxX+H5MWYEnzd43jut RzKe63g/+JM2G+L+eedj5h/vp9qwUew/M+5vN+mEYvgeTR3N+OfL81dJGcN8 peB53Wgs76dv4/tgJ93xFr4P5o2Dk/rI+3jg2fG8njbg/d6itdzy/q1tp4NV 8X7e0+R8l4jNf+iED+V9XJ/+CZ9fM3JJPmImcH1K5Zb+utEda+SR+f1NJ1fI K/np/Cl9VmxOpAMNpH1wE532i7TXK01k/jbL+PYntBoj41vtJnG8WLH6Fx0e Jvatmcx82GI9RGs/iu1SU9jfYfR3j068Kzb3TuX4j8TB23Q4v8Rr/z6N42ti a+l0Xs8NxebAGXDZPuLQgpncL6Vlflb9WczvErHpm839ky4O1qHVHJIvy53D eGbg96saFvN3ROzmmEtnk9+T9K50eDJ+j6oyj/M30f4YbfTC73HmfF5Ps8XG wwXcj/H4e3b6QsZXHX+fLrmI+yefWF9JO63x9+q7tMu/V3++mOOXwd9b9yyO PF/x99rmcSy/gf5/o+0fZXz99SUsj8fvD42Xsn9Tft9yFtHOLPy+1nAZ68/H 73X96WAyfi+cu5zlKfh9rvYKrk856c88SweWie0znzGf1cTh7Dbjqy/t/V1o 8xh+T5xEq/g9Vq/8BdsPlN9r7Qm08RZ+7z1GK7FiLdNKOrvY/zjiePx+3HYV +3/hRoYDD+jQHLG2ejWv/47S3kqj3eHicMsvmY956P8LWm2B30tvrmF8rbBf Utcyv9Pxe27hdaz/M/bfLlrJh99PU2j3Ocy/wHrmux76X0j7U2T8/5xn4X// Ked/3vkX7/wL7J1/kfbe+Rfv/IuUe+dfJH7v/Evk91Sxd/7FO/+Ccu/8S5S9 8y9YL+/8C+Pzzr9k2Dv/4p1/wXy88y8Sr3f+hfnzzr9IPrzzLyz3zr/IeN75 F/bnnX+R9fHOv3A+3vkXyZ93/oXr651/kXx651+Yb+/8i8TnnX+hvfMvEp93 /oX59s6/yPy88y/8/494518k/975F9b3zr/IenrnX1jfO/8i8/fOvzA/3vkX 6c87/8Jy7/xLhr3zL975F/TvnX+ReLzzL+zPO/+SYe/8i3f+Bf39P5x/+R+s 0sGo "], {{{}, {RGBColor[0.24, 0.6, 0.8], Opacity[0.2], EdgeForm[None], GraphicsGroupBox[PolygonBox[CompressedData[" 1:eJwl1kO0GIYSANAX27ZtO2nQ2LZtW03SRo1t27Zt27btf/O7uGdmObMYJGrY rmLbwAEBAYHIGOS/mCHIf3l60pGWNKQmFSlJQXKSkZQkJCYRCUlAfOIRlzjE JhYxiUF0ohGVKEQmEhGJQHjCEZYwhCYUIQlBcIIRlCAE/l0/AfzS1E9+8J1v fOULn/nERz7wnne85Q2vecVLXvCcZzzlCY95xEMecJ973OUOt7nFTW5wnWtc 5QqXucRFLnCec5zlDKc5xUlOcJxjHOUIhznEQQ6wn33sZQ+72cVOdrCdbWxl C5vZxEY2sJ51rGUNq1nFSlawnGUsZQmLWcRCFjCfecxlDrOZxUxmMJ1pTGUK k5nERCYwnnGMZQyjGcVIRvAvwxnGUIYwmH/4m0EMZAB/0Z9+9KUPvelFT3rQ nW50pQud6URHOtCedvwejDa0phUtaUFzmtGUJjSmEQ1pQH3qUZc61KYWNalB dapRlSpUphIVqUB5ylGWMpSmFCUpQXGKUZQ/KUJhClGQPyhAfvKRlzzkJhc5 yUF2spGVLGQmExnJQHrSkZY0pCYVKUlBcpKRlCQkJhEJSUB84hGXOMQmFjGJ QXSiEZUoRCYSEYlAeMIRljCEJhQhCUFwghGUIAQmEAH8ssh+8oPvfOMrX/jM Jz7ygfe84y1veM0rXvKC5zzjKU94zCMe8oD73OMud7jNLW5yg+tc4ypXuMwl LnKB85zjLGc4zSlOcoLjHOMoRzjMIQ5ygP3sYy972M0udrKD7WxjK1vYzCY2 soH1rGMta1jNKlayguUsYylLWMwiFrKA+cxjLnOYzSxmMoPpTGMqU5jMJCYy gfGMYyxjGM0oRjKCfxnOMIYyhMH8w98MYiAD+Iv+9KMvfehNL3rSg+50oytd 6EwnOtKB9rSjLW1oTSta0oLmNKMpTWhMIxrSgPrUoy51qE0talKD6lSjKlWo TCUqUoHylKMsZShNKUpSguIUoyh/UoTCFKIgf1CA/OQjL3nITS5ykoPsZCMr WchMJjKSgfSkIy1pSE0qUpKC5CQjKUlITCISkoD4xCMucYhNLGISg+hEIypR iEwkIhKB8IQjLGEITShCEoLgBCMoQQhMoED/PTO/hJ/84Dvf+MoXPvOJj3zg Pe94yxte84qXvOA5z3jKEx7ziIc84D73uMsdbnOLm9zgOte4yhUuc4mLXOA8 5zjLGU5zipOc4DjHOMoRDnOIgxxgP/vYyx52s4ud7GA729jKFjaziY1sYD3r WMsaVrOKlaxgOctYyhIWs4iFLGA+85jLHGYzi5nMYDrTmMoUJjOJiUxgPOMY yxhGM4qRjOBfhjOMoQxhMP/wN4MYyAD+oj/96EsfetOLnvSgO93oShc604mO dKA97WhLG1rTipa0oDnNaEoTGtOIhjSgPvWoSx1qU4ua1KA61ahKFSpTiYpU oDzlKEsZSlOKkpSgOMUoyp8UoTCFKMgfFCA/+chLHnKTi5zkIDvZyEoWMpOJ jGQgPelISxpSk4qUpCA5yUhKEhKTiIQkID7xiEscYhOLmMQgOtGIShQiE4mI RCA84QhLGEITipCEIDjBCBrw/5f/99kP+B+ICoij "]]]}, {}, {}}, {{}, {}, TagBox[ {RGBColor[0.24, 0.6, 0.8], PointSize[0.0055000000000000005`], AbsoluteThickness[2], LineBox[CompressedData[" 1:eJwl10O0GIYSANAX27Ztu7Ft27Zt204bs41t27Zt+9+cv7hnZjmbUaJG7Su1 CxQQEJA+SEDAnxgYaUBQghGcEIQkFKEJQ1jCEZ4IRCQSkYlCVKIRnRjEJBax iUNc4hGfBCQkEYlJQlKSkZwUpCQVqUlDWtL9qZsMZCQTmclCVrKRnRzkJBe5 yUNe8vEX+SlAQQpRmCIUpRjFKUFJSlGaMpSlHOWpQEUqUZkqVKUa1alBTWpR mzrUpR71aUBDGtGYJjSlGc1pQUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGb PvSlH/0ZwEAGMZghDGUYwxnBSEYxmjGMZRzjmcBEJjGZKUxlGtOZwUxmMZs5 zGUe81nA3/zDQhaxmCUsZRnLWcFKVrGaNfzLf6xlHevZwEY2sZktbGUb29nB Tnaxmz3sZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFN bnGbO9zlHvd5wEMe8ZgnPOUZz3nBS17xmje85R3v+cBHPvGZL3zlG9/5wU9+ 8Zs/zR+IwAQhKMEITghCEorQhCEs4QhPBCISichEISrRiE4MYhKL2MQhLvGI TwISkojEJCEpyUhOClKSitSkIS3pSE8GMpKJzGQhK9nITg5ykovc5CEv+fiL /BSgIIUoTBGKUozilKAkpShNGcpSjvJUoCKVqEwVqlKN6tSgJrWoTR3qUo/6 NKAhjWhME5rSjOa0oCWtaE0b2vJneLenAx3pRGe60JVudKcHPelFb/rQl370 ZwADGcRghjCUYQxnBCMZxWjGMJZxjGcCE5nEZKYwlWlMZwYzmcVs5jCXecxn AX/zDwtZxGKWsJRlLGcFK1nFatbwL/+xlnWsZwMb2cRmtrCVbWxnBzvZxW72 sJd97OcABznEYY5wlGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5w l3vc5wEPecRjnvCUZzznBS95xWve8JZ3vOcDH/nEZ77wlW985wc/+cVv/iz+ QAQmCEEJRnBCEJJQhCYMYQlHeCIQkUhEJgpRiUZ0YhCTWMQmDnGJR3wSkJBE JCYJSUlGclKQklSkJg1pSUd6MpCRTGQmC1nJRnZykJNc5CYPecnHX+SnAAUp RGGKUJRiFKcEJSlFacpQlnKUpwIVqURlqlCValSnBjWpRW3qUJd61KcBDWlE Y5rQlGY0pwUtaUVr2tCWdrSnAx3pRGe60JVudKcHPelFb/rQl370ZwADGcRg hjCUYQxnBCMZxWjGMJZxjGcCE5nEZKYwlWlMZwYzmcVs5jCXecxnAX/zDwtZ xGKWsJRlLGcFK1nFatbwL/+xlnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcA BznEYY5wlGMc5wQnOcVpznCWc5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEP ecRjnvCUZzznBS95xWve8JZ3vOcDH/nEZ77wlW985wc/+cVv/hz9gQhMEIIS jOCEICShCE0YwhKO8EQgIpGITBSiEo3oxCAmsYhNHOISj/gkICGJSEwSkpKM 5KQgJalITRrSki7I//+W/wETdIg6 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, TagBox[ {Opacity[0.], PointBox[1630]}, Annotation[#, {{Callout}, Charting`Private`Tag, {814}}]& ]}], {{{}, {{}, 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.980467024875*^9, 77525.}], Offset[{-8., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-10., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-12., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-12., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], BSplineCurveBox[{ Offset[{-3., 3.6739403974420594`*^-16}, {3.980467024875*^9, 77525.}], Offset[{-8., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-10., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-12., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}], Offset[{-12., 9.797174393178826*^-16}, {3.980467024875*^9, 77525.}]}]}, {EdgeForm[None], FaceForm[{RGBColor[0.87, 0.94, 1], Opacity[ NCache[ Rational[2, 3], 0.6666666666666666]]}], PolygonBox[{ Offset[{-12.000000000000002`, 5.500000000000004}, { 3.980467024875*^9, 77525.}], Offset[{-11.999999999999998`, -5.499999999999996}, { 3.980467024875*^9, 77525.}], Offset[{-43., -5.500000000000003}, {3.980467024875*^9, 77525.}], Offset[{-43., 5.499999999999997}, {3.980467024875*^9, 77525.}]}]}, {LightDarkSwitched[ RGBColor[ 0.6666666666666666, 0.6666666666666666, 0.6666666666666666]], AbsoluteThickness[1.25], EdgeForm[None]}, {}, InsetBox[ StyleBox[ RotationBox["\<\"77525\"\>", 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.980467024875*^9, 77525.}], 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.4, 0.64, 1.], AbsoluteThickness[2]], Directive[ RGBColor[1., 0.75, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.8, 0.4, 0.76], AbsoluteThickness[2]], Directive[ RGBColor[0.637, 0.65, 0.], AbsoluteThickness[2]], Directive[ RGBColor[0.915, 0.3325, 0.2125], AbsoluteThickness[2]], Directive[ RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], AbsoluteThickness[2]], Directive[ RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142], AbsoluteThickness[2]], Directive[ RGBColor[0.736782672705901, 0.358, 0.5030266573755369], AbsoluteThickness[2]], Directive[ RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], "AllowMicroRanges" -> {True, False}, "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> 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: Sat 28 Feb 2026 12:14:52 UTC\"", 12, StripOnInput -> False]}}, GridBoxAlignment -> {"Columns" -> {{Center}}}, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TraditionalForm], PlotRange->{{3.729024*^9, 3.9812256*^9}, {0., 253021.}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.08090169943749476]}}, Ticks->{{}, Automatic}]], "Output", CellChangeTimes->{3.977171246052504*^9, 3.977330621833989*^9, 3.977824777220779*^9, 3.97802167740195*^9, 3.9783591663956203`*^9, 3.978707155310081*^9, 3.9788878378609324`*^9, 3.979059705340467*^9, 3.979233159291823*^9, 3.979894026470213*^9, 3.980403543643875*^9, 3.980500992710359*^9, 3.980797522728137*^9, 3.980937301427796*^9, 3.981025869505204*^9, 3.981269692538081*^9}, CellLabel-> "Out[785]=",ExpressionUUID->"bbb9c544-9529-4ec2-b098-3671267514a9"] }, Open ]] }, WindowSize->{1280.25, 878.25}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification:>1.25 Inherited, FrontEndVersion->"14.3 for Mac OS X ARM (64-bit) (July 8, 2025)", StyleDefinitions->"Default.nb", ExpressionUUID->"a68abeaf-41ba-46e4-a91b-e09f414e080e" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[583, 22, 5541, 131, 23, "Input",ExpressionUUID->"e5e34011-aa3d-4e95-90b1-863054ac32f5", CellOpen->False], Cell[6127, 155, 1234, 21, 69, "Output",ExpressionUUID->"34dfe339-234c-49a5-bfdc-0aca9482267b"] }, Open ]], Cell[CellGroupData[{ Cell[7398, 181, 5486, 118, 23, "Input",ExpressionUUID->"55c17c4f-14a9-40f1-a01c-ab0b0c9b3309", CellOpen->False], Cell[12887, 301, 20415, 414, 546, "Output",ExpressionUUID->"bbb9c544-9529-4ec2-b098-3671267514a9"] }, Open ]] } ] *)