(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='WolframDesktop 11.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 161, 7] NotebookDataLength[ 333618, 7685] NotebookOptionsPosition[ 322929, 7492] NotebookOutlinePosition[ 323338, 7510] CellTagsIndexPosition[ 323295, 7507] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Unit 2 Homework: Graphs and Networks", "Title", CellChangeTimes->{{3.739199910868782*^9, 3.7391999148759108`*^9}, { 3.739472665586587*^9, 3.739472670647952*^9}, {3.739472709641264*^9, 3.739472715953445*^9}},ExpressionUUID->"609f17af-adc0-4f48-b38c-\ 53b674fc6142"], Cell[CellGroupData[{ Cell["\<\ Course: Algorithmic Information Dynamics: A Computational Approach to \ Causality and Living Systems From Networks to Cells\ \>", "Chapter", CellChangeTimes->{{3.7394726578125763`*^9, 3.7394727037847977`*^9}, { 3.739473639094627*^9, 3.739473641796514*^9}},ExpressionUUID->"1d7e883d-bc2b-4ed6-826b-\ 08904ab162ae"], Cell[CellGroupData[{ Cell["Hector Zenil and Narsis A. Kiani", "Section", CellChangeTimes->{{3.7394726578125763`*^9, 3.7394727037847977`*^9}, { 3.739473639094627*^9, 3.7394736438784657`*^9}, {3.739626868592729*^9, 3.739626868969187*^9}},ExpressionUUID->"1d0e9596-368a-4d77-be79-\ 043d3591bc5d"], Cell["\<\ Course available at the Sta Fe Institute MOOC platform the Complexity \ Explorer at: \ https://www.complexityexplorer.org/courses/63-algorithmic-information-\ dynamics-a-computational-approach-to-causality-and-living-systems-from-\ networks-to-cells\ \>", "Text", CellChangeTimes->{{3.7394726578125763`*^9, 3.7394727037847977`*^9}, { 3.739473639094627*^9, 3.739473682316368*^9}},ExpressionUUID->"ed253bf5-0c5f-491d-b7c3-\ 46eb161cd420"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DateString", "[", "]"}]], "Input", CellChangeTimes->{{3.739473843658781*^9, 3.739473846814296*^9}}, CellLabel->"In[79]:=",ExpressionUUID->"fe9a012c-34e3-42d2-a565-fc4ee6daef1b"], Cell[BoxData["\<\"Tue 3 Jul 2018 18:14:21\"\>"], "Output", CellChangeTimes->{{3.739473845354117*^9, 3.7394738470638247`*^9}, 3.7396268619103537`*^9}, CellLabel->"Out[79]=",ExpressionUUID->"a50f1253-6533-453b-8797-048146604853"] }, {2}]] }, Open ]], Cell[CellGroupData[{ Cell["Question 1", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.739469907980624*^9}},ExpressionUUID->"d99f770a-948d-4903-bc9d-\ ec515806b9db"], Cell["What is the adjacency matrix of the following graph:", "Text", CellChangeTimes->{{3.739199920877578*^9, 3.739199963272811*^9}, { 3.739200213617751*^9, 3.739200222546043*^9}, {3.739469368881228*^9, 3.739469379281864*^9}, {3.739472842065995*^9, 3.7394728508860817`*^9}},ExpressionUUID->"a6910f1b-4fbe-43fa-a593-\ 7f55ff39a00a"], Cell[BoxData[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3}, {Null, SparseArray[ Automatic, {3, 3}, 0, { 1, {{0, 2, 4, 6}, {{2}, {3}, {1}, {3}, {1}, {2}}}, Pattern}]}, { PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 0.8660254037844389, -0.5000000000000012}}], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 1.8369701987210297`*^-16, 1.}}], LineBox[{{0.8660254037844389, -0.5000000000000012}, { 1.8369701987210297`*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvcIn4kXVttf7D2f/7hE/fmt/q4vh3FfPX+1nlLqU 2MZxe3/I/nVzJum+2j9tqb5B9rHb+yvlCxo2zHy53+/pmgz9d3f2r4t0lNxn 9XL/+vcbM+8n3dvfz3RtHZvUy/1f/4PAfbi8LIe694RzDxD6e1d6v+h4CDdf S/dF+imZR3D7v34SO7+n+tF+mPtEvJosS+Y82n86pN6Yu/UNXP7PTUaTZPu3 cP3XKx0CXC+/hZu/yD5/u7nRO7j9B6fdUnwf9A7uPpg8zP1w/VD/wcyH+R9m Pyx8AGC6vV8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.8660254037844384, -0.4999999999999994}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvdYn4kXVttf2T7J/94gfv7X/Qki9MXfrG3slqUuJ bRy39zPeYjRJtn9rv32pvkH2sdv771Q6BLhefmuf/3RNhv67O/uX2+dvNzd6 Z3/h/cbM+0n39h+bdkvxfdA7e24GEHgAl9fjUPeecO4BXH9870rvFx0P4eZb 6b5IPyXzCG4/62ex83uqH+2HuU/Fq8myZM6j/V0uhnNfPX8Fl4/cv27OJN1X cP118gUNG2a+hJu/OdJRcp/VS7j9U5iurWOTegl3H0we5n6Yfpj/YObD/A+z HxY+AO6Epbw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8660254037844389, -0.5000000000000012}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzdU1z8eycpUNj+pBGSu/j/YTWB6mcF6aaV9b2Z1+ z/ajfejVGbta+lbYzxD7YpzK99G+I9PRPvjZBvtVx66olhz5YH9v+vaKZ3c3 2wu2TFb1SP9gfzVA6MzCx1vsGcAAIX/3+40t+Ybv4frXFIVtES9/Bzf/4iXx GaaP38LtZ+N9aeDc8tYe5r7nW2uPdSe/tVeDyO+HyStC9O+H6c+DmL8fZv4R iP37YfbvhrhvP8x9MHmY+2H6Yf6DmQ/zP8x+WPgAAOZ1omU= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.8369701987210297`*^-16, 1.}, {0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{3., 181.51753712555814`}, {-86.27482391781884, 77.99999999999999}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{182.51562500000006`, Automatic}]], "Input",ExpressionUUID->\ "21edf90a-b48e-4c74-b5bd-5dc4256de4dc"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470372531953*^9},ExpressionUUID->"dc7923d4-3e44-4808-99f3-\ 62d1de4fe417"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0"}], "}"}]}], "}"}], "//", "MatrixForm"}]], "Input", CellChangeTimes->{{3.7394728874829617`*^9, 3.739472888916297*^9}}, CellLabel->"In[27]:=",ExpressionUUID->"dffed4b6-152e-4e39-bdec-e8985c6fffe5"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "1", "1"}, {"1", "0", "1"}, {"1", "1", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.7394728892341223`*^9}, CellLabel-> "Out[27]//MatrixForm=",ExpressionUUID->"af70162a-ba12-4717-b9a4-\ 933d4a483268"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 2", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.7394699155301456`*^9}},ExpressionUUID->"345e116d-962b-4442-9b0f-\ b8b03c22351d"], Cell["\<\ Can you determine from looking at this adjacency matrix if it represents a \ directed or an undirected graph?\ \>", "Text", CellChangeTimes->{{3.739472955282009*^9, 3.7394729702271557`*^9}, { 3.739473046165307*^9, 3.739473061184651*^9}},ExpressionUUID->"8b637d23-2245-4a4e-9b3a-\ 1c36ddee63c6"], Cell[BoxData[ RowBox[{"AdjacencyGraph", "[", RowBox[{"(", GridBox[{ {"0", "1", "0", "0"}, {"1", "0", "0", "0"}, {"1", "1", "0", "0"}, {"1", "1", "0", "0"} }], ")"}], "]"}]], "Input",ExpressionUUID->"f0638c33-1106-498b-9f38-\ 1b18abc05b07"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470363589118*^9},ExpressionUUID->"74ec65c3-fd32-4f51-a6c0-\ 6c2b12bd5299"], Cell["Yes. It is directed, because the matrix is not symmetric.", "Text", CellChangeTimes->{{3.739472984910611*^9, 3.739473070128107*^9}},ExpressionUUID->"def07f61-c0ef-4cba-b20f-\ 55dcda87d03d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 3", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.7394699155301456`*^9}, { 3.739473495258634*^9, 3.7394734953478928`*^9}},ExpressionUUID->"797e258b-7c7f-4539-8e68-\ fba552d0f7dd"], Cell["\<\ Write down the adjacency matrix of a completely disconnected graph of 5 nodes \ in which every node has only a self-loop.\ \>", "Text", CellChangeTimes->{{3.739472955282009*^9, 3.7394729702271557`*^9}, { 3.739473046165307*^9, 3.739473061184651*^9}, {3.739473500207899*^9, 3.7394735362885017`*^9}, {3.739473595170092*^9, 3.7394735956777287`*^9}},ExpressionUUID->"bb55a278-4e0e-414d-bf1e-\ 0f7f335a0f6b"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470363589118*^9},ExpressionUUID->"8b13ca04-ad60-458c-9176-\ 97c068c90887"], Cell["\<\ A disconnected graph of size 5 with all its nodes only connected to \ themselves is a matrix with all entries zero except for its diagonal:\ \>", "Text", CellChangeTimes->{{3.73947356598112*^9, 3.739473608715478*^9}},ExpressionUUID->"349b45b6-7690-444d-92d9-\ 03e85d6739f3"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", "1"}], "}"}]}], "}"}], "//", "MatrixForm"}]], "Input", CellChangeTimes->{{3.7394735380864973`*^9, 3.739473562316337*^9}}, CellLabel->"In[45]:=",ExpressionUUID->"e6fd368d-1123-40da-adbd-c704dd422a3a"], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", "0", "0", "0", "0"}, {"0", "1", "0", "0", "0"}, {"0", "0", "1", "0", "0"}, {"0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{{3.739473556396999*^9, 3.739473562563755*^9}}, CellLabel-> "Out[45]//MatrixForm=",ExpressionUUID->"cd317a7e-78e7-4885-a11f-\ 89f96d418ca0"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 4", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.7394699155301456`*^9}, { 3.739472980071459*^9, 3.7394729801604013`*^9}, {3.739473614657366*^9, 3.739473614745742*^9}},ExpressionUUID->"b0145642-5919-4eca-9022-\ fa24e885c5c0"], Cell["\<\ What is the degree distribution of the following graph? Sort the result from \ greatest to lowest degree.\ \>", "Text", CellChangeTimes->{{3.7392000055184927`*^9, 3.7392000280475187`*^9}},ExpressionUUID->"52acdcba-381b-45e0-9182-\ 028173512589"], Cell[BoxData[ RowBox[{ RowBox[{"g", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 4, 6, 8, 9, 12}, {{2}, {3}, {4}, {5}, {1}, {5}, {1}, {5}, { 1}, {1}, {2}, {3}}}, Pattern}]}, {PlotTheme -> "Web"}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{0.936395307403304, 0.8304061689184778}, { 0.3045324243200643, 1.6636784382816932`}}], LineBox[{{0.936395307403304, 0.8304061689184778}, { 0.29890743681688164`, 0.}}], LineBox[{{0.936395307403304, 0.8304061689184778}, { 2.1058399772749308`, 0.8288293658784124}}], LineBox[{{0.936395307403304, 0.8304061689184778}, {0., 0.8321661694799268}}], LineBox[{{0.3045324243200643, 1.6636784382816932`}, {0., 0.8321661694799268}}], LineBox[{{0.29890743681688164`, 0.}, {0., 0.8321661694799268}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQLTRrrdfnb2/t9315kDBp8lt76UfMlT1P3tmvEN43 90PuW/tHf1xWPt713p5JPzVyF8Nb+w/fs67XGX2wZ7G5Erwg7I29c9b0n5KZ H+xtFScreza8tj93S+P2q+oP9iY3bb6un/QKLq898dkxsaUv4fpTypZO23/u Bdz8tGaRiUtVXsDtPzBvt0/+9uf2MPet2juj8+zE5/acQeEyUZxv4fJO5mJv mIzfwPW7uLQ+e9HxGm7+vHidRZukX8Pt76jjvC/w7RXcfTB5mPth+mH+g5kP 8z/Mflj4AAB7SacJ "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.936395307403304, 0.8304061689184778}, { 0.046928982847412315`, 0.046928982847412315`}]}, "DynamicName", BoxID -> "VertexID$1"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnbvu4ITS2sv2x/dw1t2T+2NfZ5f3dnnEVXsbn4o5 vDx/7HlLPviGsV63f3nTu6ro6m97jiihyK7IG/ZZCc3lqQ2/7UOVjzz8ZnzT nu1y0n1L0d/2jU85M6zqb9ozrTf3yJ33Cy7/r4tn4wL1X3D9s/6+lijd8xNu vnSLslhG+k+4/ScEv38+Y/DTHuY+24WpQn9kf9rHyImaOC+6CJefdVF1uebr 83D9i1kfTTjodBZuPldxXf2L3tNw+ze9+1SU+P0U3H0weZj7Yfph/oOZD/M/ zH5Y+AAAY4GfFg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.3045324243200643, 1.6636784382816932`}, { 0.046928982847412315`, 0.046928982847412315`}]}, "DynamicName", BoxID -> "VertexID$2"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnWmRtcJH8bJ9wB2FWGH2HfZVJ8RY6/9csV9wmdOF 9dY2e85/M1J1V16zz1vnpBhcsNme5cmugsS/1+3/6ZS9ZLVfYx+4Nufn2es3 7CUYT55S3TzXvjZ/U72g8k17BihAk9+Ppn8/mvn70ezfj+a+/REr9npLuV2E y096WnbtutF5uP7ZksYH8rvOwM1naj+/btrVU3D7VzG5LOK3PwV3H5q8PZp+ ezTz7dHstwcABCKT1g== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.29890743681688164`, 0.}, {0.046928982847412315`, 0.046928982847412315`}]}, "DynamicName", BoxID -> "VertexID$3"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvYbLY+GhGwwO7j6GU5e3vbVfN+fuGw0RRgfDbL5L rIlv7RMev92xz5PRobtta+/5z2/s5RWCrFxLGB16J6t0bPV8Y+8ZmXF6Uj+j w7GKx+Fxxa/t+wQNbX7PYHTYa9CrebT1FVx+ywuz39ozXsL1vz379dSVgy/g 5r+/lXJ0l/gLuP2e37gbW1Y9t4e5z1j05d5HLc/tV1VsCo2ZywCX/2G4qPNY OgNcv+VXWw4HWwa4+fx71Ms/KTLA7T/FHM/WJcEAdx9MHuZ+mH6Y/2Dmw/wP sx8WPgBCOJju "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.1058399772749308`, 0.8288293658784124}, { 0.046928982847412315`, 0.046928982847412315`}]}, "DynamicName", BoxID -> "VertexID$4"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQOB1n9i/y58ay/BePKU6ua59tZRN2dF17y1/6dT 9pLVfo391NKGMFX+t/Z565wUgws2209veh/AnfrGfsFlThfWW9vsL6SvU9jS 99o+4I5CrDD7Dvvj8hGfpBa+gsvvu854pHHzS7j+73sOTNa6+wJu/s+T+n0C xi/g9gc/veZ56+hze5j7bFm2tFkseA6T3w+Th+rfD9MPNX8/zHyo/fth9kPd tx/Nffth7ofph/kPZj7M/zD7YeEDAHsemMI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0., 0.8321661694799268}, {0.046928982847412315`, 0.046928982847412315`}]}, "DynamicName", BoxID -> "VertexID$5"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{4., 220.}, {-90., 85.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{225.4843749999999, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.739200066666696*^9, 3.739200083639546*^9}, { 3.739472783277442*^9, 3.739472785277092*^9}, {3.7394732364653807`*^9, 3.7394732366352654`*^9}},ExpressionUUID->"f7f6a6c1-dccc-44ca-bae9-\ 51ada96248c8"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470363589118*^9},ExpressionUUID->"066d907c-f191-4f75-997a-\ 523c3b887c27"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Reverse", "@", RowBox[{"Sort", "[", RowBox[{"VertexDegree", "[", "g", "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.739469389301383*^9, 3.7394694021778193`*^9}, { 3.73947278981284*^9, 3.7394727913498487`*^9}}, CellLabel->"In[23]:=",ExpressionUUID->"6b732960-c5d6-49c2-b36b-409407989acd"], Cell[BoxData[ RowBox[{"{", RowBox[{"4", ",", "3", ",", "2", ",", "2", ",", "1"}], "}"}]], "Output", CellChangeTimes->{{3.739469394053404*^9, 3.739469402438142*^9}, 3.739472794723948*^9}, CellLabel->"Out[23]=",ExpressionUUID->"778a1c3d-4b40-4758-81c2-93d9f516053b"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 5", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.7394699155301456`*^9}, { 3.739469979408444*^9, 3.739469979496976*^9}, {3.7394736171528473`*^9, 3.7394736172428913`*^9}},ExpressionUUID->"581bf028-0b23-4d03-b0ee-\ 3fc458fd7b09"], Cell["\<\ If relaxing the low degree requirement and only caring about node distance, \ can the following graph be called a small-world graph?\ \>", "Text", CellChangeTimes->{{3.739200054366127*^9, 3.7392000623106623`*^9}, { 3.7404296878664494`*^9, 3.7404297080044193`*^9}, {3.74043032075492*^9, 3.740430329687394*^9}},ExpressionUUID->"31a67541-7be3-46e6-ad46-\ be5058a18202"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"CompleteGraph", "[", RowBox[{"5", ",", RowBox[{"ImageSize", "\[Rule]", "Small"}], ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.739200033128708*^9, 3.739200045416671*^9}, { 3.739473248298461*^9, 3.739473249998307*^9}}, CellLabel->"In[78]:=",ExpressionUUID->"fb852a77-dd56-46e2-855a-656818189558"], Cell[BoxData[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 4, 8, 12, 16, 20}, {{2}, {3}, {4}, {5}, {1}, {3}, {4}, {5}, { 1}, {2}, {4}, {5}, {1}, {2}, {3}, {5}, {1}, {2}, {3}, {4}}}, Pattern}]}, { GraphLayout -> "CircularEmbedding", ImageSize -> Small, PlotTheme -> "Web"}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, {-0.5877852522924727, -0.8090169943749468}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, { 0.5877852522924737, -0.8090169943749481}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, {-7.044813998280222*^-16, 1.}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, { 0.5877852522924737, -0.8090169943749481}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, \ {-7.044813998280222*^-16, 1.}}], LineBox[{{0.5877852522924737, -0.8090169943749481}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{ 0.5877852522924737, -0.8090169943749481}, {-7.044813998280222*^-16, 1.}}], LineBox[{{0.9510565162951533, 0.30901699437494634`}, {-7.044813998280222*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzRjqIsyX/26/UNG9U9kxN+2TeGRf6k96u5/5X9u/ ErGb9mEPVtZ8OPVm/7d9oVczvW/Ym2UZHrmg82b/tkspKVr81+03nJqh7338 9f65VXXdqxuu2q8QyD3pv+T1/oSX+ubvj12GyytHPHxkxHsJrp+L4TfnlroL cPOnqIsYvWw5B7e/auXG+5fenbGHuS/mIJP706Qz9gvmZtu+8X4Pl7+W8v7K VM4PcP3P5mtvXBrxAW7+yvfl1RndH+D2rz3Tq/dszge4+2DyMPfD9MP8BzMf 5n+Y/bDwAQBHubGl "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.9510565162951538, 0.30901699437494834`}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$1"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHRVVyqJ8/tF+zw0HAndKPN+/W9Dvlsunh/sDs95s 32L9fP/6p7dyWbUf7r/O2epjtfD5/v78pK1Pex7s/17/lyXK/sV+zgsnFRLU H+xnXlNQOJPt5X5GsXm7Ulge7F/0Zfrs8scv4fKOtvuPhh54Bdfvm2lkNLX9 Ndz83PurXm1RfQO3/3Odc71V95v9MPf9tsh/arruzf6fi+boMa55DJdnPc8/ 26H4CVy/qmtHcILgU7j5q58ovHha9hRu/+Z5Pn4PZz6Fuw8mD3M/TD/MfzDz Yf6H2Q8LHwCX9LeT "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.5877852522924727, -0.8090169943749468}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$2"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnRxVyqJ8/pF96IYDgTslnu9nWjxHj3HNY/vYrDfb t1g/3893nn+2Q/ET+8ecrT5WC5/v13PtCE4QfGrP3PCXJcr+xf4tTxRePC17 as+/pqBwJtvL/Xvm+fg9nPnUft2X6bPLH7+Ey/va7j8aeuAVXH9kppHR1PbX cPMr7696tUX1Ddz+/3XO9Vbdb/bD3Mdumf/UdN2b/UcE/W65fHoIl9/x9FYu q/ZDuP4Z+Ulbn/Y8gJsvdOGkQoL6A7j9XGLzdqWwPIC7DyYPcz9MP8x/MPNh /ofZDwsfAGSQqjw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.5877852522924737, -0.8090169943749481}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$3"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/TfERZgv/539u8J7p7JjbtrPmZtt+8b7vf39v23/ SsRu2l9JeX9lKucH+0v7Qq9met+wfzJfe+PSiA/2ky6lpGjxX7df/r68OqP7 g31lVV336oar9qvP9Oo9m/PB3ualvvn7Y5fh8v/DHz4y4r0E1//s/y/OLXUX 4Ob7qIsYvWw5B7ffaOXG+5fenbGHuU/kIJP706Qz9nE8si/1J72Fywc9WFnz 4dQbuH6jLMMjF3TewM1fc2qGvvfx13D7lwjknvRf8hruPpg8zP0w/TD/wcyH +R9mPyx8AM+9rtQ= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9510565162951533, 0.30901699437494634`}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$4"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXRt7Y83GxJN7dBa9VolP/WjPLvzS5ejs2faaR68W Pgz+aO/ltTzzpuMq+7TSzuVyih/tVcOmV7wS3GQfZuV7mu/SB/uIoBhZcbut 9v5LhEXz8z7YT1Xa5fcpdJs9Axgg5BO337iqqPwerj+0OzXzUfQ7uPmmom83 HNr7Fm7/+tIQGduIt/Yw9y3frbHN0fSt/VwRsPx+mLyYN1j/fpj+boj5+2Hm 74PYvx9m/2+I+/bD3AeTh7kfph/mP5j5MP/D7IeFDwCesZdt "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-7.044813998280222*^-16, 1.}, {0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$5"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{3., 183.}, {-89., 83.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{187.59765625, Automatic}]], "Output", CellChangeTimes->{{3.7392000392025223`*^9, 3.739200045750593*^9}, 3.739473250257971*^9, 3.739626829663677*^9}, CellLabel->"Out[78]=",ExpressionUUID->"063857e9-c4b0-4f3a-9427-bd8e8ce0d78f"] }, Open ]], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470408792107*^9},ExpressionUUID->"e09f65e6-4be7-4586-9c24-\ 72b703f908aa"], Cell["\<\ The maximum (and also minimum) distance between any 2 different nodes in any \ complete graph is always 1, which is the minimum distance and way lower than \ the requirement of a distance proportional to log(N) where N are the number \ of nodes. Here is the code showing this for all complete graphs from 3 \ (triangle) to 20 nodes:\ \>", "Text", CellChangeTimes->{{3.739469985567301*^9, 3.7394701011793947`*^9}, { 3.7394702603115396`*^9, 3.7394702645529127`*^9}, {3.739470352438417*^9, 3.739470354137466*^9}, {3.7396263350192842`*^9, 3.739626337327619*^9}, { 3.740429658360179*^9, 3.740429661238453*^9}, {3.74042973334025*^9, 3.740429734442967*^9}, {3.740430422870397*^9, 3.7404304354942303`*^9}, 3.7404305153503227`*^9},ExpressionUUID->"02394aee-532a-48d3-8fee-\ 74611d31edbc"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"Max", "[", RowBox[{"Flatten", "@", RowBox[{"GraphDistanceMatrix", "[", RowBox[{"CompleteGraph", "[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "20"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.739469521605193*^9, 3.739469527416333*^9}, { 3.739469560463656*^9, 3.739469573180149*^9}, {3.7394700618077793`*^9, 3.739470104184011*^9}, {3.739470257749434*^9, 3.7394702578481283`*^9}}, CellLabel-> "In[972]:=",ExpressionUUID->"09671064-6978-4c3f-9c06-67694588c766"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1", ",", "1"}], "}"}]], "Output", CellChangeTimes->{ 3.739469527938808*^9, {3.739469561035099*^9, 3.739469573557158*^9}, { 3.739470072998271*^9, 3.739470104469954*^9}, {3.739470258458165*^9, 3.739470265658437*^9}}, CellLabel-> "Out[972]=",ExpressionUUID->"39e877c6-6bf8-49f2-bda0-b102277d5876"] }, Open ]], Cell["And how log(N) grows", "Text", CellChangeTimes->{{3.739470134675447*^9, 3.739470140996687*^9}, { 3.740429681623019*^9, 3.740429682860303*^9}},ExpressionUUID->"03259221-feae-4320-8df2-\ 728407197ef9"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"N", "/@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Log", "[", RowBox[{"VertexCount", "[", RowBox[{"CompleteGraph", "[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "20"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.739470115906155*^9, 3.739470150117001*^9}, { 3.739470255061754*^9, 3.739470255237462*^9}}, CellLabel-> "In[973]:=",ExpressionUUID->"5a898685-5aee-4308-ab1b-e10504cf5387"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.0986122886681098`", ",", "1.3862943611198906`", ",", "1.6094379124341003`", ",", "1.791759469228055`", ",", "1.9459101490553132`", ",", "2.0794415416798357`", ",", "2.1972245773362196`", ",", "2.302585092994046`", ",", "2.3978952727983707`", ",", "2.4849066497880004`", ",", "2.5649493574615367`", ",", "2.6390573296152584`", ",", "2.70805020110221`", ",", "2.772588722239781`", ",", "2.833213344056216`", ",", "2.8903717578961645`", ",", "2.9444389791664403`", ",", "2.995732273553991`"}], "}"}]], "Output", CellChangeTimes->{{3.739470125086289*^9, 3.73947015052177*^9}, { 3.739470255523575*^9, 3.739470266919136*^9}}, CellLabel-> "Out[973]=",ExpressionUUID->"0c540305-a5d4-4bb9-825a-835cf2df26f1"] }, Open ]], Cell["\<\ Clearly the maximum (and minimum) graph distance of a complete graph between \ any two different nodes is always below log(N). \ \>", "Text", CellChangeTimes->{{3.7394701590974407`*^9, 3.73947025237987*^9}, 3.73947029889143*^9, {3.7404297180394382`*^9, 3.740429766246146*^9}, { 3.740430449366144*^9, 3.740430454349573*^9}},ExpressionUUID->"15fd6d35-e50a-46e2-96a1-\ 21363cfbb2c8"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Thread", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Max", "[", RowBox[{"Flatten", "@", RowBox[{"GraphDistanceMatrix", "[", RowBox[{"CompleteGraph", "[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "20"}], "}"}]}], "]"}], "\[LessEqual]", RowBox[{"N", "/@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Log", "[", RowBox[{"VertexCount", "[", RowBox[{"CompleteGraph", "[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "3", ",", "20"}], "}"}]}], "]"}]}]}], "]"}]], "Input",\ CellChangeTimes->{{3.7394702739598207`*^9, 3.739470291159878*^9}}, CellLabel-> "In[975]:=",ExpressionUUID->"b2407628-f1a2-4372-8782-0f003a7d280e"], Cell[BoxData[ RowBox[{"{", RowBox[{ "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True", ",", "True"}], "}"}]], "Output", CellChangeTimes->{{3.739470275724958*^9, 3.739470291384666*^9}}, CellLabel-> "Out[975]=",ExpressionUUID->"9a0b54c5-b237-42c3-8bb0-10cd2a484254"] }, Open ]], Cell["\<\ This is, however, not a typical example of small-world graph, because it does \ not comply with other possible requirements such as a low degree and \ clustering coefficient requirements.\ \>", "Text", CellChangeTimes->{{3.7394701590974407`*^9, 3.73947025237987*^9}, { 3.739470304592683*^9, 3.739470324268577*^9}, {3.7404297892638693`*^9, 3.740429807984408*^9}, {3.7404304615373497`*^9, 3.7404305097681913`*^9}},ExpressionUUID->"cf867fe8-2102-4312-8cd4-\ 8fc000232b5d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 6", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.73946989805221*^9}, { 3.739470335418887*^9, 3.7394703361265793`*^9}, {3.73947362020168*^9, 3.739473620281239*^9}},ExpressionUUID->"9a521a0e-ab0f-4d37-86f8-\ e90f780e3933"], Cell["Is the following en example of a scale-free network?", "Text", CellChangeTimes->{{3.7392000925856657`*^9, 3.7392001056692333`*^9}, { 3.7392712199094057`*^9, 3.739271220853013*^9}, {3.7394695881738567`*^9, 3.739469592718755*^9}, {3.7404302263015757`*^9, 3.740430227873192*^9}},ExpressionUUID->"74a0b491-33af-4166-b00c-\ cdbf679d4f19"], Cell[BoxData[ RowBox[{ RowBox[{"g", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100}, {Null, SparseArray[Automatic, {100, 100}, 0, {1, {CompressedData[" 1:eJwt0EFEgwEABeA/k0iXRbpExsxMIiOSStqYSYeZSJItk5SWTJJKMpnotkOH kY6do1M6Rbd0iU7RoUN0iIgk+qY9vtO7PC9SLOfW24IgKAX/6aafcVJkKbb6 VcpU2KNKjRPqnNLgjHMuuOSKa2645Y57HnjkiWdeeOWNdz745ItvfvhtjjQ4 RDsddNJFmB566SNClBhxEgwwyBBJhhlhlDEmmGSKNBmyTDNDjjyzzDHPAosU WKLEMius0Tx4g00qbLHNDrvsc8AhVY6occwf0DIuUg== "], CompressedData[" 1:eJwNydlWglAUAFDOPXBELoIaV0JCxKmyMgxsMrVBLcsmy+bReu8/+upaa7/t YPYzmTFJkn5Bkv5JDBVKqNycE8Xq4tLK0ek3oExa3issNzdGF8BkJaGmjHTG Ev+9urm1u7d/1B+OLq6un9++GLr+5gOgXhlOgCU1rhtmJmvnF2qNeLvd7Z+c 3twBngMm7c4bqf6MkVv+AMpV6+H+7ZNCqfR88wT16RNSodQBmsstr72jbj0j ZR3KrIOJaafSOL56BJwvr+707u4fuVkn1StF17rIWMUgnDAayNrC2nrcIpfZ weCGGZdyciM6/gBnx/Fq74bdO9TEgWJtnwF/oKAL+AXITJ67BGyjMF2ybrMu dw4+Z0yf3jPf9luH3+Tu7r260RbK2KKKKGJMK2OMVWNMtTNRQl4OSxEgUt57 QcXySWd4/gJU6bY7r4kRw0IdLbQVhzzeSDU/SYimXLUET2F6MIrHqJqB5ofT ZIiLEP0B8Wk2qQ== "]}, Pattern}]}, {PlotTheme -> "Web"}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.3265469505785408`, 2.4140491171651854`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.2700395069396073`, 1.1697519734192101`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.1315779842483935`, 1.449619016632213}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.020799357693557, 2.4521492943542484`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.9892089623663893`, 1.4325814658111575`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.7374289943646413`, 1.3668252203861004`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 1.675946030756789, 2.3798804055151646`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.6890671393860313`, 3.2651433521227418`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.4958824090959664`, 2.803233171046248}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.380090862276278, 0.8375552169811651}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 1.6953514808691472`, 1.258663653455085}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.3511373013213466`, 2.587034140224924}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.263850203381988, 0.5599942675537293}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.9119746065083802`, 0.8437215762349479}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.620940866825528, 1.0130366590008741`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 3.133756451797575, 0.7730739758994205}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 2.516111013729971, 2.2253451803860904`}}], LineBox[{{2.8852917745665847`, 1.7325217192782054`}, { 4.189790538176837, 1.939148888877428}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.2700395069396073`, 1.1697519734192101`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.7864031364294104`, 2.3145172844483124`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.020799357693557, 2.4521492943542484`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.4207040174964836`, 2.8858390000458316`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.8993211075638525`, 3.0923994739665845`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.6808840552065893`, 3.2126281131826513`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 2.770608948985882, 2.737604877494606}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.071458387682652, 3.5921758484346915`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 1.8012372365990816`, 1.5218142889362614`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 4.1960978564461895`, 3.0890489282445515`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 4.407377085493441, 2.1886936408617794`}}], LineBox[{{3.3265469505785408`, 2.4140491171651854`}, { 3.547540872446027, 1.7296977892299257`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.7864031364294104`, 2.3145172844483124`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.1315779842483935`, 1.449619016632213}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.9892089623663893`, 1.4325814658111575`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.7374289943646413`, 1.3668252203861004`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 1.6518903558720752`, 1.0339751031333533`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.7692200989262874`, 1.8053935703437083`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.6821223100639804`, 0.5552851914390524}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.799353876837885, 2.2944377585175655`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.2923657692518, 1.3349923234035743`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.380090862276278, 0.8375552169811651}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.263850203381988, 0.5599942675537293}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.9119746065083802`, 0.8437215762349479}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.620940866825528, 1.0130366590008741`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.803884547522752, 0.13016782154942708`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.1146715916968715`, 1.604281144597333}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.712259090309199, 1.606725931575522}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.407668022854786, 0.8394708598652443}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.250964817168693, 0.76566182165326}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.037104959368852, 1.38188381630009}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.133756451797575, 0.7730739758994205}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.1829851716040523`, 1.6361508293488967`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.3816629848935724`, 0.5897101118430075}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.407377085493441, 2.1886936408617794`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.547540872446027, 1.7296977892299257`}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 2.572019804357253, 0.3920882245509971}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 4.220526751030142, 1.131652856284524}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.115653019243446, 0.}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.9332239957226705`, 0.4548618025481841}}], LineBox[{{3.2700395069396073`, 1.1697519734192101`}, { 3.523347095912122, 0.014541863953644985`}}], LineBox[{{3.7864031364294104`, 2.3145172844483124`}, { 4.35612622476252, 3.0105127026704706`}}], LineBox[{{3.7864031364294104`, 2.3145172844483124`}, { 4.088762577850191, 2.6207514148659032`}}], LineBox[{{3.7864031364294104`, 2.3145172844483124`}, { 4.1146715916968715`, 1.604281144597333}}], LineBox[{{3.7864031364294104`, 2.3145172844483124`}, { 3.1029653897642073`, 3.0203270771793025`}}], LineBox[{{2.1315779842483935`, 1.449619016632213}, { 2.2350074854977526`, 1.158716837561478}}], LineBox[{{2.1315779842483935`, 1.449619016632213}, { 1.4982534600644526`, 2.2934791252918436`}}], LineBox[{{2.1315779842483935`, 1.449619016632213}, { 2.3816629848935724`, 0.5897101118430075}}], LineBox[{{2.1315779842483935`, 1.449619016632213}, { 1.1832634903128503`, 1.6293554750229968`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.0869966564200277`, 2.2960491109872554`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.4207040174964836`, 2.8858390000458316`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 1.675946030756789, 2.3798804055151646`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.2350074854977526`, 1.158716837561478}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.7692200989262874`, 1.8053935703437083`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.6890671393860313`, 3.2651433521227418`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.799353876837885, 2.2944377585175655`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.4173641852027816`, 3.298389171444236}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 4.133829608961838, 2.108865345888446}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.8993211075638525`, 3.0923994739665845`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.8531160239173143`, 3.418588762767433}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.5560075436022727`, 3.662846001226198}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 1.7961321564647694`, 1.9992573359831083`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 4.477398841834006, 1.7714428416049386`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 1.9638323200566923`, 2.901419032811879}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 4.210910856845875, 1.4029731009468254`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.0704210516718864`, 3.468333628143748}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.1829851716040523`, 1.6361508293488967`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.3296067503577533`, 1.8454601165922686`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.516111013729971, 2.2253451803860904`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 3.344700939454738, 3.6380580217382494`}}], LineBox[{{3.020799357693557, 2.4521492943542484`}, { 2.6307507490043966`, 1.5066519596940084`}}], LineBox[{{3.9892089623663893`, 1.4325814658111575`}, { 5.061676875070727, 1.758273441758961}}], LineBox[{{3.7374289943646413`, 1.3668252203861004`}, { 3.0869966564200277`, 2.2960491109872554`}}], LineBox[{{3.7374289943646413`, 1.3668252203861004`}, { 4.133829608961838, 2.108865345888446}}], LineBox[{{3.7374289943646413`, 1.3668252203861004`}, { 4.634230181650664, 1.0130989787504048`}}], LineBox[{{3.7374289943646413`, 1.3668252203861004`}, { 3.9332239957226705`, 0.4548618025481841}}], LineBox[{{3.0869966564200277`, 2.2960491109872554`}, { 4.088762577850191, 2.6207514148659032`}}], LineBox[{{3.0869966564200277`, 2.2960491109872554`}, { 1.7075307659472916`, 2.6799505554171907`}}], LineBox[{{3.4207040174964836`, 2.8858390000458316`}, { 4.35612622476252, 3.0105127026704706`}}], LineBox[{{3.4207040174964836`, 2.8858390000458316`}, { 2.134028688900182, 2.193867788151578}}], LineBox[{{3.4207040174964836`, 2.8858390000458316`}, { 4.29276463103761, 3.444394495128491}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 1.5656595450554942`, 3.4512394778317628`}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 2.3511373013213466`, 2.587034140224924}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 0.9966730339688281, 3.2567988359774387`}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 0.8294469919538665, 2.3804221422956986`}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 2.037104959368852, 1.38188381630009}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 0.8651235631917773, 2.165791951829541}}], LineBox[{{1.675946030756789, 2.3798804055151646`}, { 0.8758375608315645, 1.604633811809105}}], LineBox[{{2.2350074854977526`, 1.158716837561478}, { 1.6518903558720752`, 1.0339751031333533`}}], LineBox[{{2.2350074854977526`, 1.158716837561478}, { 2.6821223100639804`, 0.5552851914390524}}], LineBox[{{2.2350074854977526`, 1.158716837561478}, { 1.9225874686502502`, 0.14526487070973682`}}], LineBox[{{2.2350074854977526`, 1.158716837561478}, { 1.8012372365990816`, 1.5218142889362614`}}], LineBox[{{2.2350074854977526`, 1.158716837561478}, { 2.3296067503577533`, 1.8454601165922686`}}], LineBox[{{1.6518903558720752`, 1.0339751031333533`}, { 0.7007334735811379, 1.231587064955117}}], LineBox[{{1.6518903558720752`, 1.0339751031333533`}, { 0.8758375608315645, 1.604633811809105}}], LineBox[{{3.7692200989262874`, 1.8053935703437083`}, { 2.770608948985882, 2.737604877494606}}], LineBox[{{3.7692200989262874`, 1.8053935703437083`}, { 4.64292596511079, 1.3094197967809829`}}], LineBox[{{3.7692200989262874`, 1.8053935703437083`}, { 4.634230181650664, 1.0130989787504048`}}], LineBox[{{2.6890671393860313`, 3.2651433521227418`}, { 2.4958824090959664`, 2.803233171046248}}], LineBox[{{2.6890671393860313`, 3.2651433521227418`}, { 1.5656595450554942`, 3.4512394778317628`}}], LineBox[{{2.6890671393860313`, 3.2651433521227418`}, { 3.071458387682652, 3.5921758484346915`}}], LineBox[{{2.6890671393860313`, 3.2651433521227418`}, { 3.689888980986072, 3.896606376039378}}], LineBox[{{2.6890671393860313`, 3.2651433521227418`}, { 2.3461344220581544`, 4.226991971733806}}], LineBox[{{2.6821223100639804`, 0.5552851914390524}, {2.2923657692518, 1.3349923234035743`}}], LineBox[{{2.6821223100639804`, 0.5552851914390524}, { 3.115653019243446, 0.}}], LineBox[{{2.799353876837885, 2.2944377585175655`}, { 3.4173641852027816`, 3.298389171444236}}], LineBox[{{2.799353876837885, 2.2944377585175655`}, { 1.7750266235608267`, 2.2009090156811686`}}], LineBox[{{3.4173641852027816`, 3.298389171444236}, { 4.273346932093515, 3.93302296243586}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, { 1.7750266235608267`, 2.2009090156811686`}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, { 1.4982534600644526`, 2.2934791252918436`}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, { 1.7961321564647694`, 1.9992573359831083`}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, {3.253224225585769, 1.9615657903726051`}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, {2.572019804357253, 0.3920882245509971}}], LineBox[{{2.2923657692518, 1.3349923234035743`}, { 1.8213544226543334`, 0.4051923275066438}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 1.9225874686502502`, 0.14526487070973682`}}], LineBox[{{2.380090862276278, 0.8375552169811651}, {2.134028688900182, 2.193867788151578}}], LineBox[{{2.380090862276278, 0.8375552169811651}, {2.803884547522752, 0.13016782154942708`}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 1.4486023217322492`, 0.35677700062865814`}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 3.6699589921304145`, 0.5195711190223478}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 2.6307507490043966`, 1.5066519596940084`}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 1.4093323399026658`, 0.657991277219941}}], LineBox[{{2.380090862276278, 0.8375552169811651}, { 1.8213544226543334`, 0.4051923275066438}}], LineBox[{{1.5656595450554942`, 3.4512394778317628`}, { 0.9966730339688281, 3.2567988359774387`}}], LineBox[{{4.133829608961838, 2.108865345888446}, { 3.6808840552065893`, 3.2126281131826513`}}], LineBox[{{4.133829608961838, 2.108865345888446}, {4.64292596511079, 1.3094197967809829`}}], LineBox[{{4.133829608961838, 2.108865345888446}, {4.970499074950418, 2.2288282513951723`}}], LineBox[{{4.133829608961838, 2.108865345888446}, {4.220526751030142, 1.131652856284524}}], LineBox[{{1.7750266235608267`, 2.2009090156811686`}, { 1.6953514808691472`, 1.258663653455085}}], LineBox[{{1.7750266235608267`, 2.2009090156811686`}, { 2.4440472598472733`, 3.4389127520907885`}}], LineBox[{{1.7750266235608267`, 2.2009090156811686`}, { 0.8294469919538665, 2.3804221422956986`}}], LineBox[{{1.7750266235608267`, 2.2009090156811686`}, { 1.1832634903128503`, 1.6293554750229968`}}], LineBox[{{3.8993211075638525`, 3.0923994739665845`}, { 4.651554910115795, 3.5857709380587255`}}], LineBox[{{4.35612622476252, 3.0105127026704706`}, { 3.8531160239173143`, 3.418588762767433}}], LineBox[{{4.35612622476252, 3.0105127026704706`}, {3.689888980986072, 3.896606376039378}}], LineBox[{{4.35612622476252, 3.0105127026704706`}, {4.273346932093515, 3.93302296243586}}], LineBox[{{4.35612622476252, 3.0105127026704706`}, {4.477398841834006, 1.7714428416049386`}}], LineBox[{{4.35612622476252, 3.0105127026704706`}, {5.249964684783818, 2.4962170010638762`}}], LineBox[{{3.6808840552065893`, 3.2126281131826513`}, { 2.4440472598472733`, 3.4389127520907885`}}], LineBox[{{3.6808840552065893`, 3.2126281131826513`}, { 4.651554910115795, 3.5857709380587255`}}], LineBox[{{3.6808840552065893`, 3.2126281131826513`}, { 3.344700939454738, 3.6380580217382494`}}], LineBox[{{2.770608948985882, 2.737604877494606}, { 1.6252277148490986`, 3.3040897726859506`}}], LineBox[{{4.088762577850191, 2.6207514148659032`}, { 4.1960978564461895`, 3.0890489282445515`}}], LineBox[{{4.088762577850191, 2.6207514148659032`}, { 4.970499074950418, 2.2288282513951723`}}], LineBox[{{4.088762577850191, 2.6207514148659032`}, { 3.253224225585769, 1.9615657903726051`}}], LineBox[{{4.088762577850191, 2.6207514148659032`}, {4.29276463103761, 3.444394495128491}}], LineBox[{{1.6953514808691472`, 1.258663653455085}, { 1.4486023217322492`, 0.35677700062865814`}}], LineBox[{{2.4440472598472733`, 3.4389127520907885`}, { 2.5560075436022727`, 3.662846001226198}}], LineBox[{{2.4440472598472733`, 3.4389127520907885`}, { 2.3461344220581544`, 4.226991971733806}}], LineBox[{{4.64292596511079, 1.3094197967809829`}, { 3.6699589921304145`, 0.5195711190223478}}], LineBox[{{4.64292596511079, 1.3094197967809829`}, { 5.6366425418525505`, 1.6762223839000887`}}], LineBox[{{2.134028688900182, 2.193867788151578}, {0.9537782987866459, 2.656089135053319}}], LineBox[{{1.4982534600644526`, 2.2934791252918436`}, { 1.9638323200566923`, 2.901419032811879}}], LineBox[{{1.4982534600644526`, 2.2934791252918436`}, { 1.1703290535351862`, 3.3883574606016285`}}], LineBox[{{2.3511373013213466`, 2.587034140224924}, { 3.1029653897642073`, 3.0203270771793025`}}], LineBox[{{2.5560075436022727`, 3.662846001226198}, { 2.0704210516718864`, 3.468333628143748}}], LineBox[{{3.263850203381988, 0.5599942675537293}, {3.523347095912122, 0.014541863953644985`}}], LineBox[{{0.9966730339688281, 3.2567988359774387`}, { 1.6252277148490986`, 3.3040897726859506`}}], LineBox[{{3.620940866825528, 1.0130366590008741`}, { 4.210910856845875, 1.4029731009468254`}}], LineBox[{{1.7961321564647694`, 1.9992573359831083`}, { 0.8651235631917773, 2.165791951829541}}], LineBox[{{0.8294469919538665, 2.3804221422956986`}, { 0.9537782987866459, 2.656089135053319}}], LineBox[{{0.8294469919538665, 2.3804221422956986`}, {0., 1.7956066323904025`}}], LineBox[{{0.8294469919538665, 2.3804221422956986`}, { 1.7075307659472916`, 2.6799505554171907`}}], LineBox[{{1.8012372365990816`, 1.5218142889362614`}, { 0.7007334735811379, 1.231587064955117}}], LineBox[{{1.8012372365990816`, 1.5218142889362614`}, { 1.4093323399026658`, 0.657991277219941}}], LineBox[{{4.970499074950418, 2.2288282513951723`}, { 5.249964684783818, 2.4962170010638762`}}], LineBox[{{4.970499074950418, 2.2288282513951723`}, { 5.6366425418525505`, 1.6762223839000887`}}], LineBox[{{4.970499074950418, 2.2288282513951723`}, { 4.189790538176837, 1.939148888877428}}], LineBox[{{4.477398841834006, 1.7714428416049386`}, { 4.407668022854786, 0.8394708598652443}}], LineBox[{{4.477398841834006, 1.7714428416049386`}, { 4.250964817168693, 0.76566182165326}}], LineBox[{{4.477398841834006, 1.7714428416049386`}, { 5.584422215348422, 1.2081171184642054`}}], LineBox[{{5.249964684783818, 2.4962170010638762`}, { 4.712259090309199, 1.606725931575522}}], LineBox[{{4.210910856845875, 1.4029731009468254`}, { 5.240162196541267, 0.854568409059866}}], LineBox[{{4.634230181650664, 1.0130989787504048`}, { 5.240162196541267, 0.854568409059866}}], LineBox[{{2.0704210516718864`, 3.468333628143748}, { 1.1703290535351862`, 3.3883574606016285`}}], LineBox[{{4.651554910115795, 3.5857709380587255`}, { 5.2142090911749035`, 3.107955592899203}}], LineBox[{{4.407377085493441, 2.1886936408617794`}, { 5.061676875070727, 1.758273441758961}}], LineBox[{{4.407377085493441, 2.1886936408617794`}, { 5.2142090911749035`, 3.107955592899203}}], LineBox[{{5.240162196541267, 0.854568409059866}, {5.584422215348422, 1.2081171184642054`}}], LineBox[{{0.7007334735811379, 1.231587064955117}, {0., 1.7956066323904025`}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7VY885awKLtD61FrjvTN/+wXrT+b972L3aFp3ioR /r5/9rbLWC4HfGV3CFiUyrpe8Z/9zL85LNs9ORymf56y6FHFX/vN1fw8z+s5 HBLZ1G/pL/ljb8J/g3XyJA6Hlb37Nmbs+A2X/ygS1rnwzC+4/t3qLw68+/4T bj5TpXickv9PuP0Xai75HXr0wx7mvrOhjtFZe3/YvzJLdTOYzwaX93fQe3TN hA2u//OLoxsKHrDCzb+ZpbzSYRUr3P6I61Hrp0xnhbsPJg9zP0w/zH8w82H+ h9kPCx8A/QaayQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.8852917745665847`, 1.7325217192782054`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$1"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbbL/1NIjc7gcGF6wq1ecZXGY8Puf5Qohbof6EHvd M7tYHLQ/mc5jrOV2SL02R3VOC4tDu+e88+kXuR04602+mBqwOCw87nB9OjuP Q17H3/47R5kdlKI5LzpL8TgI+Zz8/cOfGS6/jX9quugtJrh+ack45j35THDz 9x/8ejFUmglu/1Ln4FOqTxkdYO5T2dB1ofISo8ONpmmCD9W44PK2PfFr2/dw wvU/NPlerZjBCTf/+LaQko+GnHD73ZR7qlzlOeHug8nD3A/TD/MfzHyY/2H2 w8IHABIXhTk= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.3265469505785408`, 2.4140491171651854`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$2"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/aNcvJJLk8shtvahns+mr/YhW7x5383jcogKC7D+ 0vPV/v2qpkJ3Tm4HjShunSkKX+29mV4vWhvL7ZC/2urk8fIv9qkNvavuTuZ2 sNx3hkF08Wf7Z8JhSzqXcTs0uqbc8N3+CS5/8szv9W2nP8L1T77f+/zytw9w 828Z7G1h9/sAt98/88Mrv8Pv7WHu85I+xzy/4r39HOvHT9Q2c8LlGV3XNJz1 4ITrX/rW2T/9Cwfc/O78he7m+zjg9nPdueHbvZoD7j6YPMz9MP0w/8HMh/kf Zj8sfACKDJl4 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.2700395069396073`, 1.1697519734192101`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$3"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbVnrvKvXi8+hq3zKuQWMLA5Td5b7FR7gc+B8cvrK l3fMDgYb1m06pcXv8D5V8+yRHcwOPeziTwzq+R0m8x2cHZfC7LCsdefrhK38 Dj/Eu8xZfzE5qEs2PeU5we8w53boYsUWJri8w3xFfjs+Jrj+pSterXqymBFu vmdgU2WdPyPcfv3L9wv9JBkdYO5bZy9esYiN0eGuA7/aqiu8cHknrxsHA7J4 4fqffcqf8EqUF27+mZKzHbvu88Dt937I0s93lgfuPpg8zP0w/TD/wcyH+R9m Pyx8APmDiE8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.7864031364294104`, 2.3145172844483124`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$4"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXXtY8lAFL6OD/F47nkU6v+xv/vcNi2lmdJCZtlbC i/2Xfcm3ll1b3zI6vJqZwflq1k/7C75vX0s7MTkYvp6+TPbTD/tXp/s/e1cw Ofz+q3kvS/aHfXZ8xNvvXUwOzq0Hty42/A6X7+aJ7L3j+g2uP1T+9RHNwq9w 8+cUSCXFnvgCtz+r5GrQ3+gv9jD3pfu6xC81+2Kv2P5Ud+p0Brh824R1J611 GeD6Q4p6DFZv/G8PM1+hzF3R2/W/Pcx+Of9tup/l/9vD3AeTh7kfph/mP5j5 MP/D7IeFDwAkvpsM "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.1315779842483935`, 1.449619016632213}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$5"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvWVSx60ZWhwOs5/az6uXZnUQOL8nr2YBh4NUUPmS yxysDquPfr50lYvTgeHKlTmLL7E4sMvGsNjEczosqcnJtq1jcVCc/Y87Zyqn A2ebKfsTYRaHRXrHWSVWcDqs9WQsZpjHDJcP5D17T0aDGa5/m9i0qsN7meDm R+3X9YzNZILb7+DY7ahrzOQAc9/+tYfcGxWYHCLCQty2bmGHy++Nl30U7cUO 15/IsXXD169scPPdu4RWHt3PBrf/2DfP9ZJr2eDug8nD3A/TD/MfzHyY/2H2 w8IHAPd0eoU= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.020799357693557, 2.4521492943542484`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$6"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPdegKPnZS36HN8WtD288+2lfa3b59xN9AYdXPl/e Nhz8aX9q47u1gqkCDtsC1t9TCP1pX3F30TGXfgGHfwvvVYes+WHfKlNyKmaV gMOJLQWbF17/bu+WFnF802YBBwEbju5br7/B5SMOz08SZvgG1690zXBWgvZX uPlZ6onmU5q+wO0305bRMBH7Yg9znwlLt8mdD5/tHb/Ynmcq4YfLL/vLlr2S kx+u32vZPEvnrXxw8w00/hgK1/PB7V8/xdgiPYcP7j6YPMz9MP0w/8HMh/kf Zj8sfAByy5dD "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.9892089623663893`, 1.4325814658111575`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$7"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvT5CX8fxGa8D147TpU03f9hzT00+oBLD58Ax0apJ a8sP+2Xds1TqjvE5XJnyteiU+w97psdMYU+k+B1knqkI/Jv33V4mcWmsSCC/ w7Mf29y9T32zn/slN/xAMr+DXoOffMu9r3D5MvZn3/Z8+gLX7yBVoccl9wVu fkf28tO2pZ/h9ofkJ+25y/HZHua+II+LJ1off7IPlvk9PbaAFy6/Q/WIMQsb L1x/zLlopnkbeeDmOwXs/JVbzQO3/+CeDwyHMnjg7oPJw9wP0w/zH8x8mP9h 9sPCBwDRf5BC "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.7374289943646413`, 1.3668252203861004`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$8"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvah6oq/2Jg6H86Y+WuduMzv82370IZ8Gp4PfomYD pZPMDjPX/XHNmMTpYKLyUOPTJGaHr6yp5eeecTrcOFPxvduO2YG/hb3+nwyX g+01x8lGV5gcJohfqFilz+XwcCbvf784Jrh8a+zNrOwXjHD9r9IWsQnVMcLN 7+O3urpakxFuf8nE6WerPzM4wNz3+e+5y+cfMDi42cfudLfhgMuv9lALfXeR Ha7f/+Ne5Y5adrj5psXSMhHu7HD7t9wPUlpjwg53H0we5n6Yfpj/YObD/A+z HxY+AMnZhVI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.0869966564200277`, 2.2960491109872554`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$9"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvbE7WXBWLLfDiSiTtxsnczjwnpi+tPYyt4P78ezP rI0cDiv2neO8bsvjoOt58vVVLw4HFjFza9tJPA4XPybsyv/G7iA35aZT7gke B7PfmmFiPewO89UX2Uje5nG4te/rQSMxhHxd00Fd/wVscP2Pu7tOfjVlg5vf bqI0o/8hK9z+3G31E+JXszrA3PdGafu0zTNYHUL99Wu3PeeCy++K+CERW8sF 1x/HOOH5Nw0uuPkuzW/vH/vECbf/8HuVZ1IPOOHug8nD3A/TD/MfzHyY/2H2 w8IHANV5iu0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.4207040174964836`, 2.8858390000458316`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$10"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/TPx/4k1F37ZZ9nqv6htZ3HYeCv9Y/Ge3/YvV6a9 u1jC4vD8+NWdahP/2J/XPvJsoR2Lw4KyZTKfLf/aF1+J3mr9itnhUtFr7eBl f+1v3FUJfFTP7HB1Zo386tN/7WsWftjzjxMhr5C6R0N6ChNcf2te65GDmkxw 8zXFZSdHX2WE288/s6pbez6jA8x9faybJtb3MDo4vpy24OmTn3B57j8aN4wE fsL1B/lGlKal/4CbrxAonMb2+zvcflmtpqJ1V7/D3QeTh7kfph/mP5j5MP/D 7IeFDwC9PJ8f "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.675946030756789, 2.3798804055151646`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$11"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnWd5ZJb3Q0aHPYvUGSVbv9qfKv2hpx/O5LCrehrv wfiv9qk5+pM7DjI5tNUH/kv4/MX+4OHpR96JMjucu9Awe4rXF/vbjlZn5HyY HWY8Frr8sPSzfcxVpmOn4pgdHmStWiXV9Qkur/HJsSl43ke4/k8sV3YuOPkB br5VGHP4FYUPcPt5t9T0v8h4bw9zH0da1AoLuff2Qn/72TKyGeHy5WyRi/gY GeH6pdd/KFixhgFuPqOhX2ZFGQPc/oa5rflnkhng7oPJw9wP0w/zH8x8mP9h 9sPCBwBYu5Q0 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.2350074854977526`, 1.158716837561478}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$12"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQLXXswxSVvF/2HDNOXVBv+2x/yS5y7+vI3/ZshZZ3 zyd8tufQOd46T++P/aWSL2fzv3yyP3Br+ous63/spY4pZy/2/mT/5dqd76ec /9o/ubF10Yeyj/bf/ua+Vsr8a6+T4Ful2f0BLv/83MnFR+zew/XXfnkrFD/1 Ldx87uk+vsec38DtXzrvkB5b9mt7mPsWBCxwD1N4bZ/k25ET2/QTLq+TILVk 1dofcP0lGz0d77H8gJvvsJXFqG7Gd7j9dn3FdmrF3+Hug8nD3A/TD/MfzHyY /2H2w8IHACd0rSI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.6518903558720752`, 1.0339751031333533`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$13"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvaqZ6V6MOp/DpWNntzy6+9+e7YBZkcNcPocL820O du34b79wW+61mez8DnMWf9+o5fPf/i/vNXaGGH6HJ1/U/OMW/7MX76ngN5jE 77COfWfb6nN/7WfIO3LeWcLv8K0vIO7Joz9weTuxF6ay33/D9XNoVuVmKf2G mx9QtZJrXuUvuP0ydSm/bXl/2cPcJxV+mf3Z85/2fu7nPCs38sLlNwdMfyrv zgvXH/5Tb8vOTzxw822re9Z07uGB27/n+eFNd1fywN0Hk4e5H6Yf5j+Y+TD/ w+yHhQ8AFT6XIg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.7692200989262874`, 1.8053935703437083`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$14"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7eP1eKFpM6vDvP7+pU1zuB1WtImbSf5kdZD9c2z1 tU5uB+dav1lFyWwOzHUqS5YFczvMv7Lt9I3tbA7L1fYUOfznctgZFHmZ4x2b A49BK9/zKVwOVs8Uz25hYHfY8DmgilkeIR+yXeaZ/EpOuP6dB542HrPjhJsf m1kbkPCKA26/8+tbHgZbOBxg7jsULuTfspDD4QPvet4gXoR8qHjFyh+LWOD6 f+7nr5jkxwI3/75jbkGSBAvc/rh1S8q2sbLA3QeTh7kfph/mP5j5MP/D7IeF DwBUuoN3 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.6890671393860313`, 3.2651433521227418`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$15"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrXdsTdefElaHZYEKCo92PbfvYnoo9+AVq8NC5n8W RgXP7VV/ijdbhrI5WHOXSBVNf2bfGNCwZf5KNoeTay+F3HR9aj/7nNKe8/fZ HOIvfztcPOexvUzS663Vn9gc3j1ULX565CFc/teDlS7rbt2H61fT+aT0uP0O 3HynwvXTNz65Cbe/rGF2lKHxDXuY+7KfhPVcnHvd/lJnxTeJ/yxwefPJjpP2 T2GB679tfTMh0oEFbv7BvWaRmlwscPsdtPLia78zw90Hk4e5H6Yf5j+Y+TD/ w+yHhQ8AlLOdSQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.6821223100639804`, 0.5552851914390524}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$16"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvWiG+VLhVDaHW++sohpvMDv8u5Jt+f0Wm0NkdFHC 1aPMDjNPL5ob4MruYH/3fMTSfmaHr0rc57fNZHd43Jqubm/N7MC/cO21Z+fZ HTz6DQ4/vcDkMMGk7MKkR+wOb4L+6DFFM8HlJ4idmCX3lBGu/6v8RLOjVYxw 82ee0GCNV2OE21/v1fZX7wODA8x9/7btZW6+y+DgFsMsaPCeFS6/OvXMmmst rHD9/nwp1QUGrHDzTSccLHb4xQK3f8ufH5VTnrPA3QeTh7kfph/mP5j5MP/D 7IeFDwATronL "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.799353876837885, 2.2944377585175655`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$17"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvX3veo7DYdwODO5P2Wc+4HYQ/vV4zrIz3A71m2X4 3p7ldlj3QYqRwZzHIdW0im3vdG4HLo9mo7RuHgfOe4JXw5y5HVSOqVpNO8jj kPf8VsHfG1wOSyPfGTtd4XEQWr3sjmQyF1x+W16Rh9lbTrh+6QrrJ3eaOOHm 71e4vKlMjxNu/9JFBqvdfnA4wNynwp+xcdZTDofoxuqS+w+44PIHulwE2sq4 4PpTjO/ck1figpvvtdXy+vvXnHD7TyoW3nW+yQl3H0we5n6Yfpj/YObD/A+z HxY+AKiFhVI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.4173641852027816`, 3.298389171444236}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$18"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvfOKr9HE78wO1xxb1rW8YncQFWw6VpLL4hC6bveW G9fZHTaw79Q6d53FwdpAcu2KhewOPPGKMSY6rA73b2yodvJld1C7ezg5JYnV weVRpfjLR2wOywt6YgVKWR1eLHVtZs1lg8v3ZAq+V/zOCtf/sehW14keVrj5 U6WLIpMsWOH2V889H2jExOoAc98vTvaItvcsDrEzJOetbWSGyx9a+MgyRJwZ rj/Nq4rj3SEmuPk+Z64z7Othgtt/2oKfXaiKCe4+mDzM/TD9MP/BzIf5H2Y/ LHwAiYKBnA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.4958824090959664`, 2.803233171046248}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$19"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbe3gffdwGJPDNrEp9vLhP+yn19QXLj/D5LDlPZPP ccMf9kbF264ymDM7NHzea5N+9Lt93yk59vRuZocTLm9vzpL5br/C4yDf9IPM DpPC6wVfuH+z17zTyeF8hdnh1j2xlwoxX+HySmnrDkQWfIHrf1Ph8GPZ7M9w 801O5U+99ekT3H6Gc1ptVW2f7GHu+7ds5iSlxE/295nFPR88YITLu/A+eNJW xgjX/2Jr+WYFJUa4+efMr67+8JoBbr/vEp5NLjcZ4O6DycPcD9MP8x/MfJj/ YfbDwgcA0KuaoQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.2923657692518, 1.3349923234035743`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$20"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnfLwu3AuF7PDrtWii+clfrA/IKuzIqCB2WFHS8t6 N5sP9tEiyTyrXjE7cArWO5yd/95+e/ZpWwF7Fofpm+9Wmfi9s7/4MtfVoZTF Qfcm46tzS97YB9Wa2b9pZ3HY89xgpsPZV3B572/xHpu+voDrfyjdst3H5znc /Px9jz5u/vUUbj/nsYjLnxWf2sPcx1Jh9sb5+hN7jqWH6zunMMHlc9f1SBto McH1C4arvDp5lRFu/vcbjY9mzmeE21/muvPF2x5GuPtg8jD3w/TD/AczH+Z/ mP2w8AEAMaOZGw== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.380090862276278, 0.8375552169811651}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$21"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/eP9K9aPPD/t11nsm7NIktdhQ0aw3o4fP+11l35d 9I2N1+FZ6MFvWWd/2QurB88+doHHYR7LpEjzst/228+/ykyo4XG4xHA9Y/qj 3/YyNzezsgvxOFxRz4h5z/7H/sCc+kLlOdxw+ZQE77v2atxw/SczRSqf7eaC m58rtMa9IZ0Lbn/wFE6HAEMuB5j7LjE4ui2R43JwKG+6q6n4Ay7P1SUiWu7z Ha4/6LbzplWLv8HNl7v/b5GX+Te4/TI7ctd/EvwGdx9MHuZ+mH6Y/2Dmw/wP sx8WPgDwzpJt "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.5656595450554942`, 3.4512394778317628`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$22"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzfaSbSFXp4BD79oF34pjmBxM2BWz/xwWcOCRuvHn uCeTQ2OTjazmTwGHT7NNv04XZnIwWPfBNEZZ0GGay9nDhvsZHWzeHrQssRN0 +O07Lf5GCKPDX7NlZqfcBR3mCyad/nKPAS7vfFXXXDCTAa4/YO/bpfl//9vD zJ/BJ+u8OOS/Pcz+FKEbxs4v/tnD3Jf02s3h9aF/9jdOvbkm4YeQ7/a/qPJG AqF/p7uVRNFdfrj5809OF3Bazg+3X87svNi0Kfxw98HkYe6H6Yf5D2Y+zP8w +2HhAwAJeIkj "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.133829608961838, 2.108865345888446}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$23"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzXLthvDrQ//sI/mMEv+ZX7Xf4+dos2ndf3u/oreT 5i26Yv9zbnjTJkcGh6bGm6FyHy/Zh37dv1liGoPDvGPTTr3xvWCfX5y02+MM g8Nk5X2Bzt9O2n9g09765R6Dw4XYKj6uGYfg8lIGudMWFm+D6+/ZKSP/KmAR 3PyGNyeuC7qW7YfZ/2HxDOUlIQv2w9zn0bJ36qL/S/b7xBa8Vr7+Fy4vVsCk XMj01x6mP+6g4YElkX/sYeZrHX2zweXtb3uY/Rrzove+Of7bHuY+mDzM/TD9 MP/BzIf5H2Y/LHwAJUekVg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.9225874686502502`, 0.14526487070973682`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$24"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvXCidGBT2h/7Pfp3o75KMDtEcrVUegb9tbeeI5Lo ycbs0P/9o+MftX/2inJFkZIXmBw8lh1acuL8P/ujxzg1NlczOVQtYt+iYfPf XuvCpcORgkwOtSdnLG9I/G9/bvI8/bLZjHD5ovCs2ZNUGeH6rycYm1vuZoCb X815mvVyGgPc/sRujX+LDBgcYO578D2e5bssg8NLic0au6t+w+U3a7smcCz7 Bdf/q6bkr/Xfn3DzTzTov7s94Sfc/qOR8341Z/+Euw8mD3M/TD/MfzDzYf6H 2Q8LHwAS/ZLW "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.7750266235608267`, 2.2009090156811686`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$25"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfWzbGefzhvwOEoVbpXZbcTkofWa4sWk5v8P0u28U +DW4HO59kZZj4xRwqI33krz/kdOhV+GCmaWxgIMix6PnFXM5HWbGL7QK9BNw aBNc3SxvzOkQtbLVfHm4gIPW1bL31ns54PLnZjhFR7hzwPUbL+L+/u8OO9z8 616Lj87oYIfbv/cMw76MIHYHmPtsLC2O7LFnd8iqmrH+9W4+uPz55kTvSYF8 cP3FOj8ldf7yws2PXBcm9OcYL9z+G1J9EgFbeOHug8nD3A/TD/MfzHyY/2H2 w8IHAK3fgoo= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.8993211075638525`, 3.0923994739665845`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$26"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXZiZFLUmR9DB5IX/LbbJnA7z22tU5i0XdNgc0v4g qoHT4Q3TjGun7gg6zLz25IaWF6fDbD2f93/ZhBxs62uWH/nK4bA8V/azqJKQ w6IOV+fsbg6HjO2MH7K1hRzcfATXt4si5F/x35VaMp8drt9fctk2L1N2uPmf D9q2PnnABrf/pvPs2i2r2Bxg7ovYcKmZYwabg7O3x4Rdhgj5b+d17vX+EYDr d19ScTTqkgDcfOvU5QedtgvA7a+SPnzkzVoBuPtg8jD3w/TD/AczH+Z/mP2w 8AEAblWKxQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.35612622476252, 3.0105127026704706`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$27"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/SaiuE7vMp+Dlehn6yPXeBw8pi4XEvLkd9jZqOUk cYTH4XH3vbLszfwO85k7rF708jgsKFS+8oJZwMF5jTxnkyWPw5oNX64zyAs4 rNj6YonGeW6H3F83roRpCDj4VG4RcI3khst/sGmoSXzMBdcf6uYpwVHJBTf/ 57sHzxaqcMHtv19gd7/wHacDzH1xd0ufHr3N6TBBxv6VVywfXP6rKkfbx0+8 cP0zz80P6Z7HCze/PuCvT3QGL9z+f3tMgteH8sLdB5OHuR+mH+Y/mPkw/8Ps h4UPANH5h9g= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.8531160239173143`, 3.418588762767433}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$28"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHXf9dVhxEa+DlH1j51cDboddwgqvw17wOsxcvaPf U47bIZQr3H9DEJ9Dva5Yh+QLLoeNifsbxJbzOShfWxu2eTKXw+n7iR1ud/kc Ou6XfYrU5HLwKdZq+vSez0FnsVNc2WZOuPyFNL5Tk2w54fpNC66nWl7mgJt/ UyLf5HIdB9z+/bPO6Cz24HCAuc+OncX4uymHA9Ps7Yf6//DA5dOXNMSZTeKB 6+f2ldC9YMsDN//juVLVBew8cPsLrNdqf/nCDXcfTB7mfph+mP9g5sP8D7Mf Fj4ATcSBeQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.6808840552065893`, 3.2126281131826513`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$29"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfcjQn81Ui83hkodAn0wKu4NcXvMsiQVsDoFb3acU BLI77EzZ9a+Qi93B3Hxpj4M0u4PoHiWDG3HsDrfv20TfOsbmoG911JxjKruD w0vW7w0xbA4bzvYablnO7vBkzcWkuc9Y4fIdBXPP7Sxghet/W5mWlcDGCjd/ otI/i18bWeD2ly+JNjxVzeIAc983gcnmcpksDmlfpYoCt7DC5U//e8z7w5MV rj9/efWdiV9Z4OaHat68krifBW7/lakCt7euYYG7DyYPcz9MP8x/MPNh/ofZ DwsfABJ6hSA= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.770608948985882, 2.737604877494606}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$30"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvfDZ4clPogQcln4/s/50CZvDeZZ7sdemCjiopLBs k09ic5Bp+MnPfFrAgetZ4rr32mwOp1ev1TD7KuCwru9nTed1Vofrr+p0/AQE HYRnHJIwyGV1mGGSrLlEUtBhe3Rfi893Frh8tHzUh4xGFrj+AxrKPfziLHDz Uy7uilp5iBluv1ewRHBlD7MDzH0n9/tHnq1kdig+sfLkJ3mEvPcsGf2eq/xw /e+dtvxVbeSHm3/1iOC3r178cPtDDD3/eFrww90Hk4e5H6Yf5j+Y+TD/w+yH hQ8Anr6Guw== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.088762577850191, 2.6207514148659032`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$31"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbfbuxn0Nhd/2Am6O16rkvtu/S3Pk+MD9x55PfsMj pZ/f7FVC1l9Y9OCP/S2l7MuHer7Z32FqMM7v/GuvVDKr4Nvjr/YC/484nf/6 1/5Nm84KZ/6v9kJqYWbq0v/sTfiO1Ncof4HL10yNDt9q/hmu323F2z6m5E9w 8/t+yuiY7foItz/q73WZa74f7WHui7jmplmn8dG+rrRge6LJL7i8RwfT+3Xx P+H6J9w07Hm07Qfc/Ji7b2qavH7A7Y/aFt2ppfoD7j6YPMz9MP0w/8HMh/kf Zj8sfADj4KbH "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.6953514808691472`, 1.258663653455085}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$32"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrZ8Yviyjl9nh8uV5t5MZeB2653Zb+TCzOAQ5XHu4 /S2Pg9qUQ/OW5rI4WBwyvtW+nceh6bXWBe5DLA53sk6vUEzmcZiTefa69Q8W B8eSKS4nfnA7yP6devE5F6vDU/OEDU+auOHynb+1ZRh5ueH637F83b58ERfc /Elre9oc/bjg9lfov6oTlOBygLnv+2zF1lRWLofLKspCreLMcHkLvTdrtdcy wfXfudZcczSCCW7+oYiHJVOVmOD2Ox6VqH7JzwR3H0we5n6Yfpj/YObD/A+z HxY+AJ9ehmo= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.4440472598472733`, 3.4389127520907885`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$33"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvX6mun70JCEH3yO7mxLefbe/u93xp89ZIQevuVr9 HCe/22sZx66uZBJ2kFj4tH5FzHf7m3GCR9boCDvEfxKRvbP5m/3TuY+OH3EX dtBkXR6ief+r/bLnx45IBQo7FPbY6SR9/gKX3yl8jXk2+xe4/ma1DOsXRp/h 5p8qn35DuusT3P4Z1UEnd8t+soe5b2rIwavJPz7aN1bzpmaGI+RNGD5tslES gutvvWI7i/OHINz8yqk50z7eEYTbv8O7Y+bsy4Jw98HkYe6H6Yf5D2Y+zP8w +2HhAwAE7JWm "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.64292596511079, 1.3094197967809829`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$34"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPSVLZlGtEKPDmyrfnZ1czA4flgWYJXYwOmQ/b9l/ 9zuTQ/fc9lm7PjE6BGY+2r72IJPD8y/vTyu4Mzl8Faxqc89lcmAsnnQ5oJbJ IUraWekdE5NDE1v02T/9TA7/7vH1cfUywuUXLbr1U02cEa6ffc3iqWfXMMDN Xx1inZIewQC3f+K1GTHmSgwOMPcJOF9I6uZncLDQe8E7aw4DXH6u+caVDkYM cP1NByZ+2LL7vz3MfL8jPg9D/P/bw+z3mbv77R/N//Yw98Hk4e6H6of5D2Y+ zP8w+2HhAwAaE4xS "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.134028688900182, 2.193867788151578}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$35"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfbP94LwbP77bW0qvONB1jdlhIoPW8flPftjvaL9/ 7N5hZofjb6f3B+38aT+P03b/ul5mh4Y5GZ/kkn7ZO2260uthyeywacZaxvpz v+yX756r+f4ck8PW/XZfr33+Ze9dnzmVO5IJLv/eyZRR4zEjXH+Iz7855yoY 4eb/+DI1O0OFEW7/vbLPyRbvGBxg7ot9rJXVc5vBQZE/skyQ9ztc/rXi67Vx Ft/g+o2Kpbwn9X+Fm89QftXaSPkr3P6//i4et/5+gbsPJg9zP0w/zH8w82H+ h9kPCx8ABdicxw== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.4982534600644526`, 2.2934791252918436`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$36"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvXTpGSHF80wOTpfOyu/TZ3NgfMSwnMWV2eGgHaua kCybw5wb5txx65kdlh9Iknv0jNXhh/4CmyPMLA7emb/eVE9idRBa5+TyxZLF YUPR4Q4lDVaHyY7cdgt8WBxCzPq/2G1igcv/+BmVEG3DAtcfy6zyh/ESM9x8 xjW7T82uZYbb/1xX8nC2O7MDzH1pswJO7jdhdvDMnFFnG8kEl19XlCj15B0j XH+Q9M8XtbMY4eZbzA176JvCCLd/O2ff84WBjHD3weRh7ofph/kPZj7M/zD7 YeEDAGYFfOc= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.3511373013213466`, 2.587034140224924}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$37"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/e2cg+iWIhYHLZbueMbTfA5B3KUrp79gcVhZcCg1 dAefw1vGNbwfg1gd+j/Jx6k28Tl4RorYhy9ndTCevV1nvy6fQ/L1bW7td1kd ZixpOJF6mNfhSVa9g/EHVgebDB+TJl9euPwDbYkF867zwPW7mj60ds3lgZv/ 8m4F130JHrj95+OvMa1/xO0Ac5/fGV5O5gvcDrMm8TRe+MMMl/8/+6pM+SRm uP7FLrmvBeyY4eZ3Hjv1+AE7M9x+DmOmVyZfmeDug8nD3A/TD/MfzHyY/2H2 w8IHAMxTg+8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.5560075436022727`, 3.662846001226198}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$38"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXd5zpS5WhstBKFz2WOnD5/aXT3AIO07icuDl/H3v 6LTn9nn77ctn/eFyWC5QeIB13zP7U2IrVjAEcjuYbj7/Kyfnqf2TKV4bDNq5 HU7f+JzJfvixfaqG8Ko7M7kdop4rSVa+fgiXf/k18MQr4Qdw/f/M3uRxXb0D N1+qZuXjG4a34Pb7dU9dFtFwwx7mPuf3ATd+vLpuLx2w4FXlMk64fENkZpuC DSdcvwoTY+iu5xxw87la4ny7NnLA7e/8MDX43jwOuPtg8jD3w/TD/AczH+Z/ mP2w8AEALIWXMQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.263850203381988, 0.5599942675537293}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$39"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7fB4bfhOb3aH31+6Oh5UfbCfI//o9ZyD7A4/zv6c 0hH6wd5cTDLgmzaHQ/fiTO7AS+/tJ+c2NsY0cDhIup1w3dHwzn7ta+XOnm0c Duuz32wJuv7GXq/+TZPFSQ4HuyrplCP/X8Hlz3Z4CZtpvITrT16X13Sh7jnc /I8BZ/eY6z6D298d4TyvPOSpPcx9bVyK249zPrV/sqzy8NWrbHB5zw1O8TXZ bHD9byNu6YqJs8HNv3zLXO3ZA1a4/UHu+TpW51jh7oPJw9wP0w/zH8x8mP9h 9sPCBwCER5qd "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.9119746065083802`, 0.8437215762349479}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$40"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPednwbGISRwOOWuM7rha8Tn8MF0aZcPB6fBaIuvR THU+h8k6d/ZNLeJ0uDjr+K3Mj7wO75tdPvw+xulQ6hy/knkurwMn0/Pv2n85 HW75aLiuMuJ16Jq6/uN1fi6HOoEvG47t4YHLK13ZL/PYjQeuv/1ux47OO9xw 87XbFNqVO7jh9gty1NV/DuR2gLlvQsnWVnd7bgeHvTZGpTIccPmlx1jPSW9i h+v3zJ87Z2ssO9x8/Y+/prSqs8PtXxdrNPumCDvcfTB5mPth+mH+g5kP8z/M flj4AADWz4if "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.071458387682652, 3.5921758484346915`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$41"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHVGw7ca+J+/tzRkmbM/u5nZ4suHwFLV7H+y35Rzf u7+C20FqnmHszU0f7ee8U9nW78TtcMmH6cDS6E/2DtP3tGi+43Jg83Q/z3ri k/3SBa0KF5q5HDgKbhyKffvJ3jMlsOcNL0L+rbrsD44ZnHD9QYbPJq/X5YSb /+1mbZLnTQ64/Xeib0dJLuZwgLkv+oRQYu4EDofndU/bDXjfweVrl3B+P5X8 Bq6f2z3D0EjoNdz8pX73hIosX8HtX8CwR/vQu5dw98HkYe6H6Yf5D2Y+zP8w +2HhAwATs5eg "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9966730339688281, 3.2567988359774387`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$42"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfUE+7sb67zwON1X+OacYfLbXiZmUMzmX1+Ha35wA Hu7P9seDTl54c53XYQmjhuOaeZ/slVcZMgXr8Dm8Dgq/d//rR3tbjSuczUl8 DltTX4rqKn6037d7DrN+KZ/D3zcNb1NNP8DlO18YdNlOfgfXL88X+vP6yzdw 89du2GxsP+M13H73HZqi9ftf2cPc55TFrne+5JV9yWNNlzONPHD5m28+3S8S 54Hrr53atY7nMDfc/GTxF8vu9HDD7X/ULL/WoIob7j6YPMz9MP0w/8HMh/kf Zj8sfABtJ5jx "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.620940866825528, 1.0130366590008741`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$43"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvf1rF2t0HpvD02viR5Y4XLEXNto/0+4Jm8Mtq8tf XVZftl+n8e3vdD92Bz6v/TuO/Lxoz9UQp/9vEbtDqNzPKLW15+xV/jGY691k d1i9pVN8AvsJ+6UTTxrces3u8OKd65WwlQfg8l5BLErW0zbB9d/4PTXHSmcq 3PyETVPd77FN3Q+zf0J8Fk8h/4r9MPe9sO+vy9+1Zn/0zrDC8h+scPkDh+R5 5fpY4fpTsrff3m7JCjff663IlXZmVrj9JyN9bt3+wAJ3H0we5n6Yfpj/YObD /A+zHxY+AFKilDk= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.803884547522752, 0.13016782154942708`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$44"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfXzpzOYnLbwOfcY/J9wPEXBQfnRW/MQvXoezL0Wm dHoLOOy7wVKjmMrncGCV84RCAwEHKYPcte07+RyE6vvL7dgEHEzW8W/d/p7P oZP9RZfyIn6HrY431iUz8Tvont78zV6HHy5/sa8+KWYbH1y/2QyPf0w+fHDz bzk8ODPnOy/c/gOHbI/mHOR1gLnPXr/09IF1vA7ZmanvGfgR8heK9LqXL+GB 6y+RPhbpGMADNz9qrnKQoBQP3P6bnNERqew8cPfB5GHuh+mH+Q9mPsz/MPth 4QMA3HaDUw== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.689888980986072, 3.896606376039378}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$45"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHfqtROjrnj/20t4Tz/ysZnTgzb9rtWfFX/uZ209c 8s1kdHCO8WbOr/1n32CpdlrWmNHhD5dMmrXaf3vlR3tnbr/H4KDHnlg6e9J/ +87XbaZxJQwOhnqfMj5v/28fGbfU6euf//Yw+YVPbaT0BP/bw/Rn/zgXWG3z zx5m/ibPf+/WTf5rD7O/wXfnfT/1v/Yw99Wqabz5xvjXfm4tzyvdi7/h8ukT 5ilW//kF17/u4dl964J/wc2vedqx3u/5T7j9lfu+7/528CfcfTB5mPth+mH+ g5kP8z/Mflj4AAD4EKY3 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.7961321564647694`, 1.9992573359831083`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$46"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfc9M3OmFuKDD63nbv2hWCTjwhBry3AoSdNAKvfz9 coGAQ+QFn31sHYIOcmJMX3aHCjhw/GG4brlJ0CH/le/tDm0BBxHrS7cCzwo6 uNxLCdrxht/hasu268uvCTq8WGiw70oZP1y+J/WP5kcGfrj+j3lHj06fxgc3 f6p47BRDJz64/dUzd/Uw8vA5wNz3i/XTpNCfvA4bJP6Wf7sjAJdPnvvw6Mnl AnD9Wwp1106rFYCbv8IoZmVdkgDc/ucvytdoRArA3QeTh7kfph/mP5j5MP/D 7IeFDwCtgori "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.273346932093515, 3.93302296243586}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$47"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7bGYLftK1yv7bo+772Z2sDjsnHJ9d1LSG3uurSJf 35ayOCjnb/Y5wf3O/oNZ0du99iwOU8+ECCXGvrefcp9zT/hrZoe6pPwZAtIf 7H++uBT+r4HZoaGToSfD4YP93DXzDktxI+QdC7L0zacywfUvqzQ+fVeLCW6+ l9LpmeXXGOH2GyzRmOS+gNEB5r71AgkzZvcyOlzfaCrltvkFXD73emTnA87n cP2/K3ccdt/xFG7+1Ea9pe33n8Dtn2DMs+/6lCdw98HkYe6H6Yf5D2Y+zP8w +2HhAwAf+Jd2 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8294469919538665, 2.3804221422956986`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$48"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfa7mh9K9i3/szT3F3CNCftu3fU3wXrr3r72JUmsw g/5v+z2PzglHTPpnz6Tm4LLg0C/7konzy1Ss/9t7luc/vCz5y35F75PWluX/ 7YW7GCUVXX/ar9pSWnnnzH/7aMGZHyIjf8DlF88wODEp9ztcf+7qQ//vz/gG N3/Ln49zhD98hdvfxLC2d3PzV3uY++pvSs+KjvtqL8Yy4ZfYs99w+QdiSkYp gr/h+jUyAs9Pz/gFN/9LNs8B8z8/4fZ/cqk+c//aT7j7YPIw98P0w/wHMx/m f5j9sPABAFN0qEM= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.8012372365990816`, 1.5218142889362614`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$49"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrcyU+ODsCQGHd1zCJfeMuRwCFapX7WcWdMgt96oy UuRymDd7WswbC0GH4J/Li5heczr4HvcqlU8WdPi+0N5xzjROh0g2mUrzOkGH mNUcd510OB2kAhjKetsFHRjyr3jEb+OAyy8xWrCl2oEDrp/TJjNA6Ro73Py1 Txjk9zSyw+2fnBYn3uPN7gBzn9DlqbIPLNgdvj52E7vTKwCXX5GhnbI+QgCu /6dNuXeNngDc/Ld/l7qnCAvA7dfZctCLj0sA7j6YPMz9MP0w/8HMh/kfZj8s fAAs+XfE "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.1960978564461895`, 3.0890489282445515`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$50"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHXE9r+nUQ2EHgYP2wspBzA5tXzt89siIOPTrlkuW 2zM7XC5Y8u9FoIhD6forgu6czA5NcyLEZWpEHCQjch482MLk0HdbU9pkuohD XaJpTbsXk4O/Kp9E1wIRByVVxheLrzDC5Y+9OBN8II4Rrl/709T3aV8Y4Oaf n6W7j2EBA9z+rTLd2y5kMjjA3GfSeWiPSjiDg9bOkB03lgnD5e/aWrKtKRSG 69cTan1b4S4MN1/p8uaXCTrCcPsTO8+/4VIWhrsPJg9zP0w/zH8w82H+h9kP Cx8A2EWCMg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.970499074950418, 2.2288282513951723`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$51"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQreL72fb2C0GHR1wlJy8F/bcPyublOKss5PDg8aOr Vbr/7ec/09j1M0LIYc3zucekDv6z9xO6e0mnWcjhi8XZZD+Jf/ZRgeuuucwT ctjnHT97tvNfe+nZky7PWi7kwHb5W9GV8D9web+oPi/enN9w/RK5Ck1R03/B zU/Y5y/f9+4n3H6dQ1wCek0/7WHu05pdKXMt5qf9N72bxS/XCsLlV27ee3BP hSBc/692zpWdfoJw8995WCwtNBaE26/7P3iFtJYg3H0weZj7Yfph/oOZD/M/ zH5Y+AAAO7yZAg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.477398841834006, 1.7714428416049386`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$52"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvd6Ec9+3/yIO91/tOLm/lNXhbpByxwsrUYe48A/n hZNZHbTO2VmJFog6uNz0PfFYh9Xh5s9PQR6zRB1eND6dVnuDxeGpxZGwhK2i Dr7d64xU8lgcljWtCN62T9Tho1/VPIcfzHD5qUJuXLFNzHD9v6T5lzFLMMPN n3dkWcncw0xw+1vcWHJze5kcYO5j3mxdfLCKyaFR7P1nlqMicHmT2Zcdb/SL wPW35strLk0VgZtfaeCn2uslArd/x7NMDXNHEbj7YPIw98P0w/wHMx/mf5j9 sPABAA0JhD8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.249964684783818, 2.4962170010638762`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$53"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrV3pUJFTKuBwKkGcW3HZH/vI6VFOcRsEHE5Ytomf bPhjv0yo7EvXUwGHKbaOHJkif+xD7bR49/ELOtzpK1g6J/u3fWLtb4FrWoIO yxYy3X057Ze90vH7vDomgg7vNGZtUVr9Ey5vtsGwJ3r/D7h+hsOHD6949R1u vofI54Q7jt/h9otIrAusufrNHuY+oY8ycSobvtn/jVJbV2WFkN9wn+uPLytC P3PG2mOm2/jh5r98ybWftYEfbn9GmNPRyFx+uPtg8jD3w/TD/AczH+Z/mP2w 8AEA0a+QKg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.1146715916968715`, 1.604281144597333}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$54"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXb0gpyjqppADn8PMaSob/tiv3Ndm4yMi7MAjybH4 TNcf+2+Wi95VeAo73JA5PDlH7o/90tQw9jXFwg4KeZ8MFpT+tt+4RJ37SJ+w w6uGloy3C37ZF73j5pCaIexgxCHjoLb1J1y+qn+zePzJH3D9Lotc/dd8+Q43 v+dzyZv73t/h9kd8179bf/+bPcx9YRfmvVTf9c3etyloRcY8Ibg8A7v5N+tM Ibj+wNtNdznsheDmu87ZePODshDc/pags3dmSQnB3QeTh7kfph/mP5j5MP/D 7IeFDwD3YpS2 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.712259090309199, 1.606725931575522}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$55"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXdAVXnA7+7/9n69nI2dt5nCYwpjgc1GbwaE6iTXh 3QIOB/0f0zZoTWNwSHySFLEvi8Oh2///wwmvGBxYe3+pRYhxOCw9u/DlAQVG h6xphw/9W83uoJaY9TjHmNGBL6pfT9qMHS6/STZ6lvkBNrh+cXUVs3uhbHDz d5/fzVLByAa3f2Gg5F/306wOMPcp7AtgnrOD1WGH4Ht3kYZ/9jD5JpXG+sTV f+1h+k+VbpCZyvTXHmb+tMpsXtNpf+xh9k8JuiV5t+CPPcx9MHmY+2H6Yf6D mQ/zP8x+WPgAACK7iVM= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.9638323200566923`, 2.901419032811879}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$56"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvfHf6QWVut/tH2xf77Yl4aF9ZrnJSQfJH/a3M3vj WcQe2s9PWTTx89sf9qWFzI4utg/sI4SLv+yf9tOeTePIt7Drd+27+HcwKzD/ sjcq5rna3XLLvtfM83u5xi/7gAlZxvlXr8Hl89aemBikdhmu3/ij4gO+5efh 5udUzzm5OuEU3P4rM0v8V/89Zg9z377E15teXzpq/7M1uWKT4ze4/OEZX9f/ z/kK18/1SsXX+MgXuPk33t63vRz+BW7/1WN+XtVGX+Dug8nD3A/TD/MfzHyY /2H2w8IHAFT9qVs= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.4486023217322492`, 0.35677700062865814`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$57"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQraH6fGfxQkEHGfe+0PLMD/ZhzowtqXcEHaQU/ibK u3ywX7xPxmySoJDDWfeCpXXr39sHvbrgd9RayCH61bn7T2Pf2cdpLgq6Gybk 8JH/s1/Dljf28sVt/sYJQg4Nckr/Pt55BZfn1w1cm8z6Eq5/aVCpzL/o53Dz jb9eDkvlega3/+wfT4ulhk/tYe47sU498OuzJ/a/2M6+b0xDyK/t3mgbaigI 1/8v/q+KErsg3PxPCjqKXG8E4PYbXndX2fJIAO4+mDzM/TD9MP/BzIf5H2Y/ LHwAo4CSKg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.407668022854786, 0.8394708598652443}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$58"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/VWCieXndQGHJd9nOE3K/WmvbC5z7pWQoMOiC+z+ Vh4/7Qs2mTeIewg65F05ZH/r9g97+XuvZ3gVCTpsU/10h9f4h7227N45Sb2C Dg0WLSLRcd/t36QtnLljmqDDif3SbyYXfYPLC7hvPnym7Stc/61I19+Sm77A zVdaXTLDl/ML3P536/Q73875bA9z35v2eVOnln+2P/7ruSX7XAG4fFX9mfZb 6QJw/aeDJfKX2wrAzd8v4p7dryQAt//fqaQ8S0kBuPtg8jD3w/TD/AczH+Z/ mP2w8AEA8wuWaQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.210910856845875, 1.4029731009468254`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$59"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvWDfidd/GAQdPr0pfupZ9s7+3J1HW99ZCzq8nRf4 b6b2O3vpiH/p0oWCDu3Ljt+/GfTW/lTzpga/2YIOop5qUo6Mb+yvHWpuSdsm 6LA6z6vzdvgr++k8GY179gs6WNVWWvg2vIDLn+xe8Xzfimdw/fEbz4RF/n8C N/9tsPbEA2sfw+1vj15YxHD1kT3MfU289d0BXY/sixasU+Q+JgCXV1WdnH9v ggBcf9nPe2Gr0wTg5mft4g2e7C0At39lgWaYrZMA3H0weZj7Yfph/oOZD/M/ zH5Y+AAAtHGdSQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.250964817168693, 0.76566182165326}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$60"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ3e/LuLi4U8jh6o5Lc5YafLbfmy2dm3pEyOHSRMeV vtyf7bmem8lP+inksGDqn5lv532y3yn02vyosrDD82fa5orfPtofDdxjfddO 2GHjz715eYof7dtmL7Aw9hB2+NkQ6rbc9ANcvlHglvWBye/g+sXN/q2KevUG bv7SGzFPD854Dbff/sGlY4wHXtnD3Gc1acP9wNJX9on6z280+iHkRbacVguV ROhP7RDnU3ovCDc/0tONi+uKINz+Gf8TebecEoS7DyYPcz9MP8x/MPNh/ofZ DwsfAJWsmAc= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.634230181650664, 1.0130989787504048`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$61"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvZC7/6XFBAaHpgmH7i2x4XX46364VoaN0YHx788n PzR5HWbY/XpYWsDo8Lwu/O6JzzwOX6YmCd85wujQrf5+ddJ8Hgc+EVZpnt+M Dh8MdrhzmvI49C8/K7KDl8lhypfmzar7ueHyFjv85Z08ueH65x6U2P3iHhfc fMesDZ1NXVxw+9Xf8DYFhXA5wNy3LMK1Y5kjl4Pr+ajQUCkGuHzIRvdH3+P/ 28P0z2Eqr9fe/s8eZn4Gm1HBaa9/9jD70+4vqClW/WcPcx9MHuZ+mH6Y/2Dm w/wPsx8WPgBUoInb "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.0704210516718864`, 3.468333628143748}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$62"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfePxsVLhGF6HSyr1ngHTntmbKPzm/H6R1+HstZik Bd7P7M+LGeUF2PA5pN+75Pyg6Km9dt6s+dsm8Dl8bTCsc1d8Yu/6xmb5s2N8 Dt3LQt8+LH9kf6yedeGkm3wOUltb5gQveACXD2pPn9418S5cf92l9aX77W7B zZ8lnvuqd/Z1uP3n1CLX8r66ag9z3+EukftrQ67a1yyf9FD/GQ9c/uGG6Npr 1Txw/a2Rn70L1Hng5mffDnBx+MgNt/+Ve4fXlHvccPfB5GHuh+mH+Q9mPsz/ MPth4QMA4/CdTA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.6699589921304145`, 0.5195711190223478}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$63"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvUYwYv1fbwaHBX63uwzEf9pz+PU4PzzI4DBP3Wv6 jY8/7Be7HF5upcPokKXN2lHR+sP+/2ztmwsaGB021Ziorrnz3V5S6tyDC9sY HWr6j8X8ZP9uP2vttFs1JxkdjojFmRjJfIPL88z7yp1t8BWu/9qGducd0V/g 5ssxbX/wetNnuP2vWIsudrt9toe578W9B3eNFT/bL1jlbmay5r89TD5r783c xuv/7GH6N/Fxcm/V+2cPM79O6MjvkEN/7WH217w24vg75689zH0weZj7Yfph /oOZD/M/zH5Y+AAAdhee5g== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.037104959368852, 1.38188381630009}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$64"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ3dElKxjV+s7+pULgFa29bA5/bL8blOh9sM/o7bhV t4rNwUg79aca80d7P/5nl/xK2Bxe3TSN+bz6o/2n7bULX8izOchdq8oOlvhk H37QzbZ/K6uDwl/u+NW2n+x/twitXG3PCpef73FP5MRJFrh+lqDlG/LiWeDm r/hlV8/BzQK3v69mTvmNK8wOMPfxvrxcq3OI2UF8ps+B02vfwOXX7ivQT2N5 DddvnXg+8+yml3Dzr2a4evPeegG3/4KUckps/wu4+2DyMPfD9MP8BzMf5n+Y /bDwAQCx7pQQ "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9537782987866459, 2.656089135053319}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$65"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/e/fQdY33WIOOxgqnp0589deR/bO+bvHxBy23Xz2 qWT5X/vKGd8buf6IOTTdXfhYxPqvvcaR1bNs1cQdTuldbPCY9MfehLl2Xqij uMMUx+QdU/f+tv/qkzh7tZe4w50Tv/rPXfwFl1cJmJTO/uwnXP+7JJX5IYI/ 4eabbQm26cj4AbefaQefrsaf7/Yw9zFMrLW8cO27/YUHy61/BSDkm1N7Os9K I/RfsbxRMOujKNz8E7/YcpuuicLtZ9+oVKBzVhTuPpg8zP0w/TD/wcyH+R9m Pyx8AAoPoYY= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.6366425418525505`, 1.6762223839000887`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$66"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/fm0wPN3gpwOa2rL/Jk2v7P353CtvtTO6bBcPyQj KOOd/at/1fe1P3E6OJqf8pzU/9beLeyJwCQ3LofzNzVaftq+sU+40iZxqIbL IfW/z+fJU17ZP0z3F8rr53L4wluziHXvC7h8s8zqwPKnz+D6JZ3OHxC0eQo3 f/kT3d8Vrx7D7Xd8s/jODsHH9jD32cxr/Mpx/JH99P47QdxzOODyf2YsfbfR kAOuf4Gj7V7vu+xw89sOz9oqvZwdbj+rwaXd+VPY4e6DycPcD9MP8x/MfJj/ YfbDwgcAb16cLA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.133756451797575, 0.7730739758994205}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$67"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/aHz79sDZZwO+vbFV1Zp/LX3OWbYtOQNp4OOxKMH Qcx/7Z/vyXj2N4zL4Zf03Iufpv2xdxa5KJ6ymsvBMfdMntq73/axk4rlpzzk cuBuiFtWLPnb/p6qjaTDFy6HYPZvtWt0f8HlZ/f1hj51/AnXn7pQvtco9wfc /DWf/LTSjnyH21/1jVOaLeK7Pcx95ecr1NcZfbef4nsy8i4DQv5n2KSvzdM4 4Prn/tc8IuvEATe/ubF9z1tuDrj9TO/2HXL8yQ53H0we5n6Yfpj/YObD/A+z HxY+AAg8me0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.1829851716040523`, 1.6361508293488967`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$68"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXfL7pqnhbCGH1kdrr6vr8jkskvzyX+makAOL/9O7 1VJ8Du+n8G/y5xZ2eHXB6Zr3E16HeQcOn2oyFXboq7y15Gk/r8Oq/1POzQoQ dvjctNihR5XXIduz8vSHSGGH6W75a1as54HLW3NZSxy15IHrXyDMsiX7PDfc fJc9s5tYq7nh9mvZ/ay66sLtAHPfylUGjZpG3A5ud/dn2ycg5H8mLtkppC0E 1+9l9mHBfQYhuPl23+XmHn8qCLe/dq3VgsI7gnD3weRh7ofph/kPZj7M/zD7 YeEDAOxmiwE= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.651554910115795, 3.5857709380587255`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$69"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnbdxY9BSXmaHK/86s55ceWF/6u3TZx3NzA7nN6Q3 m3S9sE99IuP96C2zQ+aOuyklG5/bH7RurfFwYnH4HmUz/3b8M/vbO9VbKipY HHobEvjKtj2xj/H9UKvSzeIg09+/9/m9R3D51XP35USyP4Trb2o7uv357ntw 8+edbtLZJnEHbv+lW3nvTdNv2cPcd9xOS/HaxZv2QqW1+w5OZ4LLl9e5RWXo MsH1S6vf02C6yQg3n3GlteKlRYxw+xtEi9XVJjDC3QeTh7kfph/mP5j5MP/D 7IeFDwBCQJqA "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.3816629848935724`, 0.5897101118430075}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$70"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzTTROmcWG5dDcN7nSSf0GB3izuYz1NVwOVy8pTVT RobR4efhZSnXn3E57IjpmPjmKYNDqDT/NFtrbodoVoWEtokMDvkzN87NLeR2 OMj38reOOoPDB52q6ZIt3A4nl2Sen5T03x4mL6jDuPx02T97mP7bdpPvSSz6 aw8zX2nCoWqfn3/sYfZ/mFyb86bnjz3MfW9z3lRMSf9jvyyE/ca2CZxwee64 C8Wxapxw/evZMpy+X+SAmz+146jV8dkccPtFvv5xkO7kgLsPJg9zP0w/zH8w 82H+h9kPCx8AtkyOwg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.253224225585769, 1.9615657903726051`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$71"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXTtP6y7HYiaHSB/Tw/8dGBxu3oorfCPB7HB9R87J YD0Gh5KLU6+6NjM71JROaXb/8N/+gsY/tjXXmR0OHzusUO3+3/7VsgV8d3hZ HHpvhkacKPpnn22VydGhwOJwNeGtPmP7X7i87IsWdqvZf+D6n/8Ss28/9tse Zr6ej9udXbK/7WH2//FnPBu18Zc9zH0/NQpuMvX8sldM+uahqssEl2/L3v/k 9CFGuH4tkfDNqXmMcPMFpm1ZbWrBCLe/n+nNxk5VRrj7YPIw98P0w/wHMx/m f5j9sPABAMo/lCA= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.3296067503577533`, 1.8454601165922686`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$72"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrRqWW6q+UNDBIZjp94f/TA7BJe32kncEHfbvt2R0 fcvksOD9oo+ugkIOSx2n/xTZzuTgLx3OVWkt5OD5Su/EuiQmh+goDb6JYUIO 6z5/Tw79weggs4SH+3m8kEPQ9sPnC5sY4fLfqvqt+3gY4fqjWyKumyxigJv/ X+fD0nO+DHD7n67znTdPnMEB5r4U6dYln1gYHL6bB682TUPIr9pj/pPDUBCu //eE5gdX2QTh5r8P3HRn72sBuP16HOfupz8SgLsPJg9zP0w/zH8w82H+h9kP Cx8AuAGHHg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.407377085493441, 2.1886936408617794`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$73"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/XTWivP/FFgcLLXiPzJ4Mzs4Xr+T/Ggai8OOadO+ h1gwO9w5K3zCmpHVYZ7El/cqTMwOFqo1PxeGsjo4Hezet28tk0PQYjnGS92s DstPhUSlOjM5XDZ7/qt2HquDd5/CscazjHD594FvDOeFM8L1h0RvPevylgFu /g9m3zn3ZjDA7b/XumrKuiQGB5j7Yj89nMUUwODQGVdiLb2aGS7/Lt32+kEH Zrj+SQJXl0a/YYKbXzHJaJ72Nia4/d//ZS6pX8wEdx9MHuZ+mH6Y/2Dmw/wP sx8WPgD5dYvJ "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.516111013729971, 2.2253451803860904`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$74"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7fVA/euqnZ/sQ1Wcgm/N4HFgipwgW7T0s/2VCZWR em08DhZu/56qVH2x3yV0PfCfP4/Dhy/nPD4qfbWP252nMOM3t4PKR+GIwP6v 9oePmO+xm8jtoCax1Hvllq/26R3MGtHSCHlun/OTy5dywfUXhM7Ql7Pmgpsv 8k//3/ZnnHD7f9X3fmvfwOkAc1/lmyN/bs/ldJiUvv/M47Mf4fIxVYEshj8/ wPUvOd2wMCXgA9z8h/PKVThPvIfbfycg1Day9j3cfTB5mPth+mH+g5kP8z/M flj4AAA7upmN "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.1703290535351862`, 3.3883574606016285`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$75"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQndKqL/L2q4jDvLd8zn7LP9hPWux5756BqMOcY7X+ 3xo/2N+XS53AnSbqkHHKwmGa6Af7Pi/JlXYTRB3izS/smnzznf2szldrwlaL OnyN+aKpZ/DWPvryuZVrtog6tGQr35wf8RouL1wV1CHY+BKuf+X8su+rrz+H m2/udNVQuO0Z3P6Lnt7CwWuf2sPcd+a3hs7ipKf2ZumiXr93icDlX77+Of1c qwhcv9UB1/rZ0SJw8/UaS6qbHUTg9ueaT6jTNReBuw8mD3M/TD/MfzDzYf6H 2Q8LHwC+4ZaG "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.240162196541267, 0.854568409059866}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$76"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPSeF1VLDXsRBZfPM1Q9l/tufapJnlqoScVDq4djR +f2fvfg/q61u60Uc3vUfXqHZ/c/+mOb7s5U3RRzMHn5yjX301/5SxoGLE7+I ODB8aaldxfvXfvKmJeee/xVx8KiWCX2s+AcuP4Fpi46M2W+4/ihRt5TMxF9w 8xellTLO3fETbn9elsEnG5+f9jD35TjP//dE7ad9ntvrPDMWhLzi6fN7OM8L w/UXzZdecm2JMNz8tASvBfs6heH2LxVLW5zRIAx3H0we5n6Yfpj/YObD/A+z HxY+ANKtlAw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.061676875070727, 1.758273441758961}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$77"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQrcfxWDo2kcfhSLPH26vL/9l3uYhvcLjO43AoZvvP 2qZ/9qrWfiKzHHkd+hKKXsmK/bNvnLTNlWEar8O1jQvbA3P/2s8WiPQ1OMPr sOCI8f55M/7YyyxRdL9zj9fhhffpadfX/IbLG1xOyhM4+Auu/9fTL0tj3/yE m+9kruI80fkn3H4+6/vGhtd/2MPcxyPi53Bz4w/7S6fXtVe+5obLm18tV1Zo 5Ibrv13L/2mnDjfc/IP/c151fuOC2++Qs+TD3cdccPfB5GHuh+mH+Q9mPsz/ MPth4QMA2VWZ7Q== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.547540872446027, 1.7296977892299257`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$78"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQne2299g7hl/2i6uXnHR9w+2gvF/1/dY3v+yVXtw+ P/Mmt0PkmsnbMw7+tufIsjyRuZjbQSg6Rco064/9GqGL05j9uR1cwldqTr32 x15QZpbRqidcDu51VrJvf/+x33o/dd6xPC64fORiQ67HPzjh+vet+bW0s48T bn5S6KQSZStOuP0e19/nfGbmdIC577izerH7Rw6HzWdD5qmL/oTL1z54drXE 4Qdc/xFDseIV07/DzZ9kejHZQ/s73P5+PoeCD6zf4e6DycPcD9MP8x/MfJj/ YfbDwgcA2oOYlA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.6252277148490986`, 3.3040897726859506`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$79"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPY+9Wa5+MotDS/Za95+Nj+x/OW/flMTJ6lAv253g af7IfqrVO7E9xawOkqqMTp1xD+0/TgzzUDrB6rD8eHzNB54H9twCP/2D/rE6 VN1ivy56/I59z+KDnv8E2BxmfE81/Sl+Ey6/TeTI5DsZV+H6H8XzFAmKXYKb /8dz8tn9T8/B7U/JyA7e33TaHuY+P4NH2/6Hn7J3Ou3XNVuWBS6//Iq4mtNm Zrh+79r1X27HMcPNN/zP83a1BjPc/g3ZLp//izLD3QeTh7kfph/mP5j5MP/D 7IeFDwAKxZEr "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.572019804357253, 0.3920882245509971}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$80"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbe667/DFhwIOPx7/j7ET+2qfmnyj97CMoMO3PXmZ zz58sd9077P9h0BBh0MHNKPaWr7YJ3KtiFCuEXTgEor8vvP2Z/tcz8oY6+mC DldUXuuxs3+215scGzlxgaCDzJomNgfpT3D5FGOpexX6H+H69dzWiB6L+gA3 /7Xe9tTPye/h9rea6bobd7+zh7mv4QVXQrPDO3tO9SU/7y8TgMvvWd3hvrlQ AK6ft+GKXoO7ANx8Rkdm7QwdAbj9Dt/l9ISUBeDug8nD3A/TD/MfzHyY/2H2 w8IHAM+cjSE= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.220526751030142, 1.131652856284524}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$81"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvVFm+qal7z7ZW+3JTLrK89c+c+r/Wzm3PttbTL2R V/v8j/38ptzF8uu/2LPMnBwvW/3HPsLQju1N+Fd7n1eH/gRc+m3fpdss6nPk q73Y3xCTeX9/2feGiHAuefnVPq7lDfd1wV9w+WXcLY/51X7C9RfIiUnHBv6A m78j33XHhBXf4fa3FDOsNLD5bg9zX5NP/tYbYt/tfy7W67rH9Akuf3jbgYPa eh/h+rk4PsTFt36Am3+De7X/f4kPcPtXnTTe4ff8Pdx9MHmY+2H6Yf6DmQ/z P8x+WPgAALFLpSo= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.1832634903128503`, 1.6293554750229968`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$82"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHXvv3YRPB7kcpik7htrO4HPYKaWses2c20F0QkX0 xFY+hxDBqE79RdwOvwWvBSf68zlsyDi0a+o3bof5u3KVfv/idTj1LOXQUR0e B5YjZvsWTuB18K7S3VNoz+Owop1Ja58UQt7H+9zUW0t44Po3hkw3bLTigZsf +lePQfoZN9x+6/qeH6/WczvA3Lfr9eF/dnO5HRgX7frD58MFl09b3Txj60NO uH6uEOl0/15OuPkfrlbEy4dzwu3Pd9qQWuzCCXcfTB7mfph+mP9g5sP8D7Mf Fj4AaRqGBg== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.344700939454738, 3.6380580217382494`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$83"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvYI7do74+tf2DP/CnnFeZHKQ/Kv7dmnbW/v6rL43 sfuYHJqvc9ZxG7y3T33z+oluB5ND1ayripccPthzTm3efNyYyWHdNClDo7Uf 7PPm+fjnnWR02LB3tUrXpQ/2QkkSu7uCGeHy21SfqC2/ywDXL62/9pBvMQPc /P3XXSY+l2OA2++12UU4/+J/e5j7PHo2y4uv+W9vLtXj3Xn9JVz+rP2GXcp6 L+D6ox/xfe268wxu/teXLddOMT+D2/9hdtJ7qZ1P4e6DycPcD9MP8x/MfJj/ YfbDwgcAz2iYxw== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8651235631917773, 2.165791951829541}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$84"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXXOKfXZGzjP7jkP3f05a/83+7e4br785v7Bvm+3H Zt31zT582paamLcv7YPmc36/JfvN/uTnUKevdq/tZ32wmMJX+tVe/839hK3i b+xTmE+fjl7wxd7EiskjNemN/ZqupMVTtnyGy38R/FV19sQnuP59Kj2bpL58 hJvPVrbb38/7I9z+S5VlDu/ufbCHue9C0FOfaTs/2HPfNPO6NeUJXH7hv6id Ja8fwfXrL9z5+fbMh3DzT67Qvyp98AHc/iNRvO+yyx7A3QeTh7kfph/mP5j5 MP/D7IeFDwAk4bN0 "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.7007334735811379, 1.231587064955117}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$85"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzW1WznOcm9XhwoqgHFux3/bpRasXrGpkdTjXeLDi 6Ydf9kyZj1hY3rA6zGqtyWxt+WUfd8DLLMuBzeHRtdVsO2//tK+we2s7q4zN Yc1LWzs29p/2Py9uNXfrZHP4UnBV1F76B1ze5kfO23L973D9bNz/VY5GfYOb 7xejd+jHxq9w+6USXm6a4frVHuY+CcuI/Q4KX+3X/3SqeDyVBS4vwswj0qXN Ate/Y/XiR8rXmeHmz9NlvP15ATPcftlZFg/d+5jh7oPJw9wP0w/zH8x8mP9h 9sPCBwAz2ZIs "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.6307507490043966`, 1.5066519596940084`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$86"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfdk6UHBBzzf7d/aCaQ4sr+27t+y0TK/4bv/y47u6 CTtf2R9cqM4k5fvDvvlnSsKFBy/tqwJ+pDz7+sNecM7hWeb9L+zX+NiWuCX9 tF9+8DnnpafP7NcXn0uf1/7T3uyC2E5nvqdw+aP3XDO2mj2G649mybru3/sQ bv7LZScEt1s/gNvPFlv77O3Re/Yw9/0+YCHRZ3DPXvrwixc3FnyFyz+9WqWg duYLXL+O+qq9kcpf4Ob/0kpd93PbZ7j935mv7Fo48TPcfTB5mPth+mH+g5kP 8z/Mflj4AADKWK+c "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.4093323399026658`, 0.657991277219941}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$87"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfd9xbcv9SxwOa91iMhWWczpY1z2UOOzB6aCzeXJ+ yRROh2slErUymzkdhEw/prvEcToYnWlY18TO5bDtbofZPU5OBx8v5W2bbLkc pJ8HXmqZz+Fw9u7r9XEBXA77V8naLdTkgMsn571cuXczO1z/ifJNrime7HDz cxS8RP59YYPbH7RoOc+5fWwOMPdd5LsvpLSGzaGZtfLD7xgOuPwLPqeeRZ/Y 4fp7tt+MspnHDje/yNI8mCeDHW7/x6V5kQmh7HD3weRh7ofph/kPZj7M/zD7 YeEDANMgg08= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.1029653897642073`, 3.0203270771793025`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$88"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/XbW7w4Xlb/2UVcTJwe9fWS/VDhlI7fAP/vQdvs1 ixY9sr/NcKly35N/9u/7tvY+OvnQfsr6RXe6ev/b1xqKnPCseGB/bPXz169+ /rdXW1eQd2LuXfvUzD35C/kZHFxOnzuz+t1NuHzSCx3tfvtrcP19xqWcR95c gpu/qsKobpLnBbj9e/htm1QMztrD3Lfs+uanKaxn7E2VJifUWvyBy/83UZ1x Kvk3XL9bW4jpv12/4OaLdPGrzfP7BbdfMLnOyE3zlz3MfTB5mPth+mH+g5kP 8z/Mflj4AABo/qhz "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.8213544226543334`, 0.4051923275066438}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$89"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfUaDp+4O2xt7nkWV1yct/2NvK3X3XNa9t/Zc1S8e WzX9sV/+ZUf8hfb39tfqFl+5JfrHnkdz7aQtOR/s5S5cKuTL/W3voPppocjN D/YvHqWsjJ7xy97Jp3lqzr8P9gZZfxqmrPkJl6/4ODni7IEfcP1OLGoTpN58 h5vfFRqq6+f8HW5/WKSA3Ltr3+xh7gsxqteatvGbfbS5ta6f/iu4/MeY+Dkv Wl/A9df/33vN3+Q53HxJdpMd/dHP4PaL7BS8eF/gGdx9MHmY+2H6Yf6DmQ/z P8x+WPgAAOSipqM= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8758375608315645, 1.604633811809105}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$90"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPWFNVe3tNxwOj/a93Pzp+nH7Ny/WCe5P4nQ405Yg brz2mH37/aelEmc5HUyWWsw18jps/9jMb3mdIpfDrbg03vnse+z/bvmwbl04 lwOvOD/v04q19nUeO1dEZXE5MEABmvx+NP370czfj2b/fjT37TcpcHv5vYwD Lj+zkr91Hg8HXL+t0vJgix3scPOVl7D4cDSxw+1fJGATFJPPDncfmrw9mn57 NPPt0ey3BwDBBIdP "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.115653019243446, 0.}, {0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$91"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ3Z1xZEHkbRGHD3+W/p0WxeWws+1elreYqEN+5l3m 1+5cDmxMv2QqvEUdQl9b/dklyOWwVXed6epSUYefky+dCtnL6XAwp97y8ARR h7i5s9N+B3E6NG1LNpOcJerAlJh+SfwuB1x+mYqxnUk6B1w/t96fm7f+sMPN X39t8oqSFexw+6dGfFzgUsTuAHOfyFGN5TPi2R1ivVZdS18gApcXON+nYp0t AtefuPgWN4ejCNz80BROjg+qInD7p0ipcs+SEYG7DyYPcz9MP8x/MPNh/ofZ DwsfABGhgxM= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.2142090911749035`, 3.107955592899203}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$92"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQfebF92NFYWIObx+Kfinw/2b/i01oYspEMYdXu1oY JLW+2bs36TpPPCbmsGOf/ccde7/af1v7MPrIBzGH//z5fW9Evtozvd0Uf4db 3OGkEuMxS4cv9ofNpscYiYo7CK6aMbco5DNcPtLQoHR1xie4fmWXQ2t+TP4I Nz9r6kdPndcf4PZbzFxjdabugz3MfaZF0u4lkR/s5526+6dBGiEf6H/IK+SZ KFz/ImU+I8U9onDzpz2x0eNcKAq3/+qsCMPN00Xh7oPJw9wP0w/zH8x8mP9h 9sPCBwBEO5gh "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{5.584422215348422, 1.2081171184642054`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$93"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ7XA0W8WunN/hDvd+ZvOWJ/ZzGBfsUHzL73B97xyZ dssn9tI12X17tQUcCo8K/TuW8Nj+1HL55R9CBRz+pxda6PE/sr/27MMqjkIB h6m9U5efSH1gP93g6vK4KgEHD4vOtSUyd+HyaaHPuSNyb8L1T1qg/6pH6hrc /HVP38RFl1+G2//oyw3F20cv2sPcdz1iSnC1wUX7Jx3mE6IYEfKekxh0GKfz wfW/tZrxa5YTH9z8y3u+fsri4YPbH6Sp+3PfT164+2DyMPfD9MP8BzMf5n+Y /bDwAQDURJc+ "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.9332239957226705`, 0.4548618025481841}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$94"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvVt4m/yjI0wOxU2/tQyWCzqIB7zafNSK2WGThbje rbmCDpvcFCXklzI7LPvpqnWoSdCBb16nZ+tPZofvZycK9kcIOmjI6ARu1Wdx WBVUFp+kLOiwcv0Xr0QnFocak5ipBS8E4PJ+Yk6n69YKwPUzzlaTDKoQgJsf lF/EIO8nALffzWDhHzZjAQeY+1qf7fm/QVPAIf56Y/c/Pya4/JEHXupLnzDC 9Wd0PvpqN4ERbr4ft8M7vihGuP1ny8u/JLkzwt0Hk4e5H6Yf5j+Y+TD/w+yH hQ8AY/17YQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{2.3461344220581544`, 4.226991971733806}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$95"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQPeftudpT2oIOPunb783l5nU4xf3SfU+aoMPpy++e fPzB4yDezvLrxWxBh42hPncPHuJxOLZph5DMMUGH0H+PV0fn8Thc+tgpZvJQ 0GEX+1p3JhYeh8nWecJdrwQd4k5XbJbr44bLM/W7yFtLcMP1p8/g3f1wLRfc fG7HpZ3VkVxw+z8eYmryVuZygLmvQN+qY74Al0Pe+S2bb3wQgMsrhsxkXLNb AK6/SOPpi4qJAnDz014KP00oE4Dbv3S+/guuXAG4+2DyMPfD9MP8BzMf5n+Y /bDwAQCQq4qx "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.29276463103761, 3.444394495128491}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$96"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQMyx5dFn9n6355XnJ/3acVae6kFohklE/7b34pL 453Pvsf+2eILESIq/+1NllrMNfI6bK/39f9X9+p/9mfaEsSN1x6z/8E+SXfq sr/2j/a93Pzp+nF7h35N1nO7/sDlO8QO3mE7/xuuP0gzWCTk1y+4+bOqmja2 B/6C259WZ7tI/elPe5j7UsLXrDu//ydMfj9MHqp/P0w/1Pz9MPOh9u+H2Q91 33409+2HuR+mH+Y/mPkw/8Psh4UPAPgHmAw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0., 1.7956066323904025`}, {0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$97"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/aLl1HHuoN/2na8/inK+Y3NY8NfowyXbP/YcEZoy sbfZHK69WrCjVeiv/bubbSK6S9kc+mYWSgft/ms/qUnu8bEANodDU7dpbVL/ Z/+9+3ld7jNWhyN73OW4fP/Zz/bf/KqzgBUuby9cH7bsFwtc/xIZj08+E1jg 5nscvX/gmTUL3H49d9ud21hZHGDuW7u5ZD/XZ2YHA56k+S5pv+Dyv+S+XJs4 8Sdcv1OBcsnRFz/g5vOV3EtJrfkBt5/H17eQN/wH3H0weZj7Yfph/oOZD/M/ zH5Y+AAA4RSZxQ== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.7075307659472916`, 2.6799505554171907`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$98"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXWCoPeuCPo/DIfbvm0q2nLQ/kxuvt2Upj8Oa87li WztP2KenTJvEK8DrIPLOdc4WtaP2h3f/O1ycwusw60MD9+ID++3vWi48vXgW r4Ob7KKWstJN9nFnM4/6r+V1YOi78kH+RC9cvvfzTYG7bMv2w/RLnfXmn+23 Yz/M/JAY7Xkbcg/uh9n/xjZYYuOFI/th7mMqu7Ol4PfR/SJfv7G+3ckNl6/8 t3/hZH9uuH7Z5eEFur+54OYza27N+HuEC25/09Q3eYGbuODug8nD3A/TD/Mf zHyY/2H2w8IHAO65muc= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{3.523347095912122, 0.014541863953644985`}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$99"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQbWCbVRxxSMBBiDN25X0GRoe46BZbr78CDhNLp6w3 fsfgsPra/PdlRoIO5d8/LmfeweAQxRTCsSpG0EF6QWfZ3GQGhzRHVZ5D5YIO DMFLVTo+/bdX7+bklGgUdPC4ZfPnANt/e5j8hMQrl39K/bOH6Y8qSeN2d/tr DzN/0dGpK6rm/rGH2Z93MmCmlOEfe5j7chbtX3qI+489k3zAyrR2hPzWxSbf LYME4PrZKhrusWkIwM3/ZbH+1jseAbj9lu9P3Z3BLAB3H0we5n6Yfpj/YObD /A+zHxY+AAduiU8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{4.189790538176837, 1.939148888877428}, { 0.09313885586174878, 0.09313885586174878}]}, "DynamicName", BoxID -> "VertexID$100"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{3., 187.}, {-73., 67.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{191.94010416666686`, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.739200106911481*^9, 3.739200108885531*^9}, { 3.739200259205196*^9, 3.739200301591872*^9}, {3.739271079811569*^9, 3.7392711045263987`*^9}, {3.739271284134204*^9, 3.739271284378742*^9}, 3.739472728074991*^9, {3.739473259452546*^9, 3.739473262440881*^9}}, CellLabel-> "In[302]:=",ExpressionUUID->"f65009f6-1a23-4005-a819-b1ea67af9be8"], Cell["\<\ With degree distribution sorted from largest to smallest degree:\ \>", "Text", CellChangeTimes->{{3.739473368950597*^9, 3.73947341074751*^9}},ExpressionUUID->"f3ff832b-a99f-4fb7-ae70-\ 756a3ae6fc0e"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Reverse", "[", RowBox[{"Sort", "[", RowBox[{"VertexDegree", "[", "g", "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.739473275328054*^9, 3.739473366905691*^9}, { 3.73947341594986*^9, 3.739473428507489*^9}}, CellLabel->"In[43]:=",ExpressionUUID->"4bdd46d7-8564-4cb9-87a5-ea8886b5c771"], Cell[BoxData[ RowBox[{"{", RowBox[{ "31", ",", "24", ",", "18", ",", "13", ",", "10", ",", "9", ",", "8", ",", "7", ",", "7", ",", "7", ",", "6", ",", "6", ",", "6", ",", "6", ",", "6", ",", "6", ",", "5", ",", "5", ",", "5", ",", "5", ",", "5", ",", "5", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "4", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "3", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2", ",", "2"}], "}"}]], "Output", CellChangeTimes->{{3.739473279324332*^9, 3.73947336717136*^9}, 3.739473429133013*^9}, CellLabel->"Out[43]=",ExpressionUUID->"4ef872fe-9d86-4e66-b9ed-cab69c4c9687"] }, Open ]], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470412682672*^9},ExpressionUUID->"6ed1cc02-8280-46f7-9407-\ 48158320bc0b"], Cell["\<\ It is a good candidate, the degree distribution approximates a power law. \ These plots provide evidence:\ \>", "Text", CellChangeTimes->{{3.7394698179814*^9, 3.7394698791352167`*^9}, { 3.739473439762074*^9, 3.7394734476147213`*^9}, {3.740429829539356*^9, 3.740429865630735*^9}, {3.740430370368907*^9, 3.740430381921633*^9}},ExpressionUUID->"9da2aa37-7b1f-49ea-9da1-\ 34787778aaac"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Row", "[", RowBox[{"{", RowBox[{ RowBox[{"ListLogLogPlot", "[", RowBox[{ RowBox[{"Reverse", "@", RowBox[{"Sort", "@", RowBox[{"VertexDegree", "[", "g", "]"}]}]}], ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"ImageSize", "\[Rule]", "310"}], ",", RowBox[{"PlotTheme", "->", "\"\\""}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Style", "[", RowBox[{"#", ",", "14", ",", "Black"}], "]"}], "&"}], "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\""}], "}"}]}], ")"}]}]}], "]"}], ",", RowBox[{"Histogram", "[", RowBox[{ RowBox[{"VertexDegree", "[", "g", "]"}], ",", RowBox[{"Frame", "\[Rule]", "True"}], ",", RowBox[{"ImageSize", "\[Rule]", "310"}], ",", RowBox[{"FrameLabel", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Style", "[", RowBox[{"#", ",", "14", ",", "Black"}], "]"}], "&"}], "/@", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], ")"}]}]}], "]"}]}], "}"}], "]"}]], "Input", CellChangeTimes->{{3.739271296562386*^9, 3.739271298515773*^9}, { 3.739271363268936*^9, 3.739271382922477*^9}, {3.739469609182878*^9, 3.739469633745475*^9}, {3.739469669663333*^9, 3.739469810398879*^9}, { 3.740429844178577*^9, 3.740429844587816*^9}}, CellLabel-> "In[303]:=",ExpressionUUID->"85a3d82c-74a4-4f3e-aeda-f2659eeb7617"], Cell[BoxData[ TemplateBox[{GraphicsBox[{{{}, {{{}, {}, { Hue[0.67, 0.6, 0.6], Directive[ PointSize[0.009166666666666668], RGBColor[0.790588, 0.201176, 0.], CapForm["Butt"], AbsoluteThickness[3]], LineBox[CompressedData[" 1:eJxd1AtIU1EYB/A1zUdzvsqVrjK1SNtSXA+zlDstpcxMrZCWhkUjScvXzNJe DiutDLURZBn5QMv5QKPSllaT2QsFs1ZEUTETtYcLbW6+VrHu+VcHLoffved+ nPN95xy33cnRYiaDwdjz6/nd003EK1rfdYglHPIfmwr27qMM/OIj1UnWQpZZ Xdbghe/UqaLE1dmuln++66ioc74885PmwmUFX0eDHhgozrZbisZEppC5YMkY Sz5Bmf6bJowRCerT3I1UunwN1VTOENI9/f7/cXQc2uF+x+9ovM1I3KNXe+5x PsL0PGhXK15xns6dTuy6fpM/pwY2zd+COOv42MPEGguyDnqdtPk3zS1WnoeL NOnZwaNwY32yzHuHFfFjVWCm5C6svdk9edTJmuSNzitt0zi400U7KLOfQVyY a9b8Pg72CLuoFl2HXac6n63SwpfVLEPVChbxv3XVUYmPm9t6Wlikrt3NL0de 62EduyVnYoUNsWrYbosoFTblDW59tPqbpwa+HtSu6nBmE6vZeQmGCJidJljT I4Ujas+HiG/BSwO9t97vgx2+zOJoObbEa7dOrJweClc+qTjIksBJwYWttmXw bW2hj0snnKGIDFilh037zI64gVt75/lG2MiIMsZL4A036msWXbEj50Qe4J7g 2Q7bzFRmpgzAw1N3t0st7Ykjk5Y8++EMby+pK3Piw5tCO1S9gfBhr0cG8Wb4 rED89nI8zE5y/JyXCn9+uzjXRwpz52j6i4ph0/mDM7xkF4qb4CqPsDfLlfBS B8/vJd2wf5fiWscHWOEiK20Zgt2C9uZnTMFP1AtHxm0ciKmYkdgILtzn477s gBc8Tz6hjvWDYy3LS7ghsGP/A6U8Gg4QhJ+2jYe9IjxmheyH0xsb8iOz4HUn Dk36noZNdYXFpVXM7GuwtHd3QW8t/EKss/ZsgWdU6HeGquDQ1oF9wm74OVVs PvsdHJ8aN/60H9adqZ8dNwLb8325XUa4LXbRw/ksR2JJQnXbZg6coh5W7nKD L92vztzGhzX3Jk/w/GB9peWx3qC/vPGTVU44vE+ivz0tBubN4zjv3QWb7mf4 J0L9+Ow= "]]}}}, {}, {}, {}, {}}}, { DisplayFunction -> Identity, GridLines -> {None, None}, DisplayFunction -> Identity, DisplayFunction -> Identity, DisplayFunction -> Identity, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, AxesOrigin -> {-0.16939590853406716`, 0.49421524333956784`}, PlotRange -> NCache[{{-0.09594104554141858, Log[100]}, {0.5408782903418785, 3.4339872044851463`}}, {{-0.09594104554141858, 4.605170185988092}, { 0.5408782903418785, 3.4339872044851463`}}], PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False}, AxesLabel -> {None, None}, AxesOrigin -> {-0.16939590853406716`, 0.49421524333956784`}, DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ FormBox[ StyleBox["\"node degree\"", 14, GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, { FormBox[ StyleBox["\"node from higher to lower degree\"", 14, GrayLevel[0], StripOnInput -> False], TraditionalForm], None}}, FrameStyle -> {{ StrokeForm[ Opacity[0]], StrokeForm[ Opacity[0]]}, {Automatic, None}}, FrameTicks -> {{Charting`FindScaledTicks[ (Charting`SimpleTicks[#, #2, 6]& )[ SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[ (Charting`SimpleTicks[#, #2, 6]& )[ SlotSequence[1]], {Log, Exp}]& , {}}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.4, 0.5], AbsoluteThickness[1], AbsoluteDashing[{1, 2}]], ImageSize -> 310, Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Exp[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Exp[#]& )[ Part[#, 1]], (Exp[#]& )[ Part[#, 2]]}& )}}, PlotRange -> NCache[{{-0.09594104554141858, Log[100]}, {0.5408782903418785, 3.4339872044851463`}}, {{-0.09594104554141858, 4.605170185988092}, { 0.5408782903418785, 3.4339872044851463`}}], PlotRangeClipping -> True, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[ (Charting`SimpleTicks[#, #2, 6]& )[ SlotSequence[1]], {Log, Exp}]& , Charting`FindScaledTicks[ (Charting`SimpleTicks[#, #2, 6]& )[ SlotSequence[1]], {Log, Exp}]& }}],GraphicsBox[{{ Directive[ EdgeForm[ Directive[ Thickness[Small], Opacity[0.616]]], RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`]], {{}, { Directive[ EdgeForm[ Directive[ Thickness[Small], Opacity[0.616]]], RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`]], {{ TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{2., 0}, {3., 49.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 49]& , TagBoxNote -> "49"], StyleBox["49", {}, StripOnInput -> False]], Annotation[#, Style[49, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{3., 0}, {4., 20.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 20]& , TagBoxNote -> "20"], StyleBox["20", {}, StripOnInput -> False]], Annotation[#, Style[20, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{4., 0}, {5., 9.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 9]& , TagBoxNote -> "9"], StyleBox["9", {}, StripOnInput -> False]], Annotation[#, Style[9, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{5., 0}, {6., 6.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", {}, StripOnInput -> False]], Annotation[#, Style[6, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{6., 0}, {7., 6.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", {}, StripOnInput -> False]], Annotation[#, Style[6, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{7., 0}, {8., 3.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", {}, StripOnInput -> False]], Annotation[#, Style[3, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{8., 0}, {9., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{9., 0}, {10., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{10., 0}, {11., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{13., 0}, {14., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{18., 0}, {19., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{24., 0}, {25., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, { TagBox[ TooltipBox[ TagBox[{ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{31., 0}, {32., 1.}, "RoundingRadius" -> 0]}]}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}}}, {}, {}}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}}}, { AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, AxesLabel -> {None, None}, AxesOrigin -> {1.815, 0}, Frame -> True, FrameLabel -> {{ FormBox[ StyleBox["\"node count\"", 14, GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, { FormBox[ StyleBox["\"degree bins\"", 14, GrayLevel[0], StripOnInput -> False], TraditionalForm], None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], ImageSize -> 310, PlotRange -> {{2., 11.25}, {All, All}}, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, {None, Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}]}, "RowDefault"]], "Output", CellChangeTimes->{{3.739469693807404*^9, 3.739469810754817*^9}, 3.739470429220811*^9, 3.740429851084076*^9}, CellLabel-> "Out[303]=",ExpressionUUID->"db10c10a-ab25-4ec1-b6dc-0d724fe0ffa1"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 7", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.73946989805221*^9}, { 3.739470335418887*^9, 3.7394703361265793`*^9}, {3.739470534132822*^9, 3.739470534260249*^9}, {3.739473623486553*^9, 3.7394736235772333`*^9}},ExpressionUUID->"94fa0339-998f-4425-81ca-\ 8db857330ef2"], Cell["\<\ What is the graph spectrum of the Tetrahedral graph (sort it from largest to \ lowest eigen value)?\ \>", "Text", CellChangeTimes->{{3.739470602516161*^9, 3.7394706253665447`*^9}, { 3.7394727490850363`*^9, 3.739472749387154*^9}},ExpressionUUID->"a1b73688-ca1b-4382-b9bf-\ 2bfe981ec713"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Graph", "[", RowBox[{ RowBox[{"EdgeList", "@", RowBox[{"GraphData", "[", "\"\\"", "]"}]}], ",", RowBox[{"PlotTheme", "->", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.739200274417038*^9, 3.739200274568467*^9}, 3.739470465373539*^9, 3.739470584861906*^9, {3.73962635924179*^9, 3.7396263853839293`*^9}}, CellLabel->"In[52]:=",ExpressionUUID->"7e635ee3-7528-4f61-ae55-7bd3b6af7a2e"], Cell[BoxData[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4}, { Null, {{1, 2}, {1, 3}, {1, 4}, {2, 3}, {2, 4}, {3, 4}}}, { PlotTheme -> "Web"}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-1., 1.0106430996148606`*^-15}, { 6.049014748177263*^-16, -1.}}], LineBox[{{-1., 1.0106430996148606`*^-15}, { 1., -1.133107779529596*^-15}}], LineBox[{{-1., 1.0106430996148606`*^-15}, {-7.044813998280222*^-16, 1.}}], LineBox[{{6.049014748177263*^-16, -1.}, { 1., -1.133107779529596*^-15}}], LineBox[{{6.049014748177263*^-16, -1.}, {-7.044813998280222*^-16, 1.}}], LineBox[{{1., -1.133107779529596*^-15}, {-7.044813998280222*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf9t9UMttVqr7dvmveUl4u6ff7DXhV8yJZt9l7 +bxaWuvzbr+D7Lv8rN2b7BNtmDZNWvF2/2vr6IWqFqvtk+OsL4XYv91/X9/H e9+8OfbrrHd6CEq/3d/YnXTsiMklG5j8TF2w/H6Y/uNWYP37YeavkwGbvx9m /zwesP37Ye5zh7hv/24D3Z9VRR/g8rdvcukevPkBrv/8w3/Ltml/hJt/LuDR tNCEj3D7NZMWR5cXfYS7DyYPcz9MP8x/MPNh/ofZDwsfAHssoLI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-1., 1.0106430996148606`*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$1"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXV8y19L69FGbddY7PQSl3+7P0vfx3jdvjn1ynPWl EPu3+zdYRy9UtVhtn2jDtGnSirf7lWXf5Wft3mTv5fNqaa3Pu/3CvKp5kazb 7LvmLeXlkn6/f4+S2a5S9e32DGDwAS6/20D3Z1XRB7j+2ze5dA/e/AA3//zD f8u2aX+E238u4NG00ISP+2Hu00xaHF1e9HE/nx5Yfj9Mngmifz9M/2kZsPn7 Yebv5gHbvx9mfwrEffth7oPJw9wP0w/zH8x8mP9h9sPCBwDcZ5vi "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{6.049014748177263*^-16, -1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$2"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf7O2UzHaVqm+3322g+7Oq6IP9VB7VvEjWbfa3 b3LpHrz5wX6pzLv8rN2b7M8//Ldsm/ZH+21W0QtVLVbbnwt4NC004aN9qa6P 9755c+w1kxZHlxd9tGcSP9rTmXllD0ye2QAsvx+m/481WP9+mPmesmDz98Ps t+QF278f5r5HEPft75q3lJdL+j1c3svn1dJan3dw/Yk2TJsmrXgLNz85zvpS iP1buP3rrHd6CEq/hbsPJg9zP0w/zH8w82H+h9kPCx8AuxOUGA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1., -1.133107779529596*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$3"], TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXRt7Y83GxJN7NJMWR5cXfbT/qOvjvW/eHPtzAY+m hSZ8tP9sFb1Q1WK1/fmH/5Zt0/5of0TmXX7W7k32t29y6R68+cF+C49qXiTr NvvdBro/q4o+2Mcqme0qVd9uzwAGCPmueUt5uaTfw/V7+bxaWuvzDm5+og3T pkkr3sLtT46zvhRi/9Ye5r511js9BKXf2rfrg+X3w+T3W4P174fp15IFm78f Zr4UL9j+/TD7D0Pctx/mPpg8zP0w/TD/wcyH+R9mPyx8AMW/mCg= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-7.044813998280222*^-16, 1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$4"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{5., 270.}, {-134., 130.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{276.734375, Automatic}]], "Output", CellChangeTimes->{ 3.73920027535277*^9, 3.739271137289817*^9, 3.7394704360945873`*^9, 3.7394704685899076`*^9, 3.739470511780052*^9, 3.739470585205475*^9, { 3.739626356767108*^9, 3.739626385661627*^9}}, CellLabel->"Out[52]=",ExpressionUUID->"c383b97c-0a50-4bec-9f33-adf8d3ada6bb"] }, {2}]], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470412682672*^9},ExpressionUUID->"2e78ebc8-275b-4eb5-a572-\ c1d31176089a"], Cell["Here is the calculation:", "Text", CellChangeTimes->{{3.739470666179225*^9, 3.739470669489286*^9}},ExpressionUUID->"e784d94b-a9cd-4d47-8357-\ 9cc733c43c73"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "//", "Normal"}]], "Input", CellChangeTimes->{{3.739470631002296*^9, 3.73947063762989*^9}}, CellLabel->"In[10]:=",ExpressionUUID->"9aeefe4e-c285-4871-896a-971c5922fcc3"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1", ",", "0"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{{3.739470633671823*^9, 3.739470637898768*^9}}, CellLabel->"Out[10]=",ExpressionUUID->"7d395327-1d6f-41a0-bcd2-436aabeefdca"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Eigenvalues", "[", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.739470643024057*^9, 3.739470644628285*^9}}, CellLabel->"In[11]:=",ExpressionUUID->"36760295-256e-40a3-8941-39ff38864672"], Cell[BoxData[ RowBox[{"{", RowBox[{"3", ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}]], "Output", CellChangeTimes->{3.7394706449397573`*^9}, CellLabel->"Out[11]=",ExpressionUUID->"4670025a-5d6d-4cc0-b3bb-15f55cc6aa76"] }, Open ]], Cell["Alternatively,", "Text", CellChangeTimes->{{3.739470650765152*^9, 3.739470656273971*^9}},ExpressionUUID->"1dad538a-73d8-4694-8eea-\ d8845c8fbf5a"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Reverse", "@", RowBox[{"Sort", "[", RowBox[{"GraphData", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], "]"}]}]], "Input", CellChangeTimes->{ 3.73947052209374*^9, {3.7394705890118*^9, 3.739470598703623*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"6a12d35f-ef76-4cd5-a949-e88a3c942660"], Cell[BoxData[ RowBox[{"{", RowBox[{"3", ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}]], "Output", CellChangeTimes->{ 3.739470534548311*^9, {3.739470589376171*^9, 3.739470599034628*^9}}, CellLabel->"Out[8]=",ExpressionUUID->"d3faec05-93b4-4774-892a-19141e6c0b8f"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 8", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.739469907980624*^9}, { 3.739472919444203*^9, 3.73947291954473*^9}, {3.739473626063905*^9, 3.739473626276773*^9}},ExpressionUUID->"dfb9f4e4-9f1c-4d72-83da-\ 2753a997bcb6"], Cell["Are g and h isomorphic graphs? Justify (or provide mapping)", "Text", CellChangeTimes->{{3.739199920877578*^9, 3.739199963272811*^9}, { 3.739200213617751*^9, 3.739200222546043*^9}, {3.739469368881228*^9, 3.739469379281864*^9}},ExpressionUUID->"57beab09-9ca1-4113-9cb7-\ 44749fe55d6a"], Cell[BoxData[ RowBox[{ RowBox[{"g", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{"a", "b", "d", "c"}, {Null, {{1, 2}, {1, 3}, {2, 4}, {4, 3}}}, { GraphLayout -> "SpringElectricalEmbedding", PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{1.0300499011615263`, 1.0000510509552263`}, { 0.02995925560668622, 1.029995605925754}}], LineBox[{{1.0300499011615263`, 1.0000510509552263`}, { 0.9989225166884226, 0.}}], LineBox[{{0.02995925560668622, 1.029995605925754}, {0., 0.030920443306533762`}}], LineBox[{{0.9989225166884226, 0.}, {0., 0.030920443306533762`}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/ejk61mi1R/skyZMXmf78oN9ud/iOInDH+wDZ717 dvXuB/utZ7Pm8LF8tL94+FPcnj0f7OfO/104x/yj/cuPiZ16nR/sZcu+/9wa 8dF+ddEsbwuPD/Z6OXMOyqZ8tBd796jdlAEhz3Q5rCO14D1cf9uV4zyV797B zd9qsCwxtv0d3P5tzesCtVzf2cPcN3l6yqEovXf2vq4m14WMEfJyPTeNLJ+8 h+v3fbG9Xbb2Pdx8P+sD5a+s3sPt1/YveyGl8h7uPpg8zP0w/TD/wcyH+R9m Pyx8ADtUqx0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.0300499011615263`, 1.0000510509552263`}, { 0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["\"a\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQneCkM2fx2nn2atY3Lj1J/mh/bTObq1b4CntRV2Pu 2oiP9kd9f//7YbXBfmqeeXOy+Ud7/xyOiGvFm+3Xzlm29irzR3ufK0ev57Vu tc+XvZ9//9AH+wRT0aDX1tvsb81QX3On6gNc3lWk4MVNow9w/XxagaHHH7+H m2/bpr9qdc17uP12N81nVVi9t4e5T/rtW66Vyu/tNaymxTyN7ITLL5i0VOZZ S85+mP4anZPqQiUT9sPMzzuzT61k14z9MPsPBPzhT5syez/MfTB5mPth+mH+ g5kP8z/Mflj4AADbNqDD "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.02995925560668622, 1.029995605925754}, { 0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["\"b\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/cW1N0rn+3v7CZ4i11gU19r3q//7MMP5g316e+lD 7i2r7c8uO6rX3/LBPm/7r4e3Jiy331oRxiK744N9VNUDfQX5hfam/kE9Zjc/ 2PuoPny7gWGSvZvr9+B5Tz7YM0ABmvx+NP370czfj2b/fjT37T9lI3dZLf09 XN7Prj/c6uk7uP7aWblr5Orewc2ve1s657X1O7j90Yw6vDKq7+DuQ5O3R9Nv j2a+PZr99gA9SZzD "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9989225166884226, 0.}, {0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["\"d\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQMdqy7Gv6zaZu+j+vDtBoZJ9iWeTU9zjmy1j6p6 oK8gv9C+/OGR1CubNtvnbf/18NaE5fZvD23n+V65wT69vfQh95bV9mrz6hPU rq6wn+Apco1Fca09g7jc5dkr58PlMx5Xnroa2A3Xv+CtWKrK0pT9MPN3rF/3 0PhD336Y/ee+n3lfvW/6fpj7FGq4bubOmAWT3w+Th+rfD9MPNX8/zHyo/fth 9kPdtx/Nffth7ofph/kPZj7M/zD7YeEDAFnLpc0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0., 0.030920443306533762`}, {0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["\"c\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{2., 139.70262682642107`}, {-75.79617952990517, 68.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{140.2578125, Automatic}]}], ";", RowBox[{"h", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 3, 4, 2}, {Null, {{1, 2}, {1, 3}, {4, 2}, {4, 3}}}, { PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-1., 1.0106430996148606`*^-15}, { 6.049014748177263*^-16, -1.}}], LineBox[{{-1., 1.0106430996148606`*^-15}, { 1., -1.133107779529596*^-15}}], LineBox[{{6.049014748177263*^-16, -1.}, {-7.044813998280222*^-16, 1.}}], LineBox[{{1., -1.133107779529596*^-15}, {-7.044813998280222*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf9t9UMttVqr7dvmveUl4u6ff7DXhV8yJZt9l7 +bxaWuvzbr+D7Lv8rN2b7BNtmDZNWvF2/2vr6IWqFqvtk+OsL4XYv91/X9/H e9+8OfbrrHd6CEq/3d/YnXTsiMklG5j8TF2w/H6Y/uNWYP37YeavkwGbvx9m /zwesP37Ye5zh7hv/24D3Z9VRR/g8rdvcukevPkBrv/8w3/Ltml/hJt/LuDR tNCEj3D7NZMWR5cXfYS7DyYPcz9MP8x/MPNh/ofZDwsfAHssoLI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-1., 1.0106430996148606`*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXV8y19L69FGbddY7PQSl3+7P0vfx3jdvjn1ynPWl EPu3+zdYRy9UtVhtn2jDtGnSirf7lWXf5Wft3mTv5fNqaa3Pu/3CvKp5kazb 7LvmLeXlkn6/f4+S2a5S9e32DGDwAS6/20D3Z1XRB7j+2ze5dA/e/AA3//zD f8u2aX+E238u4NG00ISP+2Hu00xaHF1e9HE/nx5Yfj9Mngmifz9M/2kZsPn7 Yebv5gHbvx9mfwrEffth7oPJw9wP0w/zH8x8mP9h9sPCBwDcZ5vi "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{6.049014748177263*^-16, -1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf7O2UzHaVqm+3322g+7Oq6IP9VB7VvEjWbfa3 b3LpHrz5wX6pzLv8rN2b7M8//Ldsm/ZH+21W0QtVLVbbnwt4NC004aN9qa6P 9755c+w1kxZHlxd9tGcSP9rTmXllD0ye2QAsvx+m/481WP9+mPmesmDz98Ps t+QF278f5r5HEPft75q3lJdL+j1c3svn1dJan3dw/Yk2TJsmrXgLNz85zvpS iP1buP3rrHd6CEq/hbsPJg9zP0w/zH8w82H+h9kPCx8AuxOUGA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1., -1.133107779529596*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["4", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXRt7Y83GxJN7NJMWR5cXfbT/qOvjvW/eHPtzAY+m hSZ8tP9sFb1Q1WK1/fmH/5Zt0/5of0TmXX7W7k32t29y6R68+cF+C49qXiTr NvvdBro/q4o+2Mcqme0qVd9uzwAGCPmueUt5uaTfw/V7+bxaWuvzDm5+og3T pkkr3sLtT46zvhRi/9Ye5r511js9BKXf2rfrg+X3w+T3W4P174fp15IFm78f Zr4UL9j+/TD7D0Pctx/mPpg8zP0w/TD/wcyH+R9mPyx8AMW/mCg= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-7.044813998280222*^-16, 1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{2., 143.42229270707554`}, {-77.92229270707563, 70.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{144.3828125, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.7396265135938673`*^9, 3.739626527255761*^9}, { 3.7396265659892893`*^9, 3.7396265678138647`*^9}}, CellLabel->"In[64]:=",ExpressionUUID->"80eb7b31-8324-42d2-8912-9eee1d3a0e14"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470372531953*^9},ExpressionUUID->"f82809d3-b999-4159-b394-\ a3c4c3b2269f"], Cell["Yes, here the Wolfram Language code proving it:", "Text", CellChangeTimes->{{3.739470373779545*^9, 3.739470385502555*^9}},ExpressionUUID->"faa43535-822e-4110-b4ef-\ 3caa90f10ce5"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"IsomorphicGraphQ", "[", RowBox[{"g", ",", "h"}], "]"}]], "Input", CellChangeTimes->{{3.739469919952243*^9, 3.7394699291269627`*^9}, { 3.73962653442146*^9, 3.7396265362977867`*^9}, {3.7396265768914757`*^9, 3.7396265794242697`*^9}}, CellLabel->"In[65]:=",ExpressionUUID->"297ebd5f-6d53-4fba-93b8-46fc73b7de1a"], Cell[BoxData["True"], "Output", CellChangeTimes->{3.739469929513906*^9, 3.73962657977845*^9}, CellLabel->"Out[65]=",ExpressionUUID->"c87d7111-9e30-4fae-835e-72a380fdba68"] }, Open ]], Cell["And here is a mapping:", "Text", CellChangeTimes->{{3.739469954482704*^9, 3.739469958201027*^9}, { 3.7394703893389597`*^9, 3.7394703898115807`*^9}},ExpressionUUID->"0cd20964-0e22-4c76-8918-\ 957a1038bee4"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"First", "[", RowBox[{"Normal", "[", RowBox[{"FindGraphIsomorphism", "[", RowBox[{"g", ",", "h"}], "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.739469963702938*^9, 3.7394699663297377`*^9}, { 3.739626539015171*^9, 3.739626541833969*^9}, {3.739626581315106*^9, 3.739626582536096*^9}}, CellLabel->"In[66]:=",ExpressionUUID->"ba9eeaa8-3b3a-4bc1-8f13-304c3a441975"], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"\<\"a\"\>", "\[Rule]", "1"}], ",", RowBox[{"\<\"b\"\>", "\[Rule]", "3"}], ",", RowBox[{"\<\"d\"\>", "\[Rule]", "4"}], ",", RowBox[{"\<\"c\"\>", "\[Rule]", "2"}]}], "}"}]], "Output", CellChangeTimes->{3.7394699667072363`*^9, 3.739626582895638*^9}, CellLabel->"Out[66]=",ExpressionUUID->"3cd4e5f3-f824-4592-b386-61aef3f55596"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 9", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.73946989805221*^9}, { 3.739470335418887*^9, 3.7394703361265793`*^9}, {3.739472280595807*^9, 3.7394722806620607`*^9}, {3.739472921896441*^9, 3.739472921997143*^9}, { 3.739473628594727*^9, 3.7394736288418207`*^9}},ExpressionUUID->"f076cbdd-d920-484c-b317-\ 193d8df3b434"], Cell["Are these two graphs co-spectral?", "Text", CellChangeTimes->{{3.7394718790650682`*^9, 3.739471891239641*^9}},ExpressionUUID->"f31544b1-3f1a-4ad7-85c3-\ 45479d415aa6"], Cell[BoxData[ RowBox[{ RowBox[{"g", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{"a", "b", "d", "c"}, {Null, {{1, 2}, {1, 3}, {2, 4}, {4, 3}}}, { GraphLayout -> "SpringElectricalEmbedding", PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{1.0300499011615263`, 1.0000510509552263`}, { 0.02995925560668622, 1.029995605925754}}], LineBox[{{1.0300499011615263`, 1.0000510509552263`}, { 0.9989225166884226, 0.}}], LineBox[{{0.02995925560668622, 1.029995605925754}, {0., 0.030920443306533762`}}], LineBox[{{0.9989225166884226, 0.}, {0., 0.030920443306533762`}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/ejk61mi1R/skyZMXmf78oN9ud/iOInDH+wDZ717 dvXuB/utZ7Pm8LF8tL94+FPcnj0f7OfO/104x/yj/cuPiZ16nR/sZcu+/9wa 8dF+ddEsbwuPD/Z6OXMOyqZ8tBd796jdlAEhz3Q5rCO14D1cf9uV4zyV797B zd9qsCwxtv0d3P5tzesCtVzf2cPcN3l6yqEovXf2vq4m14WMEfJyPTeNLJ+8 h+v3fbG9Xbb2Pdx8P+sD5a+s3sPt1/YveyGl8h7uPpg8zP0w/TD/wcyH+R9m Pyx8ADtUqx0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.0300499011615263`, 1.0000510509552263`}, { 0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["\"a\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQneCkM2fx2nn2atY3Lj1J/mh/bTObq1b4CntRV2Pu 2oiP9kd9f//7YbXBfmqeeXOy+Ud7/xyOiGvFm+3Xzlm29irzR3ufK0ev57Vu tc+XvZ9//9AH+wRT0aDX1tvsb81QX3On6gNc3lWk4MVNow9w/XxagaHHH7+H m2/bpr9qdc17uP12N81nVVi9t4e5T/rtW66Vyu/tNaymxTyN7ITLL5i0VOZZ S85+mP4anZPqQiUT9sPMzzuzT61k14z9MPsPBPzhT5syez/MfTB5mPth+mH+ g5kP8z/Mflj4AADbNqDD "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.02995925560668622, 1.029995605925754}, { 0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["\"b\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/cW1N0rn+3v7CZ4i11gU19r3q//7MMP5g316e+lD 7i2r7c8uO6rX3/LBPm/7r4e3Jiy331oRxiK744N9VNUDfQX5hfam/kE9Zjc/ 2PuoPny7gWGSvZvr9+B5Tz7YM0ABmvx+NP370czfj2b/fjT37T9lI3dZLf09 XN7Prj/c6uk7uP7aWblr5Orewc2ve1s657X1O7j90Yw6vDKq7+DuQ5O3R9Nv j2a+PZr99gA9SZzD "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9989225166884226, 0.}, {0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["\"d\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQMdqy7Gv6zaZu+j+vDtBoZJ9iWeTU9zjmy1j6p6 oK8gv9C+/OGR1CubNtvnbf/18NaE5fZvD23n+V65wT69vfQh95bV9mrz6hPU rq6wn+Apco1Fca09g7jc5dkr58PlMx5Xnroa2A3Xv+CtWKrK0pT9MPN3rF/3 0PhD336Y/ee+n3lfvW/6fpj7FGq4bubOmAWT3w+Th+rfD9MPNX8/zHyo/fth 9kPdtx/Nffth7ofph/kPZj7M/zD7YeEDAFnLpc0= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0., 0.030920443306533762`}, {0.028446269575462646`, 0.028446269575462646`}]}, "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["\"c\"", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{2., 139.7026268264211}, {-75.7961795299052, 68.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{140.2578125, Automatic}]}], ";", RowBox[{"h", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 3, 4, 2}, {Null, {{1, 2}, {1, 3}, {4, 2}, {4, 3}}}, { PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-1., 1.0106430996148606`*^-15}, { 6.049014748177263*^-16, -1.}}], LineBox[{{-1., 1.0106430996148606`*^-15}, { 1., -1.133107779529596*^-15}}], LineBox[{{6.049014748177263*^-16, -1.}, {-7.044813998280222*^-16, 1.}}], LineBox[{{1., -1.133107779529596*^-15}, {-7.044813998280222*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf9t9UMttVqr7dvmveUl4u6ff7DXhV8yJZt9l7 +bxaWuvzbr+D7Lv8rN2b7BNtmDZNWvF2/2vr6IWqFqvtk+OsL4XYv91/X9/H e9+8OfbrrHd6CEq/3d/YnXTsiMklG5j8TF2w/H6Y/uNWYP37YeavkwGbvx9m /zwesP37Ye5zh7hv/24D3Z9VRR/g8rdvcukevPkBrv/8w3/Ltml/hJt/LuDR tNCEj3D7NZMWR5cXfYS7DyYPcz9MP8x/MPNh/ofZDwsfAHssoLI= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-1., 1.0106430996148606`*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXV8y19L69FGbddY7PQSl3+7P0vfx3jdvjn1ynPWl EPu3+zdYRy9UtVhtn2jDtGnSirf7lWXf5Wft3mTv5fNqaa3Pu/3CvKp5kazb 7LvmLeXlkn6/f4+S2a5S9e32DGDwAS6/20D3Z1XRB7j+2ze5dA/e/AA3//zD f8u2aX+E238u4NG00ISP+2Hu00xaHF1e9HE/nx5Yfj9Mngmifz9M/2kZsPn7 Yebv5gHbvx9mfwrEffth7oPJw9wP0w/zH8x8mP9h9sPCBwDcZ5vi "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{6.049014748177263*^-16, -1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQDQEf7O2UzHaVqm+3322g+7Oq6IP9VB7VvEjWbfa3 b3LpHrz5wX6pzLv8rN2b7M8//Ldsm/ZH+21W0QtVLVbbnwt4NC004aN9qa6P 9755c+w1kxZHlxd9tGcSP9rTmXllD0ye2QAsvx+m/481WP9+mPmesmDz98Ps t+QF278f5r5HEPft75q3lJdL+j1c3svn1dJan3dw/Yk2TJsmrXgLNz85zvpS iP1buP3rrHd6CEq/hbsPJg9zP0w/zH8w82H+h9kPCx8AuxOUGA== "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1., -1.133107779529596*^-15}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["4", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXRt7Y83GxJN7NJMWR5cXfbT/qOvjvW/eHPtzAY+m hSZ8tP9sFb1Q1WK1/fmH/5Zt0/5of0TmXX7W7k32t29y6R68+cF+C49qXiTr NvvdBro/q4o+2Mcqme0qVd9uzwAGCPmueUt5uaTfw/V7+bxaWuvzDm5+og3T pkkr3sLtT46zvhRi/9Ye5r511js9BKXf2rfrg+X3w+T3W4P174fp15IFm78f Zr4UL9j+/TD7D0Pctx/mPpg8zP0w/TD/wcyH+R9mPyx8AMW/mCg= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-7.044813998280222*^-16, 1.}, {0.04522292993630572, 0.04522292993630572}]}, "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{2., 143.42229270707554`}, {-77.92229270707566, 70.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{144.3828125, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.7396265135938673`*^9, 3.739626527255761*^9}, { 3.7396265659892893`*^9, 3.7396265678138647`*^9}}, CellLabel->"In[64]:=",ExpressionUUID->"9e652d0b-4fb7-44de-a380-ad104d70d722"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470412682672*^9},ExpressionUUID->"61c1573b-0651-4f2b-ae05-\ c5e0b53fb094"], Cell["\<\ Yes, because they are isomorphic. All isomorphic graphs are also cospectral \ (not the other way around).\ \>", "Text", CellChangeTimes->{{3.739470666179225*^9, 3.739470669489286*^9}, { 3.7394723163934803`*^9, 3.739472331996889*^9}},ExpressionUUID->"2316228a-e496-4086-bed4-\ c3c1278bf052"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Question 10", "Subchapter", CellChangeTimes->{{3.739469894498317*^9, 3.73946989805221*^9}, { 3.739470335418887*^9, 3.7394703361265793`*^9}, {3.739472282192219*^9, 3.739472282225724*^9}, {3.739472924843506*^9, 3.739472924933559*^9}, { 3.739473631687962*^9, 3.739473631902371*^9}},ExpressionUUID->"9126a848-6e23-4656-b738-\ 594c00d67785"], Cell["Is h a subgraph of g?", "Text", CellChangeTimes->{{3.739470666179225*^9, 3.739470669489286*^9}, { 3.7394723163934803`*^9, 3.739472331996889*^9}, {3.739472497869977*^9, 3.7394725008838387`*^9}},ExpressionUUID->"9d4c30aa-4ee2-4c54-ba52-\ f05f2ad8f4e7"], Cell[BoxData[ RowBox[{ RowBox[{"g", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 4, 8, 12, 16, 20}, {{2}, {3}, {4}, {5}, {1}, {3}, {4}, { 5}, {1}, {2}, {4}, {5}, {1}, {2}, {3}, {5}, {1}, {2}, {3}, {4}}}, Pattern}]}, { GraphLayout -> "CircularEmbedding", PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, {-0.5877852522924727, -0.8090169943749468}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, { 0.5877852522924737, -0.8090169943749481}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{-0.9510565162951538, 0.30901699437494834`}, {-7.044813998280222*^-16, 1.}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, { 0.5877852522924737, -0.8090169943749481}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{-0.5877852522924727, -0.8090169943749468}, \ {-7.044813998280222*^-16, 1.}}], LineBox[{{0.5877852522924737, -0.8090169943749481}, { 0.9510565162951533, 0.30901699437494634`}}], LineBox[{{ 0.5877852522924737, -0.8090169943749481}, {-7.044813998280222*^-16, 1.}}], LineBox[{{0.9510565162951533, 0.30901699437494634`}, {-7.044813998280222*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzRjqIsyX/26/UNG9U9kxN+2TeGRf6k96u5/5X9u/ ErGb9mEPVtZ8OPVm/7d9oVczvW/Ym2UZHrmg82b/tkspKVr81+03nJqh7338 9f65VXXdqxuu2q8QyD3pv+T1/oSX+ubvj12GyytHPHxkxHsJrp+L4TfnlroL cPOnqIsYvWw5B7e/auXG+5fenbGHuS/mIJP706Qz9gvmZtu+8X4Pl7+W8v7K VM4PcP3P5mtvXBrxAW7+yvfl1RndH+D2rz3Tq/dszge4+2DyMPfD9MP8BzMf 5n+Y/bDwAQBHubGl "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.9510565162951538, 0.30901699437494834`}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQHRVVyqJ8/tF+zw0HAndKPN+/W9Dvlsunh/sDs95s 32L9fP/6p7dyWbUf7r/O2epjtfD5/v78pK1Pex7s/17/lyXK/sV+zgsnFRLU H+xnXlNQOJPt5X5GsXm7Ulge7F/0Zfrs8scv4fKOtvuPhh54Bdfvm2lkNLX9 Ndz83PurXm1RfQO3/3Odc71V95v9MPf9tsh/arruzf6fi+boMa55DJdnPc8/ 26H4CVy/qmtHcILgU7j5q58ovHha9hRu/+Z5Pn4PZz6Fuw8mD3M/TD/MfzDz Yf6H2Q8LHwCX9LeT "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.5877852522924727, -0.8090169943749468}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQnRxVyqJ8/pF96IYDgTslnu9nWjxHj3HNY/vYrDfb t1g/3893nn+2Q/ET+8ecrT5WC5/v13PtCE4QfGrP3PCXJcr+xf4tTxRePC17 as+/pqBwJtvL/Xvm+fg9nPnUft2X6bPLH7+Ey/va7j8aeuAVXH9kppHR1PbX cPMr7696tUX1Ddz+/3XO9Vbdb/bD3Mdumf/UdN2b/UcE/W65fHoIl9/x9FYu q/ZDuP4Z+Ulbn/Y8gJsvdOGkQoL6A7j9XGLzdqWwPIC7DyYPcz9MP8x/MPNh /ofZDwsfAGSQqjw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.5877852522924737, -0.8090169943749481}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQ/TfERZgv/539u8J7p7JjbtrPmZtt+8b7vf39v23/ SsRu2l9JeX9lKucH+0v7Qq9met+wfzJfe+PSiA/2ky6lpGjxX7df/r68OqP7 g31lVV336oar9qvP9Oo9m/PB3ualvvn7Y5fh8v/DHz4y4r0E1//s/y/OLXUX 4Ob7qIsYvWw5B7ffaOXG+5fenbGHuU/kIJP706Qz9nE8si/1J72Fywc9WFnz 4dQbuH6jLMMjF3TewM1fc2qGvvfx13D7lwjknvRf8hruPpg8zP0w/TD/wcyH +R9mPyx8AM+9rtQ= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.9510565162951533, 0.30901699437494634`}, { 0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["4", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQXRt7Y83GxJN7dBa9VolP/WjPLvzS5ejs2faaR68W Pgz+aO/ltTzzpuMq+7TSzuVyih/tVcOmV7wS3GQfZuV7mu/SB/uIoBhZcbut 9v5LhEXz8z7YT1Xa5fcpdJs9Axgg5BO337iqqPwerj+0OzXzUfQ7uPmmom83 HNr7Fm7/+tIQGduIt/Yw9y3frbHN0fSt/VwRsPx+mLyYN1j/fpj+boj5+2Hm 74PYvx9m/2+I+/bD3AeTh7kfph/mP5j5MP/D7IeFDwCesZdt "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-7.044813998280222*^-16, 1.}, {0.043624469862213966`, 0.043624469862213966`}]}, "DynamicName", BoxID -> "VertexID$5"], InsetBox[ FormBox["5", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$5", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$5"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{3., 179.03105232616406`}, {-91.943797617343, 84.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{180.015625, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.739472536254841*^9, 3.739472538439211*^9}, { 3.739626616616309*^9, 3.7396266196902742`*^9}, {3.739626664296506*^9, 3.7396266657453203`*^9}}, CellLabel->"In[70]:=", CellID->564171,ExpressionUUID->"79ce01e8-7142-463f-af6d-9f96f8f08465"], Cell[BoxData[ RowBox[{ RowBox[{"h", "=", GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3}, {Null, {{1, 2}, {1, 3}, {2, 3}}}, { PlotTheme -> "Web", VertexLabels -> {"Name"}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 0.8660254037844389, -0.5000000000000012}}], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 1.8369701987210297`*^-16, 1.}}], LineBox[{{0.8660254037844389, -0.5000000000000012}, { 1.8369701987210297`*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvcIn4kXVttf7D2f/7hE/fmt/q4vh3FfPX+1nlLqU 2MZxe3/I/nVzJum+2j9tqb5B9rHb+yvlCxo2zHy53+/pmgz9d3f2r4t0lNxn 9XL/+vcbM+8n3dvfz3RtHZvUy/1f/4PAfbi8LIe694RzDxD6e1d6v+h4CDdf S/dF+imZR3D7v34SO7+n+tF+mPtEvJosS+Y82n86pN6Yu/UNXP7PTUaTZPu3 cP3XKx0CXC+/hZu/yD5/u7nRO7j9B6fdUnwf9A7uPpg8zP1w/VD/wcyH+R9m Pyx8AGC6vV8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.8660254037844384, -0.4999999999999994}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvdYn4kXVttf2T7J/94gfv7X/Qki9MXfrG3slqUuJ bRy39zPeYjRJtn9rv32pvkH2sdv771Q6BLhefmuf/3RNhv67O/uX2+dvNzd6 Z3/h/cbM+0n39h+bdkvxfdA7e24GEHgAl9fjUPeecO4BXH9870rvFx0P4eZb 6b5IPyXzCG4/62ex83uqH+2HuU/Fq8myZM6j/V0uhnNfPX8Fl4/cv27OJN1X cP118gUNG2a+hJu/OdJRcp/VS7j9U5iurWOTegl3H0we5n6Yfpj/YObD/A+z HxY+AO6Epbw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8660254037844389, -0.5000000000000012}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzdU1z8eycpUNj+pBGSu/j/YTWB6mcF6aaV9b2Z1+ z/ajfejVGbta+lbYzxD7YpzK99G+I9PRPvjZBvtVx66olhz5YH9v+vaKZ3c3 2wu2TFb1SP9gfzVA6MzCx1vsGcAAIX/3+40t+Ybv4frXFIVtES9/Bzf/4iXx GaaP38LtZ+N9aeDc8tYe5r7nW2uPdSe/tVeDyO+HyStC9O+H6c+DmL8fZv4R iP37YfbvhrhvP8x9MHmY+2H6Yf6DmQ/zP8x+WPgAAOZ1omU= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.8369701987210297`*^-16, 1.}, {0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{3., 188.95221530864004`}, {-89.94451478008018, 80.99999999999999}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{190.265625, Automatic}]}], ";"}]], "Input", CellChangeTimes->{{3.7394725644419928`*^9, 3.739472565641139*^9}, { 3.739626655304105*^9, 3.7396266554927263`*^9}}, CellLabel->"In[71]:=",ExpressionUUID->"44d661b3-3c34-4c37-8dae-fc20edc97d4e"], Cell[CellGroupData[{ Cell["Answer:", "Subsubsection", CellChangeTimes->{{3.739469881820612*^9, 3.739469884155719*^9}, 3.739470412682672*^9},ExpressionUUID->"ece3a4dc-4d73-49e0-b682-\ 4c06a057f1d7"], Cell["\<\ Yes, it can be seen as the result of extracting 3 nodes from the complete \ graph together with its edges:\ \>", "Text", CellChangeTimes->{{3.739470666179225*^9, 3.739470669489286*^9}, { 3.7394723163934803`*^9, 3.739472331996889*^9}, {3.739472497869977*^9, 3.739472524070702*^9}, {3.7394725917166348`*^9, 3.739472607659135*^9}},ExpressionUUID->"091a77a7-5920-4b2b-bd88-\ 7dca00062265"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"h", "=", RowBox[{"Subgraph", "[", RowBox[{ RowBox[{"CompleteGraph", "[", RowBox[{"5", ",", RowBox[{"VertexLabels", "\[Rule]", "Automatic"}]}], "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"VertexLabels", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", RowBox[{"ImageSize", "\[Rule]", "Small"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.73947254234035*^9, 3.739472542511448*^9}, 3.739472589282529*^9, {3.739626676607655*^9, 3.739626683873489*^9}}, CellLabel->"In[74]:=", CellID->27237301,ExpressionUUID->"e2888781-ee3c-4bd6-ab5c-e6f130d4052c"], Cell[BoxData[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3}, {Null, SparseArray[ Automatic, {3, 3}, 0, { 1, {{0, 2, 4, 6}, {{2}, {3}, {1}, {3}, {1}, {2}}}, Pattern}]}, { ImageSize -> Small, PlotTheme -> "Web", VertexLabels -> {Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Hue[0.0424, 1, 0.8, 1], Thickness[0.01]], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 0.8660254037844389, -0.5000000000000012}}], LineBox[{{-0.8660254037844384, -0.4999999999999994}, { 1.8369701987210297`*^-16, 1.}}], LineBox[{{0.8660254037844389, -0.5000000000000012}, { 1.8369701987210297`*^-16, 1.}}]}, { Directive[ EdgeForm[{ Hue[0.0424, 1, 0.8], Thickness[0.005]}], GrayLevel[1]], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvcIn4kXVttf7D2f/7hE/fmt/q4vh3FfPX+1nlLqU 2MZxe3/I/nVzJum+2j9tqb5B9rHb+yvlCxo2zHy53+/pmgz9d3f2r4t0lNxn 9XL/+vcbM+8n3dvfz3RtHZvUy/1f/4PAfbi8LIe694RzDxD6e1d6v+h4CDdf S/dF+imZR3D7v34SO7+n+tF+mPtEvJosS+Y82n86pN6Yu/UNXP7PTUaTZPu3 cP3XKx0CXC+/hZu/yD5/u7nRO7j9B6fdUnwf9A7uPpg8zP1w/VD/wcyH+R9m Pyx8AGC6vV8= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{-0.8660254037844384, -0.4999999999999994}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQvdYn4kXVttf2T7J/94gfv7X/Qki9MXfrG3slqUuJ bRy39zPeYjRJtn9rv32pvkH2sdv771Q6BLhefmuf/3RNhv67O/uX2+dvNzd6 Z3/h/cbM+0n39h+bdkvxfdA7e24GEHgAl9fjUPeecO4BXH9870rvFx0P4eZb 6b5IPyXzCG4/62ex83uqH+2HuU/Fq8myZM6j/V0uhnNfPX8Fl4/cv27OJN1X cP118gUNG2a+hJu/OdJRcp/VS7j9U5iurWOTegl3H0we5n6Yfpj/YObD/A+z HxY+AO6Epbw= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{0.8660254037844389, -0.5000000000000012}, { 0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[{{ EdgeForm[], PolygonBox[CompressedData[" 1:eJxTTMoPSmViYGAQAWIQzdU1z8eycpUNj+pBGSu/j/YTWB6mcF6aaV9b2Z1+ z/ajfejVGbta+lbYzxD7YpzK99G+I9PRPvjZBvtVx66olhz5YH9v+vaKZ3c3 2wu2TFb1SP9gfzVA6MzCx1vsGcAAIX/3+40t+Ybv4frXFIVtES9/Bzf/4iXx GaaP38LtZ+N9aeDc8tYe5r7nW2uPdSe/tVeDyO+HyStC9O+H6c+DmL8fZv4R iP37YfbvhrhvP8x9MHmY+2H6Yf6DmQ/zP8x+WPgAAOZ1omU= "], VertexColors -> { Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3], Hue[0.0424, 1, 0.8, 0.3]}]}, DiskBox[{1.8369701987210297`*^-16, 1.}, {0.04079919448955277, 0.04079919448955277}]}, "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{4., 204.9000406581444}, {-97.01301088756836, 87.}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{206.00390625, Automatic}]], "Output", CellChangeTimes->{ 3.739472542831719*^9, 3.7394726103975687`*^9, {3.7396266705846653`*^9, 3.739626684132174*^9}}, ImageSize->{84, 70}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, GraphicsBoxOptions->{ImageSize->80}, CellLabel->"Out[74]=",ExpressionUUID->"8b5f0e33-2fee-4676-a394-dcaebe1891fa"] }, Open ]], Cell["And here is subgraph highlighted inside the graph:", "Text", CellChangeTimes->{{3.739472611679821*^9, 3.7394726295789757`*^9}, { 3.739626726726103*^9, 3.739626731517223*^9}},ExpressionUUID->"d3ffad60-80e6-45b4-aaa3-\ 906d3cbdb2fd"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"HighlightGraph", "[", RowBox[{"g", ",", "h", ",", RowBox[{"GraphHighlightStyle", "\[Rule]", "\"\\""}], ",", RowBox[{"VertexLabels", "\[Rule]", "Automatic"}], ",", RowBox[{"PlotTheme", "->", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.7394726184023943`*^9, 3.739472620397444*^9}, { 3.739626698238345*^9, 3.73962673817476*^9}}, CellLabel->"In[77]:=", CellID->288316496,ExpressionUUID->"0988414e-d48a-4cd3-9627-4989038b9cdd"], Cell[BoxData[ GraphicsBox[ NamespaceBox["NetworkGraphics", DynamicModuleBox[{Typeset`graph = HoldComplete[ Graph[{1, 2, 3, 4, 5}, {Null, SparseArray[ Automatic, {5, 5}, 0, { 1, {{0, 4, 8, 12, 16, 20}, {{2}, {3}, {4}, {5}, {1}, {3}, {4}, {5}, { 1}, {2}, {4}, {5}, {1}, {2}, {3}, {5}, {1}, {2}, {3}, {4}}}, Pattern}]}, {FormatType -> TraditionalForm, GraphHighlight -> { UndirectedEdge[1, 2], 1, UndirectedEdge[2, 3], UndirectedEdge[1, 3], 3, 2}, GraphHighlightStyle -> {"Thick"}, GraphLayout -> "CircularEmbedding", ImageSize -> {180.015625, Automatic}, PlotTheme -> "Detailed", VertexLabels -> { Automatic, 3 -> Automatic, 1 -> Automatic, 2 -> Automatic}}]], Typeset`boxes, Typeset`boxes$s2d = GraphicsGroupBox[{{ Directive[ Opacity[0.7], Hue[0.6, 0.7, 0.5]], TagBox[ TooltipBox[ TagBox[ StyleBox[ LineBox[{ DynamicLocation["VertexID$1", Automatic, Center], DynamicLocation["VertexID$2", Automatic, Center]}], Directive[ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]], StripOnInput -> False], "DynamicName", BoxID -> "EdgeLabelID$1"], RowBox[{"1", "\[UndirectedEdge]", "2"}]], Annotation[#, UndirectedEdge[1, 2], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ StyleBox[ LineBox[{ DynamicLocation["VertexID$1", Automatic, Center], DynamicLocation["VertexID$3", Automatic, Center]}], Directive[ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]], StripOnInput -> False], "DynamicName", BoxID -> "EdgeLabelID$2"], RowBox[{"1", "\[UndirectedEdge]", "3"}]], Annotation[#, UndirectedEdge[1, 3], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$1", Automatic, Center], DynamicLocation["VertexID$4", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$3"], RowBox[{"1", "\[UndirectedEdge]", "4"}]], Annotation[#, UndirectedEdge[1, 4], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$1", Automatic, Center], DynamicLocation["VertexID$5", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$4"], RowBox[{"1", "\[UndirectedEdge]", "5"}]], Annotation[#, UndirectedEdge[1, 5], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ StyleBox[ LineBox[{ DynamicLocation["VertexID$2", Automatic, Center], DynamicLocation["VertexID$3", Automatic, Center]}], Directive[ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]], StripOnInput -> False], "DynamicName", BoxID -> "EdgeLabelID$5"], RowBox[{"2", "\[UndirectedEdge]", "3"}]], Annotation[#, UndirectedEdge[2, 3], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$2", Automatic, Center], DynamicLocation["VertexID$4", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$6"], RowBox[{"2", "\[UndirectedEdge]", "4"}]], Annotation[#, UndirectedEdge[2, 4], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$2", Automatic, Center], DynamicLocation["VertexID$5", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$7"], RowBox[{"2", "\[UndirectedEdge]", "5"}]], Annotation[#, UndirectedEdge[2, 5], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$3", Automatic, Center], DynamicLocation["VertexID$4", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$8"], RowBox[{"3", "\[UndirectedEdge]", "4"}]], Annotation[#, UndirectedEdge[3, 4], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$3", Automatic, Center], DynamicLocation["VertexID$5", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$9"], RowBox[{"3", "\[UndirectedEdge]", "5"}]], Annotation[#, UndirectedEdge[3, 5], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ LineBox[{ DynamicLocation["VertexID$4", Automatic, Center], DynamicLocation["VertexID$5", Automatic, Center]}], "DynamicName", BoxID -> "EdgeLabelID$10"], RowBox[{"4", "\[UndirectedEdge]", "5"}]], Annotation[#, UndirectedEdge[4, 5], "Tooltip"]& ]}, { Directive[ Hue[0.6, 0.2, 0.8], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.7]]]], TagBox[{ TagBox[ StyleBox[ DiskBox[{-0.9510565162951538, 0.30901699437494834`}, 0.021812234931106983`], Directive[ RGBColor[0.85, 0.5, 0.5], EdgeForm[{ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]}]], StripOnInput -> False], "DynamicName", BoxID -> "VertexID$1"], InsetBox[ FormBox["1", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$1", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$1"], TagBox[{ TagBox[ StyleBox[ DiskBox[{-0.5877852522924727, -0.8090169943749468}, 0.021812234931106983`], Directive[ RGBColor[0.85, 0.5, 0.5], EdgeForm[{ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]}]], StripOnInput -> False], "DynamicName", BoxID -> "VertexID$2"], InsetBox[ FormBox["2", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$2", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$2"], TagBox[{ TagBox[ StyleBox[ DiskBox[{0.5877852522924737, -0.8090169943749481}, 0.021812234931106983`], Directive[ RGBColor[0.85, 0.5, 0.5], EdgeForm[{ Thickness[Large], Hue[1, 1, 0.7], Opacity[1]}]], StripOnInput -> False], "DynamicName", BoxID -> "VertexID$3"], InsetBox[ FormBox["3", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$3", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$3"], TagBox[{ TagBox[ DiskBox[{0.9510565162951533, 0.30901699437494634`}, 0.021812234931106983`], "DynamicName", BoxID -> "VertexID$4"], InsetBox[ FormBox["4", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$4", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$4"], TagBox[{ TagBox[ DiskBox[{-7.044813998280222*^-16, 1.}, 0.021812234931106983`], "DynamicName", BoxID -> "VertexID$5"], InsetBox[ FormBox["5", TraditionalForm], Offset[{2, 2}, DynamicLocation["VertexID$5", Automatic, {Right, Top}]], ImageScaled[{0, 0}], BaseStyle -> "Graphics"]}, "DynamicName", BoxID -> "VertexLabelID$5"]}}], $CellContext`flag}, TagBox[ DynamicBox[GraphComputation`NetworkGraphicsBox[ 3, Typeset`graph, Typeset`boxes, $CellContext`flag], { CachedValue :> Typeset`boxes, SingleEvaluation -> True, SynchronousUpdating -> False, TrackedSymbols :> {$CellContext`flag}}, ImageSizeCache->{{4.402822066326525, 273.4716447323477}, {-136.7333634823477, 126.93312516539831`}}], MouseAppearanceTag["NetworkGraphics"]], AllowKernelInitialization->False, UnsavedVariables:>{$CellContext`flag}]], DefaultBaseStyle->{ "NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]}, FormatType->TraditionalForm, FrameTicks->None, ImageSize->{273.73828125, Automatic}]], "Output", CellChangeTimes->{ 3.7394726209464273`*^9, {3.739626698732526*^9, 3.7396267079828243`*^9}, 3.739626738432075*^9}, ImageSize->{84, 76}, ImageMargins->{{0, 0}, {0, 0}}, ImageRegion->{{0, 1}, {0, 1}}, GraphicsBoxOptions->{ImageSize->80}, CellLabel->"Out[77]=",ExpressionUUID->"d57adb9f-4f8d-4025-8c38-7e0ce7969d49"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{1213, 802}, WindowMargins->{{Automatic, 80}, {Automatic, 10}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 7, \ 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[583, 22, 276, 4, 98, "Title",ExpressionUUID->"609f17af-adc0-4f48-b38c-53b674fc6142"], Cell[CellGroupData[{ Cell[884, 30, 329, 7, 117, "Chapter",ExpressionUUID->"1d7e883d-bc2b-4ed6-826b-08904ab162ae"], Cell[CellGroupData[{ Cell[1238, 41, 278, 4, 67, "Section",ExpressionUUID->"1d0e9596-368a-4d77-be79-043d3591bc5d"], Cell[1519, 47, 452, 10, 58, "Text",ExpressionUUID->"ed253bf5-0c5f-491d-b7c3-46eb161cd420"], Cell[CellGroupData[{ Cell[1996, 61, 203, 3, 30, "Input",ExpressionUUID->"fe9a012c-34e3-42d2-a565-fc4ee6daef1b"], Cell[2202, 66, 233, 3, 34, "Output",ExpressionUUID->"a50f1253-6533-453b-8797-048146604853"] }, {2}]] }, Open ]], Cell[CellGroupData[{ Cell[2481, 75, 158, 3, 65, "Subchapter",ExpressionUUID->"d99f770a-948d-4903-bc9d-ec515806b9db"], Cell[2642, 80, 340, 5, 35, "Text",ExpressionUUID->"a6910f1b-4fbe-43fa-a593-7f55ff39a00a"], Cell[2985, 87, 6911, 161, 182, "Input",ExpressionUUID->"21edf90a-b48e-4c74-b5bd-5dc4256de4dc"], Cell[CellGroupData[{ Cell[9921, 252, 181, 3, 45, "Subsubsection",ExpressionUUID->"dc7923d4-3e44-4808-99f3-62d1de4fe417"], Cell[CellGroupData[{ Cell[10127, 259, 449, 12, 30, "Input",ExpressionUUID->"dffed4b6-152e-4e39-bdec-e8985c6fffe5"], Cell[10579, 273, 757, 22, 76, "Output",ExpressionUUID->"af70162a-ba12-4717-b9a4-933d4a483268"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[11397, 302, 160, 3, 65, "Subchapter",ExpressionUUID->"345e116d-962b-4442-9b0f-b8b03c22351d"], Cell[11560, 307, 310, 7, 35, "Text",ExpressionUUID->"8b637d23-2245-4a4e-9b3a-1c36ddee63c6"], Cell[11873, 316, 267, 8, 79, "Input",ExpressionUUID->"f0638c33-1106-498b-9f38-1b18abc05b07"], Cell[CellGroupData[{ Cell[12165, 328, 181, 3, 45, "Subsubsection",ExpressionUUID->"74ec65c3-fd32-4f51-a6c0-6c2b12bd5299"], Cell[12349, 333, 199, 3, 35, "Text",ExpressionUUID->"def07f61-c0ef-4cba-b20f-55dcda87d03d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[12597, 342, 211, 4, 65, "Subchapter",ExpressionUUID->"797e258b-7c7f-4539-8e68-fba552d0f7dd"], Cell[12811, 348, 421, 8, 35, "Text",ExpressionUUID->"bb55a278-4e0e-414d-bf1e-0f7f335a0f6b"], Cell[CellGroupData[{ Cell[13257, 360, 181, 3, 45, "Subsubsection",ExpressionUUID->"8b13ca04-ad60-458c-9176-97c068c90887"], Cell[13441, 365, 289, 6, 35, "Text",ExpressionUUID->"349b45b6-7690-444d-92d9-03e85d6739f3"], Cell[CellGroupData[{ Cell[13755, 375, 691, 16, 30, "Input",ExpressionUUID->"e6fd368d-1123-40da-adbd-c704dd422a3a"], Cell[14449, 393, 873, 24, 110, "Output",ExpressionUUID->"cd317a7e-78e7-4885-a11f-89f96d418ca0"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[15383, 424, 257, 4, 65, "Subchapter",ExpressionUUID->"b0145642-5919-4eca-9022-fa24e885c5c0"], Cell[15643, 430, 259, 6, 35, "Text",ExpressionUUID->"52acdcba-381b-45e0-9182-028173512589"], Cell[15905, 438, 9451, 217, 199, "Input",ExpressionUUID->"f7f6a6c1-dccc-44ca-bae9-51ada96248c8"], Cell[CellGroupData[{ Cell[25381, 659, 181, 3, 45, "Subsubsection",ExpressionUUID->"066d907c-f191-4f75-997a-523c3b887c27"], Cell[CellGroupData[{ Cell[25587, 666, 323, 6, 30, "Input",ExpressionUUID->"6b732960-c5d6-49c2-b36b-409407989acd"], Cell[25913, 674, 274, 5, 34, "Output",ExpressionUUID->"778a1c3d-4b40-4758-81c2-93d9f516053b"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[26248, 686, 259, 4, 65, "Subchapter",ExpressionUUID->"581bf028-0b23-4d03-b0ee-3fc458fd7b09"], Cell[26510, 692, 382, 7, 35, "Text",ExpressionUUID->"31a67541-7be3-46e6-ad46-be5058a18202"], Cell[CellGroupData[{ Cell[26917, 703, 383, 7, 30, "Input",ExpressionUUID->"fb852a77-dd56-46e2-855a-656818189558"], Cell[27303, 712, 9701, 221, 196, "Output",ExpressionUUID->"063857e9-c4b0-4f3a-9427-bd8e8ce0d78f"] }, Open ]], Cell[CellGroupData[{ Cell[37041, 938, 181, 3, 45, "Subsubsection",ExpressionUUID->"e09f65e6-4be7-4586-9c24-72b703f908aa"], Cell[37225, 943, 808, 13, 58, "Text",ExpressionUUID->"02394aee-532a-48d3-8fee-74611d31edbc"], Cell[CellGroupData[{ Cell[38058, 960, 593, 13, 30, "Input",ExpressionUUID->"09671064-6978-4c3f-9c06-67694588c766"], Cell[38654, 975, 518, 11, 34, "Output",ExpressionUUID->"39e877c6-6bf8-49f2-bda0-b102277d5876"] }, Open ]], Cell[39187, 989, 211, 4, 35, "Text",ExpressionUUID->"03259221-feae-4320-8df2-728407197ef9"], Cell[CellGroupData[{ Cell[39423, 997, 483, 12, 30, "Input",ExpressionUUID->"5a898685-5aee-4308-ab1b-e10504cf5387"], Cell[39909, 1011, 782, 15, 56, "Output",ExpressionUUID->"0c540305-a5d4-4bb9-825a-835cf2df26f1"] }, Open ]], Cell[40706, 1029, 402, 8, 35, "Text",ExpressionUUID->"15fd6d35-e50a-46e2-96a1-21363cfbb2c8"], Cell[CellGroupData[{ Cell[41133, 1041, 805, 22, 30, "Input",ExpressionUUID->"b2407628-f1a2-4372-8782-0f003a7d280e"], Cell[41941, 1065, 451, 9, 34, "Output",ExpressionUUID->"9a0b54c5-b237-42c3-8bb0-10cd2a484254"] }, Open ]], Cell[42407, 1077, 488, 9, 58, "Text",ExpressionUUID->"cf867fe8-2102-4312-8cd4-8fc000232b5d"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[42944, 1092, 253, 4, 65, "Subchapter",ExpressionUUID->"9a521a0e-ab0f-4d37-86f8-e90f780e3933"], Cell[43200, 1098, 348, 5, 35, "Text",ExpressionUUID->"74a0b491-33af-4166-b00c-cdbf679d4f19"], Cell[43551, 1105, 172530, 3844, 164, "Input",ExpressionUUID->"f65009f6-1a23-4005-a819-b1ea67af9be8"], Cell[216084, 4951, 213, 5, 35, "Text",ExpressionUUID->"f3ff832b-a99f-4fb7-ae70-756a3ae6fc0e"], Cell[CellGroupData[{ Cell[216322, 4960, 324, 6, 30, "Input",ExpressionUUID->"4bdd46d7-8564-4cb9-87a5-ea8886b5c771"], Cell[216649, 4968, 1283, 19, 56, "Output",ExpressionUUID->"4ef872fe-9d86-4e66-b9ed-cab69c4c9687"] }, Open ]], Cell[CellGroupData[{ Cell[217969, 4992, 181, 3, 45, "Subsubsection",ExpressionUUID->"6ed1cc02-8280-46f7-9407-48158320bc0b"], Cell[218153, 4997, 401, 8, 35, "Text",ExpressionUUID->"9da2aa37-7b1f-49ea-9da1-34787778aaac"], Cell[CellGroupData[{ Cell[218579, 5009, 1763, 43, 73, "Input",ExpressionUUID->"85a3d82c-74a4-4f3e-aeda-f2659eeb7617"], Cell[220345, 5054, 12972, 304, 229, "Output",ExpressionUUID->"db10c10a-ab25-4ec1-b6dc-0d724fe0ffa1"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[233378, 5365, 305, 5, 65, "Subchapter",ExpressionUUID->"94fa0339-998f-4425-81ca-8db857330ef2"], Cell[233686, 5372, 302, 7, 35, "Text",ExpressionUUID->"a1b73688-ca1b-4382-b9bf-2bfe981ec713"], Cell[CellGroupData[{ Cell[234013, 5383, 460, 9, 30, "Input",ExpressionUUID->"7e635ee3-7528-4f61-ae55-7bd3b6af7a2e"], Cell[234476, 5394, 7494, 175, 293, "Output",ExpressionUUID->"c383b97c-0a50-4bec-9f33-adf8d3ada6bb"] }, {2}]], Cell[CellGroupData[{ Cell[242004, 5574, 181, 3, 45, "Subsubsection",ExpressionUUID->"2e78ebc8-275b-4eb5-a572-c1d31176089a"], Cell[242188, 5579, 166, 3, 35, "Text",ExpressionUUID->"e784d94b-a9cd-4d47-8357-9cc733c43c73"], Cell[CellGroupData[{ Cell[242379, 5586, 308, 6, 30, "Input",ExpressionUUID->"9aeefe4e-c285-4871-896a-971c5922fcc3"], Cell[242690, 5594, 514, 12, 34, "Output",ExpressionUUID->"7d395327-1d6f-41a0-bcd2-436aabeefdca"] }, Open ]], Cell[CellGroupData[{ Cell[243241, 5611, 318, 6, 30, "Input",ExpressionUUID->"36760295-256e-40a3-8941-39ff38864672"], Cell[243562, 5619, 273, 7, 34, "Output",ExpressionUUID->"4670025a-5d6d-4cc0-b3bb-15f55cc6aa76"] }, Open ]], Cell[243850, 5629, 156, 3, 35, "Text",ExpressionUUID->"1dad538a-73d8-4694-8eea-d8845c8fbf5a"], Cell[CellGroupData[{ Cell[244031, 5636, 356, 8, 30, "Input",ExpressionUUID->"6a12d35f-ef76-4cd5-a949-e88a3c942660"], Cell[244390, 5646, 319, 8, 34, "Output",ExpressionUUID->"d3faec05-93b4-4774-892a-19141e6c0b8f"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[244770, 5661, 252, 4, 65, "Subchapter",ExpressionUUID->"dfb9f4e4-9f1c-4d72-83da-2753a997bcb6"], Cell[245025, 5667, 296, 4, 35, "Text",ExpressionUUID->"57beab09-9ca1-4113-9cb7-44749fe55d6a"], Cell[245324, 5673, 17980, 404, 166, "Input",ExpressionUUID->"80eb7b31-8324-42d2-8912-9eee1d3a0e14"], Cell[CellGroupData[{ Cell[263329, 6081, 181, 3, 45, "Subsubsection",ExpressionUUID->"f82809d3-b999-4159-b394-a3c4c3b2269f"], Cell[263513, 6086, 189, 3, 35, "Text",ExpressionUUID->"faa43535-822e-4110-b4ef-3caa90f10ce5"], Cell[CellGroupData[{ Cell[263727, 6093, 342, 6, 30, "Input",ExpressionUUID->"297ebd5f-6d53-4fba-93b8-46fc73b7de1a"], Cell[264072, 6101, 173, 2, 34, "Output",ExpressionUUID->"c87d7111-9e30-4fae-835e-72a380fdba68"] }, Open ]], Cell[264260, 6106, 217, 4, 35, "Text",ExpressionUUID->"0cd20964-0e22-4c76-8918-957a1038bee4"], Cell[CellGroupData[{ Cell[264502, 6114, 409, 8, 30, "Input",ExpressionUUID->"ba9eeaa8-3b3a-4bc1-8f13-304c3a441975"], Cell[264914, 6124, 390, 8, 34, "Output",ExpressionUUID->"3cd4e5f3-f824-4592-b386-61aef3f55596"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[265365, 6139, 356, 6, 65, "Subchapter",ExpressionUUID->"f076cbdd-d920-484c-b317-193d8df3b434"], Cell[265724, 6147, 177, 3, 35, "Text",ExpressionUUID->"f31544b1-3f1a-4ad7-85c3-45479d415aa6"], Cell[265904, 6152, 17967, 403, 166, "Input",ExpressionUUID->"9e652d0b-4fb7-44de-a380-ad104d70d722"], Cell[CellGroupData[{ Cell[283896, 6559, 181, 3, 45, "Subsubsection",ExpressionUUID->"61c1573b-0651-4f2b-ae05-c5e0b53fb094"], Cell[284080, 6564, 306, 7, 35, "Text",ExpressionUUID->"2316228a-e496-4086-bed4-c3c1278bf052"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[284435, 6577, 353, 6, 65, "Subchapter",ExpressionUUID->"9126a848-6e23-4656-b738-594c00d67785"], Cell[284791, 6585, 262, 4, 35, "Text",ExpressionUUID->"9d4c30aa-4ee2-4c54-ba52-f05f2ad8f4e7"], Cell[285056, 6591, 12081, 269, 193, "Input",ExpressionUUID->"79ce01e8-7142-463f-af6d-9f96f8f08465", CellID->564171], Cell[297140, 6862, 7278, 164, 190, "Input",ExpressionUUID->"44d661b3-3c34-4c37-8dae-fc20edc97d4e"], Cell[CellGroupData[{ Cell[304443, 7030, 181, 3, 45, "Subsubsection",ExpressionUUID->"ece3a4dc-4d73-49e0-b682-4c06a057f1d7"], Cell[304627, 7035, 404, 8, 35, "Text",ExpressionUUID->"091a77a7-5920-4b2b-bd88-7dca00062265"], Cell[CellGroupData[{ Cell[305056, 7047, 696, 15, 30, "Input",ExpressionUUID->"e2888781-ee3c-4bd6-ab5c-e6f130d4052c", CellID->27237301], Cell[305755, 7064, 7169, 167, 206, "Output",ExpressionUUID->"8b5f0e33-2fee-4676-a394-dcaebe1891fa"] }, Open ]], Cell[312939, 7234, 243, 4, 35, "Text",ExpressionUUID->"d3ffad60-80e6-45b4-aaa3-906d3cbdb2fd"], Cell[CellGroupData[{ Cell[313207, 7242, 492, 9, 30, "Input",ExpressionUUID->"0988414e-d48a-4cd3-9627-4989038b9cdd", CellID->288316496], Cell[313702, 7253, 9163, 232, 285, "Output",ExpressionUUID->"d57adb9f-4f8d-4025-8c38-7e0ce7969d49"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, Open ]] } ] *)