2422 lines
115 KiB
Mathematica
2422 lines
115 KiB
Mathematica
(* Content-type: application/vnd.wolfram.mathematica *)
|
|
|
|
(*** Wolfram Notebook File ***)
|
|
(* http://www.wolfram.com/nb *)
|
|
|
|
(* CreatedBy='Mathematica 12.2' *)
|
|
|
|
(*CacheID: 234*)
|
|
(* Internal cache information:
|
|
NotebookFileLineBreakTest
|
|
NotebookFileLineBreakTest
|
|
NotebookDataPosition[ 158, 7]
|
|
NotebookDataLength[ 117398, 2414]
|
|
NotebookOptionsPosition[ 115435, 2379]
|
|
NotebookOutlinePosition[ 115925, 2397]
|
|
CellTagsIndexPosition[ 115882, 2394]
|
|
WindowFrame->Normal*)
|
|
|
|
(* Beginning of Notebook Content *)
|
|
Notebook[{
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"secant", "[",
|
|
RowBox[{"x0_", ",", "y0_", ",", "x1_", ",", "y1_", ",", "z_"}], "]"}], ":=",
|
|
RowBox[{"x0", "-",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"y0", "-", "z"}], ")"}],
|
|
RowBox[{"(",
|
|
FractionBox[
|
|
RowBox[{"x1", "-", "x0"}],
|
|
RowBox[{"y1", "-", "y0"}]], ")"}]}]}]}],
|
|
";"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"secantmethod", "[",
|
|
RowBox[{
|
|
"f_", ",", "z_", ",", "x1_", ",", "x2_", ",", "\[Epsilon]_", ",",
|
|
"iterations_"}], "]"}], ":=",
|
|
RowBox[{"Block", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"k1", ",", "k2", ",", "k3", ",", "y1", ",", "y2", ",", "count"}], "}"}],
|
|
",", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"k1", "=", "x1"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"k2", "=", "x2"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"y1", "=",
|
|
RowBox[{"f", "[", "k1", "]"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"count", "=", "1"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"Print", "[",
|
|
RowBox[{"{",
|
|
RowBox[{"count", ",", "k1", ",", "y1"}], "}"}], "]"}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"y2", "=",
|
|
RowBox[{"f", "[", "k2", "]"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"count", "++"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"Print", "[",
|
|
RowBox[{"{",
|
|
RowBox[{"count", ",", "k2", ",", "y2"}], "}"}], "]"}], ";",
|
|
"\[IndentingNewLine]", "\[IndentingNewLine]",
|
|
RowBox[{"While", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"Abs", "[",
|
|
RowBox[{"k1", "-", "k2"}], "]"}], ">", "\[Epsilon]"}], "&&",
|
|
RowBox[{"count", "<", "iterations"}]}], ",", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"k3", "=",
|
|
RowBox[{"secant", "[",
|
|
RowBox[{"k1", ",", "y1", ",", "k2", ",", "y2", ",", "z"}], "]"}]}],
|
|
";", "\[IndentingNewLine]",
|
|
RowBox[{"k1", "=", "k2"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"y1", "=", "y2"}], ";", "\[IndentingNewLine]",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"k2", "=", "k3"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"y2", "=",
|
|
RowBox[{"f", "[", "k2", "]"}]}], ";", "\[IndentingNewLine]",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"count", "++"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"Print", "[",
|
|
RowBox[{"{",
|
|
RowBox[{"count", ",", "k2", ",", "y2"}], "}"}], "]"}], ";"}]}],
|
|
"\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}],
|
|
";"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"halfToUnit", "[",
|
|
RowBox[{"zl_", ",", "zr_", ",", "z\[Infinity]_"}], "]"}], ":=",
|
|
RowBox[{"Block", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"a", ",", "b", ",", "c", ",", "d", ",", "Mlist"}], "}"}], ",",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"f", "[", "z_", "]"}], ":=",
|
|
FractionBox[
|
|
RowBox[{
|
|
RowBox[{"a", " ", "z"}], "+", "b"}],
|
|
RowBox[{
|
|
RowBox[{"c", " ", "z"}], "+", "d"}]]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"Mlist", "=",
|
|
RowBox[{
|
|
RowBox[{"Solve", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"f", "[", "zl", "]"}], "\[Equal]",
|
|
RowBox[{"-", "1"}]}], ",",
|
|
RowBox[{
|
|
RowBox[{"f", "[", "zr", "]"}], "\[Equal]", "1"}], ",",
|
|
RowBox[{
|
|
RowBox[{"a", "/", "c"}], "\[Equal]", "z\[Infinity]"}], ",",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"a", " ", "d"}], "-",
|
|
RowBox[{"b", " ", "c"}]}], "\[Equal]", "1"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "]"}],
|
|
"\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{"a", "b"},
|
|
{"c", "d"}
|
|
}], ")"}], "/.", "Mlist"}]}]}], "\[IndentingNewLine]", "]"}]}],
|
|
";"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["f", "A_"], "[", "z_", "]"}], ":=",
|
|
RowBox[{"Which", "[",
|
|
RowBox[{
|
|
RowBox[{"z", "\[Equal]", "\[Infinity]"}], ",",
|
|
RowBox[{"If", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], "\[Equal]", "0"}],
|
|
",", "\[Infinity]", ",",
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "/",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}]}]}], "]"}], ",",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], "z"}], "+",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}], "\[Equal]",
|
|
"0"}], ",", "\[Infinity]", ",", "True", ",",
|
|
FractionBox[
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "z"}], "+",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"1", ",", "2"}], "\[RightDoubleBracket]"}]}],
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], "z"}], "+",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}]]}],
|
|
"]"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"check", "[", "A_", "]"}], ":=",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[", "0", "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[", "\[ImaginaryI]", "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[", "\[Infinity]", "]"}]}], "}"}]}]}], "Input",
|
|
CellChangeTimes->{{3.834156195726428*^9, 3.834156196843409*^9}, {
|
|
3.834156227495872*^9, 3.834156258336101*^9}, {3.834227745545252*^9,
|
|
3.8342277638961763`*^9}},
|
|
CellLabel->"In[1]:=",ExpressionUUID->"ac9676b1-1997-485c-a9c1-54de0dc0e0d8"],
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{"M0", "=",
|
|
RowBox[{"halfToUnit", "[",
|
|
RowBox[{
|
|
FractionBox[
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], "+", "\[ImaginaryI]"}], "2"], ",",
|
|
FractionBox[
|
|
RowBox[{
|
|
RowBox[{"-", "9"}], "+", "\[ImaginaryI]"}], "2"], ",",
|
|
FractionBox["1", "2"]}], "]"}]}], ";"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"toCirc", "[", "A_", "]"}], ":=",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[",
|
|
RowBox[{
|
|
SubscriptBox["f", "M0"], "[", "0", "]"}], "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[",
|
|
RowBox[{
|
|
SubscriptBox["f", "M0"], "[", "\[ImaginaryI]", "]"}], "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["f", "A"], "[",
|
|
RowBox[{
|
|
SubscriptBox["f", "M0"], "[", "\[Infinity]", "]"}], "]"}]}],
|
|
"}"}]}]}], "Input",
|
|
CellChangeTimes->{{3.834227761535627*^9, 3.834227765003961*^9}},
|
|
CellLabel->"In[6]:=",ExpressionUUID->"c7f763e0-500a-4d08-8071-77de1b9a2407"],
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{"dist", "[", "p_", "]"}], ":=",
|
|
RowBox[{"N", "[",
|
|
FractionBox[
|
|
RowBox[{"Sin", "[",
|
|
FractionBox["\[Pi]", "p"], "]"}],
|
|
RowBox[{"Sin", "[",
|
|
RowBox[{"2",
|
|
FractionBox["\[Pi]", "p"]}], "]"}]], "]"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"R0", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{
|
|
RowBox[{"\[ImaginaryI]", "-",
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]]}], "1"},
|
|
{
|
|
RowBox[{" ",
|
|
FractionBox["\[ImaginaryI]",
|
|
RowBox[{"dist", "[", "p", "]"}]]}],
|
|
RowBox[{"-", "\[ImaginaryI]"}]}
|
|
}], ")"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"R1", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{
|
|
RowBox[{"-", "1"}],
|
|
RowBox[{
|
|
RowBox[{"2",
|
|
RowBox[{"dist", "[", "p", "]"}]}], "+", "\[ImaginaryI]"}]},
|
|
{
|
|
RowBox[{" ", "0"}], "1"}
|
|
}], ")"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"A1", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{
|
|
RowBox[{" ", "0"}], "1"}
|
|
}], ")"}], "+",
|
|
RowBox[{"(", GridBox[{
|
|
{"0",
|
|
RowBox[{"2", " ",
|
|
RowBox[{"dist", "[", "p", "]"}]}]},
|
|
{
|
|
RowBox[{" ", "0"}], "0"}
|
|
}], ")"}]}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"A2", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{
|
|
RowBox[{" ", "0"}], "1"}
|
|
}], ")"}], "+",
|
|
RowBox[{"(", GridBox[{
|
|
{
|
|
RowBox[{"\[ImaginaryI]", " ",
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]]}],
|
|
RowBox[{" ",
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]], " "}]},
|
|
{
|
|
RowBox[{" ",
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]]}],
|
|
RowBox[{
|
|
RowBox[{"-", " ", "\[ImaginaryI]"}],
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]]}]}
|
|
}], ")"}]}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"A3", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{
|
|
RowBox[{" ", "0"}], "1"}
|
|
}], ")"}], "+",
|
|
RowBox[{"(", GridBox[{
|
|
{"0",
|
|
RowBox[{" ", "0", " "}]},
|
|
{
|
|
RowBox[{" ",
|
|
FractionBox["1",
|
|
RowBox[{"dist", "[", "p", "]"}]]}], "0"}
|
|
}], ")"}]}], "//", "FullSimplify"}]}]}], "Input",
|
|
CellChangeTimes->{{3.834156210825778*^9, 3.8341562113721457`*^9}, {
|
|
3.83415700486413*^9, 3.834157046332611*^9}, {3.834157129189348*^9,
|
|
3.834157302443672*^9}, {3.8341574792546797`*^9, 3.834157480576037*^9},
|
|
3.834169368091164*^9, {3.834169558280263*^9, 3.83416956060334*^9}, {
|
|
3.834169766291202*^9, 3.8341698002160883`*^9}, {3.834169892220634*^9,
|
|
3.834169898127656*^9}, {3.834169942311818*^9, 3.834169962811569*^9}, {
|
|
3.8341703639045687`*^9, 3.834170449448307*^9}, {3.83417048422433*^9,
|
|
3.834170505533969*^9}, {3.834170562483725*^9, 3.8341706804787188`*^9}, {
|
|
3.834170739562729*^9, 3.8341707419066763`*^9}, {3.834170789901163*^9,
|
|
3.834170890417927*^9}, 3.834171138973914*^9, {3.834171261521393*^9,
|
|
3.834171265578064*^9}, {3.8341713079402647`*^9, 3.834171376398707*^9}, {
|
|
3.834171427851781*^9, 3.834171442439355*^9}, 3.8341736975620813`*^9, {
|
|
3.834173984519866*^9, 3.834173991678269*^9}, {3.834175197096869*^9,
|
|
3.8341752777612057`*^9}},
|
|
CellLabel->"In[8]:=",ExpressionUUID->"3fd9be47-43c2-4a41-b28e-97bac01f2677"],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.834175317398136*^9, 3.834175357523744*^9}, {
|
|
3.834175482858322*^9, 3.834175503455975*^9}, 3.8342277567573357`*^9},
|
|
CellLabel->"In[14]:=",ExpressionUUID->"bba09b94-c8ef-4445-bf47-3079c695ac1e"],
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{"baseSet", "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Join", "[",
|
|
RowBox[{
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"MatrixPower", "[",
|
|
RowBox[{
|
|
RowBox[{"R0", "[", "p", "]"}], ",", "j"}], "]"}], ".",
|
|
RowBox[{"A1", "[", "p", "]"}]}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"j", ",", "1", ",",
|
|
RowBox[{"p", "-", "1"}]}], "}"}]}], "]"}], ",",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"R1", "[", "p", "]"}], ".",
|
|
RowBox[{"MatrixPower", "[",
|
|
RowBox[{
|
|
RowBox[{"R0", "[", "p", "]"}], ",", "j"}], "]"}], ".",
|
|
RowBox[{"A1", "[", "p", "]"}]}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"j", ",", "2", ",",
|
|
RowBox[{"p", "-", "2"}]}], "}"}]}], "]"}]}], "]"}], "//",
|
|
"FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k_"], "[",
|
|
RowBox[{"1", ",", "p_"}], "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"#", "+",
|
|
RowBox[{"k",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"A1", "[", "p", "]"}], "-",
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{"0", "1"}
|
|
}], ")"}]}], ")"}], ".", "#"}]}]}], "&"}], ",",
|
|
RowBox[{"Flatten", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"baseSet", "[", "p", "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A2", "[", "p", "]"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A3", "[", "p", "]"}], "}"}]}], "}"}], ",", "1"}], "]"}]}],
|
|
"]"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k_"], "[",
|
|
RowBox[{"2", ",", "p_"}], "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"#", "+",
|
|
RowBox[{"k",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"A2", "[", "p", "]"}], "-",
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{"0", "1"}
|
|
}], ")"}]}], ")"}], ".", "#"}]}]}], "&"}], ",",
|
|
RowBox[{"Flatten", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"baseSet", "[", "p", "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A1", "[", "p", "]"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A3", "[", "p", "]"}], "}"}]}], "}"}], ",", "1"}], "]"}]}],
|
|
"]"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k_"], "[",
|
|
RowBox[{"3", ",", "p_"}], "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"#", "+",
|
|
RowBox[{"k",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"A3", "[", "p", "]"}], "-",
|
|
RowBox[{"(", GridBox[{
|
|
{"1", "0"},
|
|
{"0", "1"}
|
|
}], ")"}]}], ")"}], ".", "#"}]}]}], "&"}], ",",
|
|
RowBox[{"Flatten", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"baseSet", "[", "p", "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A1", "[", "p", "]"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"A2", "[", "p", "]"}], "}"}]}], "}"}], ",", "1"}], "]"}]}],
|
|
"]"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["fullSet", "k_"], "[", "p_", "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Join", "[",
|
|
RowBox[{
|
|
RowBox[{"baseSet", "[", "p", "]"}], ",",
|
|
RowBox[{"Flatten", "[",
|
|
RowBox[{
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k1"], "[",
|
|
RowBox[{"1", ",", "p"}], "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k1"], "[",
|
|
RowBox[{"2", ",", "p"}], "]"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["baseSetn", "k1"], "[",
|
|
RowBox[{"3", ",", "p"}], "]"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"k1", ",", "1", ",", "k"}], "}"}]}], "]"}], ",", "2"}],
|
|
"]"}]}], "]"}], "//", "FullSimplify"}]}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
SubscriptBox["fullSetRemastered", "k_"], "[",
|
|
RowBox[{"p_", ",", "mat_"}], "]"}], ":=",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"mat", ".", "#", ".",
|
|
RowBox[{"Inverse", "[", "mat", "]"}]}], "&"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["fullSet", "k"], "[", "p", "]"}]}], "]"}], "//",
|
|
"FullSimplify"}]}]}], "Input",
|
|
CellChangeTimes->{{3.8341752790351048`*^9, 3.8341752843372593`*^9}, {
|
|
3.834175326741839*^9, 3.8341753340050297`*^9}, 3.834176355530572*^9, {
|
|
3.8341765101792097`*^9, 3.834176514356441*^9}},
|
|
CellLabel->"In[15]:=",ExpressionUUID->"3430a802-cac7-4d92-b4a8-a5a9d8e92df6"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"Graphics", "[",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"InfiniteLine", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"1", ",", "0"}], "}"}]}], "]"}], ",",
|
|
RowBox[{"InfiniteLine", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "1"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"1", ",", "0"}], "}"}]}], "]"}], ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"CircleThrough", ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"Transpose", ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"Re", "[", "#", "]"}], ",",
|
|
RowBox[{"Im", "[", "#", "]"}]}], "}"}], "&"}], ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"check", ",",
|
|
RowBox[{
|
|
SubscriptBox["fullSet", "10"], "[", "3", "]"}]}], "]"}], ",",
|
|
"1"}], "]"}]}], "]"}]}], "]"}]}], "}"}], "]"}], ",",
|
|
RowBox[{"ComplexListPlot", "[",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"check", "[", "#", "]"}], "&"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["fullSet", "10"], "[", "3", "]"}]}], "]"}], ",",
|
|
RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "}"}],
|
|
"]"}], "\[IndentingNewLine]",
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"Graphics", "[",
|
|
RowBox[{"{",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"CircleThrough", ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"Transpose", ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"Re", "[", "#", "]"}], ",",
|
|
RowBox[{"Im", "[", "#", "]"}]}], "}"}], "&"}], ",",
|
|
RowBox[{"Map", "[",
|
|
RowBox[{"toCirc", ",",
|
|
RowBox[{
|
|
SubscriptBox["fullSetRemastered", "10"], "[",
|
|
RowBox[{"3", ",", "M0"}], "]"}]}], "]"}], ",", "1"}], "]"}]}],
|
|
"]"}]}], "]"}], "}"}], "]"}], ",",
|
|
RowBox[{"ComplexListPlot", "[",
|
|
RowBox[{
|
|
RowBox[{"Map", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"toCirc", "[", "#", "]"}], "&"}], ",",
|
|
RowBox[{
|
|
SubscriptBox["fullSetRemastered", "10"], "[",
|
|
RowBox[{"3", ",", "M0"}], "]"}]}], "]"}], ",",
|
|
RowBox[{"Axes", "\[Rule]", "False"}]}], "]"}]}], "}"}], "]"}]}], "Input",\
|
|
|
|
CellChangeTimes->{{3.8341729281894293`*^9, 3.834172981162465*^9}, {
|
|
3.834173259176256*^9, 3.8341733528674393`*^9}, {3.834173828246067*^9,
|
|
3.834173828316594*^9}, {3.834173899298747*^9, 3.834173913998117*^9}, {
|
|
3.8341739463136578`*^9, 3.834173970103262*^9}, {3.834174996538892*^9,
|
|
3.834174996600255*^9}, {3.834175299281539*^9, 3.834175300652022*^9}, {
|
|
3.83417536429243*^9, 3.834175370196911*^9}, {3.834175402781561*^9,
|
|
3.834175422396413*^9}, {3.83417551081651*^9, 3.834175522293198*^9},
|
|
3.834175595541071*^9, {3.834175729623534*^9, 3.834175833470817*^9}, {
|
|
3.834175885536944*^9, 3.83417602987444*^9}, 3.834176114225438*^9, {
|
|
3.83417640947226*^9, 3.834176429753955*^9}, 3.8341764680917673`*^9, {
|
|
3.834177363200811*^9, 3.8341774003970013`*^9}, {3.834177449359277*^9,
|
|
3.834177479924348*^9}, {3.834178383602901*^9, 3.834178480782626*^9}, {
|
|
3.8341785169360037`*^9, 3.834178524555914*^9}},
|
|
CellLabel->"In[21]:=",ExpressionUUID->"27950318-ac29-44c1-af06-ec3a3f6d9b18"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[{{
|
|
TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}],
|
|
"InfiniteLine"],
|
|
TagBox[ConicHullRegionBox[{0, 1}, {{1, 0}}],
|
|
"InfiniteLine"], {CircleBox[{1.5, 1.}, 0.5], CircleBox[{1.5, 0.}, 0.5],
|
|
CircleBox[{3.5, 1.}, 0.5], CircleBox[{3.5, 0.}, 0.5],
|
|
CircleBox[{2.5, 1.}, 0.5], CircleBox[{2.5, 0.}, 0.5],
|
|
CircleBox[{0.5833333333333334, 1.0000000000000004}, 0.08333333333333326],
|
|
CircleBox[{0.6428571428571435, 0.8571428571428567},
|
|
0.07142857142857122],
|
|
CircleBox[{0.8333333333333333, 0.9999999999999999}, 0.16666666666666674],
|
|
CircleBox[{0.5, 0.6666666666666667}, 0.1666666666666667],
|
|
CircleBox[{0.6428571428571429, 0.14285714285714304},
|
|
0.07142857142857148],
|
|
CircleBox[{0.5833333333333334, -2.197316402903955*^-16},
|
|
0.08333333333333326],
|
|
CircleBox[{0.8333333333333333, 1.7270135938613551*^-16},
|
|
0.16666666666666674],
|
|
CircleBox[{0.5000000000000001, 0.33333333333333326},
|
|
0.16666666666666657], CircleBox[{5.5, 1.}, 0.5],
|
|
CircleBox[{5.5, 0.}, 0.5], CircleBox[{4.5, 1.}, 0.5],
|
|
CircleBox[{4.5, 0.}, 0.5],
|
|
CircleBox[{0.36666666666666714, 1.0000000000000029},
|
|
0.03333333333333288],
|
|
CircleBox[{0.3947368421052655, 0.9473684210526319}, 0.02631578947368239],
|
|
CircleBox[{0.4499999999999994, 1.0000000000000004}, 0.0500000000000006],
|
|
CircleBox[{0.3571428571428567, 0.8571428571428565},
|
|
0.07142857142857119],
|
|
CircleBox[{0.3947368421052635, 0.052631578947368224},
|
|
0.026315789473683855],
|
|
CircleBox[{0.3666666666666667, -3.367676508029658*^-17},
|
|
0.033333333333333326],
|
|
CircleBox[{0.44999999999999996, 2.231548279496565*^-16},
|
|
0.050000000000000044],
|
|
CircleBox[{0.3571428571428571, 0.142857142857143}, 0.07142857142857137],
|
|
CircleBox[{7.5, 1.}, 0.5], CircleBox[{7.5, 0.}, 0.5],
|
|
CircleBox[{6.5, 1.}, 0.5], CircleBox[{6.5, 0.}, 0.5],
|
|
CircleBox[{0.26785714285714424, 1.0000000000000044},
|
|
0.01785714285714146],
|
|
CircleBox[{0.2837837837837878, 0.9729729729729714},
|
|
0.013513513513511932],
|
|
CircleBox[{0.3095238095238091, 1.0000000000000007},
|
|
0.023809523809524225],
|
|
CircleBox[{0.2692307692307696, 0.9230769230769232},
|
|
0.038461538461538346],
|
|
CircleBox[{0.28378378378378355, 0.027027027027026862},
|
|
0.013513513513513572],
|
|
CircleBox[{0.2678571428571429, 2.74652749523022*^-16},
|
|
0.017857142857142794],
|
|
CircleBox[{0.30952380952380953, -7.82159673386005*^-17},
|
|
0.02380952380952378],
|
|
CircleBox[{0.2692307692307693, 0.07692307692307701},
|
|
0.038461538461538367], CircleBox[{9.5, 1.}, 0.5],
|
|
CircleBox[{9.5, 0.}, 0.5], CircleBox[{8.5, 1.}, 0.5],
|
|
CircleBox[{8.5, 0.}, 0.5],
|
|
CircleBox[{0.21111111111111047, 0.9999999999999954},
|
|
0.011111111111111738],
|
|
CircleBox[{0.22131147540983315, 0.9836065573770537},
|
|
0.008196721311474045],
|
|
CircleBox[{0.23611111111111105, 0.9999999999999988},
|
|
0.01388888888888895],
|
|
CircleBox[{0.2142857142857142, 0.9523809523809512}, 0.02380952380952335],
|
|
CircleBox[{0.22131147540983628, 0.016393442622950838},
|
|
0.008196721311475273],
|
|
CircleBox[{0.2111111111111111, -1.2160368733918947*^-16},
|
|
0.0111111111111111],
|
|
CircleBox[{0.23611111111111105, 1.2348661188249707*^-16},
|
|
0.01388888888888895],
|
|
CircleBox[{0.21428571428571436, 0.04761904761904758},
|
|
0.023809523809523763], CircleBox[{11.5, 1.}, 0.5],
|
|
CircleBox[{11.5, 0.}, 0.5], CircleBox[{10.5, 1.}, 0.5],
|
|
CircleBox[{10.5, 0.}, 0.5],
|
|
CircleBox[{0.1742424242424237, 0.9999999999999926},
|
|
0.007575757575758124],
|
|
CircleBox[{0.18131868131869197, 0.9890109890109893}, 0.0054945054944982],
|
|
CircleBox[{0.19090909090909486, 0.999999999999984},
|
|
0.009090909090905153],
|
|
CircleBox[{0.1774193548387107, 0.9677419354838726}, 0.01612903225806417],
|
|
CircleBox[{0.18131868131868115, 0.010989010989010598},
|
|
0.005494505494505307],
|
|
CircleBox[{0.17424242424242417, 3.318785660532233*^-16},
|
|
0.007575757575757652],
|
|
CircleBox[{0.19090909090909103, 1.4942592617795902*^-16},
|
|
0.009090909090908983],
|
|
CircleBox[{0.17741935483870966, 0.03225806451612912},
|
|
0.01612903225806451], CircleBox[{13.5, 1.}, 0.5],
|
|
CircleBox[{13.5, 0.}, 0.5], CircleBox[{12.5, 1.}, 0.5],
|
|
CircleBox[{12.5, 0.}, 0.5],
|
|
CircleBox[{0.1483516483516425, 0.9999999999999959},
|
|
0.005494505494511359],
|
|
CircleBox[{0.15354330708662137, 0.9921259842519724},
|
|
0.003937007874008092],
|
|
CircleBox[{0.16025641025641058, 0.9999999999999863},
|
|
0.006410256410256082],
|
|
CircleBox[{0.15116279069767527, 0.9767441860465116},
|
|
0.011627906976743358],
|
|
CircleBox[{0.15354330708661404, 0.007874015748031343},
|
|
0.003937007874015721],
|
|
CircleBox[{0.14835164835164832, 1.9658055691521194*^-16},
|
|
0.0054945054945055305],
|
|
CircleBox[{0.1602564102564103, 3.627294242601323*^-17},
|
|
0.00641025641025636],
|
|
CircleBox[{0.1511627906976744, 0.023255813953488354},
|
|
0.011627906976744208], CircleBox[{15.5, 1.}, 0.5],
|
|
CircleBox[{15.5, 0.}, 0.5], CircleBox[{14.5, 1.}, 0.5],
|
|
CircleBox[{14.5, 0.}, 0.5],
|
|
CircleBox[{0.12916666666666024, 0.9999999999999823},
|
|
0.004166666666673091],
|
|
CircleBox[{0.13313609467453974, 0.9940828402366833},
|
|
0.0029585798816698385],
|
|
CircleBox[{0.13809523809524502, 0.9999999999999993},
|
|
0.004761904761897834],
|
|
CircleBox[{0.13157894736842146, 0.9824561403508829}, 0.0087719298245626],
|
|
CircleBox[{0.1331360946745563, 0.00591715976331322},
|
|
0.002958579881656443],
|
|
CircleBox[{0.1291666666666667, 8.361945395366858*^-17},
|
|
0.004166666666666624],
|
|
CircleBox[{0.1380952380952381, 1.343681401971717*^-16},
|
|
0.004761904761904745],
|
|
CircleBox[{0.13157894736842105, 0.017543859649122962},
|
|
0.00877192982456138], CircleBox[{17.5, 1.}, 0.5],
|
|
CircleBox[{17.5, 0.}, 0.5], CircleBox[{16.5, 1.}, 0.5],
|
|
CircleBox[{16.5, 0.}, 0.5],
|
|
CircleBox[{0.11437908496731522, 0.9999999999999845},
|
|
0.0032679738562141902],
|
|
CircleBox[{0.11751152073733935, 0.9953917050691351},
|
|
0.002304147465421729],
|
|
CircleBox[{0.12132352941176536, 0.9999999999999714},
|
|
0.0036764705882346427],
|
|
CircleBox[{0.11643835616438199, 0.9863013698630173},
|
|
0.006849315068495558],
|
|
CircleBox[{0.11751152073732714, 0.004608294930875496},
|
|
0.0023041474654377572],
|
|
CircleBox[{0.11437908496732027, 4.6239580768044156*^-17},
|
|
0.0032679738562091387],
|
|
CircleBox[{0.12132352941176465, -4.5649038182712325*^-18},
|
|
0.0036764705882353504],
|
|
CircleBox[{0.11643835616438353, 0.013698630136986271},
|
|
0.006849315068493198], CircleBox[{19.5, 1.}, 0.5],
|
|
CircleBox[{19.5, 0.}, 0.5], CircleBox[{18.5, 1.}, 0.5],
|
|
CircleBox[{18.5, 0.}, 0.5],
|
|
CircleBox[{0.10263157894735775, 0.9999999999999738},
|
|
0.0026315789473790874],
|
|
CircleBox[{0.1051660516605023, 0.9963099630996353},
|
|
0.0018450184501902374],
|
|
CircleBox[{0.10818713450293771, 0.9999999999999902},
|
|
0.0029239766081733953],
|
|
CircleBox[{0.10439560439560398, 0.9890109890109865},
|
|
0.0054945054945053475],
|
|
CircleBox[{0.10516605166051679, 0.003690036900369097},
|
|
0.0018450184501844554],
|
|
CircleBox[{0.1026315789473683, -4.834621468937084*^-17},
|
|
0.0026315789473685403],
|
|
CircleBox[{0.10818713450292407, 1.4395131813568558*^-16},
|
|
0.002923976608187037],
|
|
CircleBox[{0.10439560439560437, 0.010989010989011004},
|
|
0.005494505494505515], CircleBox[{21.5, 1.}, 0.5],
|
|
CircleBox[{21.5, 0.}, 0.5], CircleBox[{20.5, 1.}, 0.5],
|
|
CircleBox[{20.5, 0.}, 0.5],
|
|
CircleBox[{0.09307359307358903, 0.9999999999999785},
|
|
0.002164502164506199],
|
|
CircleBox[{0.09516616314195935, 0.9969788519637448},
|
|
0.0015105740181497848],
|
|
CircleBox[{0.09761904761905504, 1.0000000000000147},
|
|
0.0023809523809449618],
|
|
CircleBox[{0.09459459459459398, 0.990990990990988},
|
|
0.004504504504504521],
|
|
CircleBox[{0.0951661631419938, 0.003021148036253716},
|
|
0.001510574018126939],
|
|
CircleBox[{0.09307359307359304, 2.7699604524221573*^-16},
|
|
0.0021645021645021884],
|
|
CircleBox[{0.09761904761904776, 4.7054197273271716*^-17},
|
|
0.0023809523809522476],
|
|
CircleBox[{0.09459459459459466, 0.009009009009009066},
|
|
0.0045045045045044385]}}, {{{}, {}}, {}, {{}, {
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{2., 1.}, {1.5, 0.5}, {1., 1.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{1.5, 0.5}, {2., 0.}, {1., 0.}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{4., 1.}, {3.5, 0.5}, {3., 1.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{3.5, 0.5}, {4., 0.}, {3., 0.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{2.5, 0.5}, {2., 1.}, {3., 1.}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{2., 0.}, {2.5, 0.5}, {3., 0.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.6666666666666666, 1.}, {0.6153846153846154,
|
|
0.9230769230769231}, {0.5, 1.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.6153846153846154, 0.9230769230769231}, {0.7, 0.9}, {
|
|
0.6000000000000001, 0.8}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.7, 0.9}, {0.6666666666666666, 1.}, {1., 1.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.5, 0.5}, {0.4, 0.8}, {0.6000000000000001, 0.8}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.7, 0.09999999999999998}, {0.6153846153846154,
|
|
0.07692307692307693}, {0.6000000000000001, 0.2}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.6153846153846154, 0.07692307692307693}, {
|
|
0.6666666666666666, 0.}, {0.5, 0.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.6666666666666666, 0.}, {0.7, 0.09999999999999998}, {1.,
|
|
0.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4, 0.2}, {0.5, 0.5}, {0.6000000000000001, 0.2}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{6., 1.}, {5.5, 0.5}, {5., 1.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{5.5, 0.5}, {6., 0.}, {5., 0.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{4.5, 0.5}, {4., 1.}, {5., 1.}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{4., 0.}, {4.5, 0.5}, {5., 0.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4, 1.}, {0.38235294117647056`, 0.9705882352941176}, {
|
|
0.3333333333333333, 1.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.38235294117647056`, 0.9705882352941176}, {
|
|
0.4137931034482759, 0.9655172413793104}, {0.3846153846153846,
|
|
0.9230769230769231}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4137931034482759, 0.9655172413793104}, {0.4, 1.}, {0.5,
|
|
1.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4, 0.8}, {0.30000000000000004`, 0.8999999999999999}, {
|
|
0.3846153846153846, 0.9230769230769231}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4137931034482759, 0.03448275862068967}, {
|
|
0.3823529411764706, 0.02941176470588236}, {0.38461538461538464`,
|
|
0.07692307692307693}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.3823529411764706, 0.02941176470588236}, {0.4, 0.}, {
|
|
0.3333333333333333, 0.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4, 0.}, {0.4137931034482759, 0.03448275862068967}, {0.5,
|
|
0.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.3, 0.1}, {0.4, 0.2}, {0.38461538461538464`,
|
|
0.07692307692307693}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{8., 1.}, {7.5, 0.5}, {7., 1.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{7.5, 0.5}, {8., 0.}, {7., 0.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{6.5, 0.5}, {6., 1.}, {7., 1.}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{6., 0.}, {6.5, 0.5}, {7., 0.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2857142857142857, 1.}, {0.27692307692307694`,
|
|
0.9846153846153847}, {0.25, 1.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.27692307692307694`, 0.9846153846153847}, {
|
|
0.29310344827586204`, 0.9827586206896552}, {0.28, 0.96}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.29310344827586204`, 0.9827586206896552}, {
|
|
0.2857142857142857, 1.}, {0.3333333333333333, 1.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.30000000000000004`, 0.8999999999999999}, {
|
|
0.23529411764705882`, 0.9411764705882353}, {0.28, 0.96}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2931034482758621, 0.017241379310344834`}, {
|
|
0.27692307692307694`, 0.015384615384615385`}, {0.28,
|
|
0.04000000000000001}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.27692307692307694`, 0.015384615384615385`}, {
|
|
0.2857142857142857, 0.}, {0.25, 0.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2857142857142857, 0.}, {0.2931034482758621,
|
|
0.017241379310344834`}, {0.3333333333333333, 0.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.23529411764705882`, 0.058823529411764705`}, {0.3, 0.1}, {
|
|
0.28, 0.04000000000000001}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{10., 1.}, {9.5, 0.5}, {9., 1.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{9.5, 0.5}, {10., 0.}, {9., 0.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{8.5, 0.5}, {8., 1.}, {9., 1.}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{8., 0.}, {8.5, 0.5}, {9., 0.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2222222222222222, 1.}, {0.2169811320754717,
|
|
0.990566037735849}, {0.2, 1.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2169811320754717, 0.990566037735849}, {
|
|
0.22680412371134023`, 0.9896907216494846}, {0.2195121951219512,
|
|
0.975609756097561}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.22680412371134023`, 0.9896907216494846}, {
|
|
0.2222222222222222, 1.}, {0.25, 1.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.23529411764705882`, 0.9411764705882353}, {
|
|
0.19230769230769232`, 0.9615384615384616}, {0.2195121951219512,
|
|
0.975609756097561}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2268041237113402, 0.010309278350515469`}, {
|
|
0.2169811320754717, 0.009433962264150955}, {0.21951219512195122`,
|
|
0.02439024390243902}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2169811320754717, 0.009433962264150955}, {
|
|
0.2222222222222222, 0.}, {0.2, 0.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2222222222222222, 0.}, {0.2268041237113402,
|
|
0.010309278350515469`}, {0.25, 0.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.19230769230769232`, 0.038461538461538464`}, {
|
|
0.23529411764705882`, 0.058823529411764705`}, {0.21951219512195122`,
|
|
0.02439024390243902}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{12., 1.}, {11.5, 0.5}, {11., 1.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{11.5, 0.5}, {12., 0.}, {11., 0.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{10.5, 0.5}, {10., 1.}, {11., 1.}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{10., 0.}, {10.5, 0.5}, {11., 0.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.18181818181818182`, 1.}, {0.178343949044586,
|
|
0.9936305732484076}, {0.16666666666666666`, 1.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.178343949044586, 0.9936305732484076}, {
|
|
0.18493150684931509`, 0.9931506849315067}, {0.18032786885245905`,
|
|
0.9836065573770492}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.18493150684931509`, 0.9931506849315067}, {
|
|
0.18181818181818182`, 1.}, {0.2, 1.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.19230769230769232`, 0.9615384615384616}, {
|
|
0.16216216216216217`, 0.972972972972973}, {0.18032786885245905`,
|
|
0.9836065573770492}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.18493150684931506`, 0.00684931506849315}, {
|
|
0.17834394904458598`, 0.006369426751592355}, {0.180327868852459,
|
|
0.016393442622950824`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.17834394904458598`, 0.006369426751592355}, {
|
|
0.18181818181818182`, 0.}, {0.16666666666666666`, 0.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.18181818181818182`, 0.}, {0.18493150684931506`,
|
|
0.00684931506849315}, {0.2, 0.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.16216216216216217`, 0.02702702702702703}, {
|
|
0.19230769230769232`, 0.038461538461538464`}, {0.180327868852459,
|
|
0.016393442622950824`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{14., 1.}, {13.5, 0.5}, {13., 1.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{13.5, 0.5}, {14., 0.}, {13., 0.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{12.5, 0.5}, {12., 1.}, {13., 1.}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{12., 0.}, {12.5, 0.5}, {13., 0.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.15384615384615385`, 1.}, {0.15137614678899086`,
|
|
0.9954128440366974}, {0.14285714285714285`, 1.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.15137614678899086`, 0.9954128440366974}, {
|
|
0.15609756097560973`, 0.9951219512195122}, {0.1529411764705882,
|
|
0.9882352941176471}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.15609756097560973`, 0.9951219512195122}, {
|
|
0.15384615384615385`, 1.}, {0.16666666666666666`, 1.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.16216216216216217`, 0.972972972972973}, {0.14,
|
|
0.9800000000000001}, {0.1529411764705882, 0.9882352941176471}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.15609756097560976`, 0.004878048780487802}, {
|
|
0.15137614678899083`, 0.0045871559633027525`}, {0.15294117647058825`,
|
|
0.011764705882352941`}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.15137614678899083`, 0.0045871559633027525`}, {
|
|
0.15384615384615385`, 0.}, {0.14285714285714285`, 0.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.15384615384615385`, 0.}, {0.15609756097560976`,
|
|
0.004878048780487802}, {0.16666666666666666`, 0.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.14, 0.02}, {0.16216216216216217`, 0.02702702702702703}, {
|
|
0.15294117647058825`, 0.011764705882352941`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{16., 1.}, {15.5, 0.5}, {15., 1.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{15.5, 0.5}, {16., 0.}, {15., 0.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{14.5, 0.5}, {14., 1.}, {15., 1.}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{14., 0.}, {14.5, 0.5}, {15., 0.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.13333333333333333`, 1.}, {0.13148788927335642`,
|
|
0.9965397923875432}, {0.125, 1.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.13148788927335642`, 0.9965397923875432}, {
|
|
0.13503649635036497`, 0.9963503649635037}, {0.1327433628318584,
|
|
0.9911504424778761}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.13503649635036497`, 0.9963503649635037}, {
|
|
0.13333333333333333`, 1.}, {0.14285714285714285`, 1.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.14, 0.9800000000000001}, {0.12307692307692308`,
|
|
0.9846153846153847}, {0.1327433628318584, 0.9911504424778761}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.13503649635036497`, 0.003649635036496353}, {
|
|
0.1314878892733564, 0.003460207612456752}, {0.1327433628318584,
|
|
0.008849557522123894}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.1314878892733564, 0.003460207612456752}, {
|
|
0.13333333333333333`, 0.}, {0.125, 0.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.13333333333333333`, 0.}, {0.13503649635036497`,
|
|
0.003649635036496353}, {0.14285714285714285`, 0.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.12307692307692308`, 0.015384615384615385`}, {0.14,
|
|
0.02}, {0.1327433628318584, 0.008849557522123894}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{18., 1.}, {17.5, 0.5}, {17., 1.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{17.5, 0.5}, {18., 0.}, {17., 0.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{16.5, 0.5}, {16., 1.}, {17., 1.}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{16., 0.}, {16.5, 0.5}, {17., 0.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.11764705882352941`, 1.}, {0.1162162162162162,
|
|
0.9972972972972973}, {0.1111111111111111, 1.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.1162162162162162, 0.9972972972972973}, {
|
|
0.11898016997167132`, 0.9971671388101983}, {0.11724137931034484`,
|
|
0.993103448275862}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.11898016997167132`, 0.9971671388101983}, {
|
|
0.11764705882352941`, 1.}, {0.125, 1.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.12307692307692308`, 0.9846153846153847}, {
|
|
0.10975609756097561`, 0.9878048780487805}, {0.11724137931034484`,
|
|
0.993103448275862}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.11898016997167138`, 0.002832861189801694}, {
|
|
0.11621621621621622`, 0.002702702702702703}, {0.11724137931034483`,
|
|
0.006896551724137931}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.11621621621621622`, 0.002702702702702703}, {
|
|
0.11764705882352941`, 0.}, {0.1111111111111111, 0.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.11764705882352941`, 0.}, {0.11898016997167138`,
|
|
0.002832861189801694}, {0.125, 0.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.10975609756097561`, 0.012195121951219513`}, {
|
|
0.12307692307692308`, 0.015384615384615385`}, {0.11724137931034483`,
|
|
0.006896551724137931}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{20., 1.}, {19.5, 0.5}, {19., 1.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{19.5, 0.5}, {20., 0.}, {19., 0.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{18.5, 0.5}, {18., 1.}, {19., 1.}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{18., 0.}, {18.5, 0.5}, {19., 0.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10526315789473684`, 1.}, {0.10412147505422992`,
|
|
0.9978308026030369}, {0.1, 1.}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10412147505422992`, 0.9978308026030369}, {
|
|
0.10633484162895923`, 0.997737556561086}, {0.10497237569060769`,
|
|
0.9944751381215469}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10633484162895923`, 0.997737556561086}, {
|
|
0.10526315789473684`, 1.}, {0.1111111111111111, 1.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10975609756097561`, 0.9878048780487805}, {
|
|
0.09900990099009901, 0.9900990099009901}, {0.10497237569060769`,
|
|
0.9944751381215469}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10633484162895927`, 0.002262443438914026}, {
|
|
0.10412147505422994`, 0.00216919739696312}, {0.10497237569060773`,
|
|
0.0055248618784530384`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10412147505422994`, 0.00216919739696312}, {
|
|
0.10526315789473684`, 0.}, {0.1, 0.}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.10526315789473684`, 0.}, {0.10633484162895927`,
|
|
0.002262443438914026}, {0.1111111111111111, 0.}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09900990099009901, 0.009900990099009901}, {
|
|
0.10975609756097561`, 0.012195121951219513`}, {0.10497237569060773`,
|
|
0.0055248618784530384`}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{22., 1.}, {21.5, 0.5}, {21., 1.}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{21.5, 0.5}, {22., 0.}, {21., 0.}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6], PointBox[{{20.5, 0.5}, {20., 1.}, {21., 1.}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{20., 0.}, {20.5, 0.5}, {21., 0.}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.09523809523809523, 1.}, {0.09430604982206409,
|
|
0.998220640569395}, {0.09090909090909091, 1.}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.09430604982206409, 0.998220640569395}, {
|
|
0.09611829944547134, 0.9981515711645101}, {0.09502262443438908,
|
|
0.995475113122172}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09611829944547134, 0.9981515711645101}, {
|
|
0.09523809523809523, 1.}, {0.1, 1.}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09900990099009901, 0.9900990099009901}, {
|
|
0.09016393442622951, 0.9918032786885246}, {0.09502262443438908,
|
|
0.995475113122172}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09611829944547134, 0.0018484288354898293`}, {
|
|
0.09430604982206406, 0.0017793594306049834`}, {0.09502262443438914,
|
|
0.004524886877828052}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09430604982206406, 0.0017793594306049834`}, {
|
|
0.09523809523809523, 0.}, {0.09090909090909091, 0.}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09523809523809523, 0.}, {0.09611829944547134,
|
|
0.0018484288354898293`}, {0.1, 0.}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.09016393442622951, 0.00819672131147541}, {
|
|
0.09900990099009901, 0.009900990099009901}, {0.09502262443438914,
|
|
0.004524886877828052}}]}}, {{}, {}}}, {}, {{}, {{{}, {}, {}, {}}, \
|
|
{}}}}},
|
|
ImageSize->{343.03515625, Automatic}]], "Output",
|
|
CellChangeTimes->{
|
|
3.834172984080517*^9, 3.834173227588378*^9, {3.834173259704145*^9,
|
|
3.834173353396474*^9}, 3.834173828706335*^9, {3.834173895223419*^9,
|
|
3.8341740189145927`*^9}, 3.8341744325579157`*^9, 3.8341744931683693`*^9,
|
|
3.834174632898912*^9, 3.8341747447851048`*^9, 3.834174902135592*^9,
|
|
3.834174997283566*^9, 3.8341753011060543`*^9, 3.834175370849649*^9, {
|
|
3.8341754033097486`*^9, 3.8341754236128807`*^9}, {3.834175492458315*^9,
|
|
3.834175522914528*^9}, 3.834175596537112*^9, 3.8341756872341843`*^9, {
|
|
3.834175730308991*^9, 3.834175834294437*^9}, {3.8341759029634523`*^9,
|
|
3.83417603035765*^9}, 3.8341763004289913`*^9, 3.834176360971574*^9, {
|
|
3.8341764160050507`*^9, 3.8341764318643084`*^9}, {3.834176468640738*^9,
|
|
3.834176497187849*^9}, 3.834177096638218*^9, {3.834177456984709*^9,
|
|
3.83417748607789*^9}, {3.8341783853016233`*^9, 3.834178402071065*^9}, {
|
|
3.834178455454453*^9, 3.834178481710392*^9}, 3.834178525291133*^9,
|
|
3.834227781239526*^9, 3.8342280159324713`*^9, 3.8342280664438457`*^9},
|
|
CellLabel->"Out[21]=",ExpressionUUID->"377b0c59-ade6-4513-97ad-554cb4981911"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[{{
|
|
CircleBox[{7.579494403205856*^-18, 0.08333333333333333},
|
|
0.0833333333333333],
|
|
CircleBox[{1.310679959626921*^-17, -0.08333333333333333},
|
|
0.08333333333333333],
|
|
CircleBox[{0.20000000000000007, 0.030000000000000103},
|
|
0.030000000000000034],
|
|
CircleBox[{0.20000000000000004, -0.029999999999999964},
|
|
0.029999999999999905],
|
|
CircleBox[{0.125, 0.04687500000000001}, 0.046875000000000014],
|
|
CircleBox[{0.125, -0.04687500000000001}, 0.046874999999999965],
|
|
CircleBox[{-0.18181818181818185, 0.1636363636363637},
|
|
0.02727272727272735],
|
|
CircleBox[{-0.18181818181818188, 0.11363636363636372},
|
|
0.022727272727272752],
|
|
CircleBox[{-0.11764705882352941, 0.13235294117647062},
|
|
0.04411764705882356],
|
|
CircleBox[{-0.25000000000000006, 0.062499999999999924},
|
|
0.06250000000000006],
|
|
CircleBox[{-0.18181818181818185, -0.11363636363636379},
|
|
0.022727272727272756],
|
|
CircleBox[{-0.18181818181818185, -0.16363636363636372},
|
|
0.02727272727272735],
|
|
CircleBox[{-0.11764705882352935, -0.1323529411764706},
|
|
0.044117647058823484],
|
|
CircleBox[{-0.25, -0.06249999999999997}, 0.06250000000000006],
|
|
CircleBox[{0.28571428571428575, 0.015306122448979578},
|
|
0.015306122448979576],
|
|
CircleBox[{0.28571428571428575, -0.015306122448979598},
|
|
0.015306122448979578],
|
|
CircleBox[{0.24999999999999994, 0.02083333333333323},
|
|
0.020833333333333297],
|
|
CircleBox[{0.24999999999999994, -0.020833333333333346},
|
|
0.020833333333333315],
|
|
CircleBox[{-0.24999999999999986, 0.20089285714285687},
|
|
0.013392857142856818],
|
|
CircleBox[{-0.2500000000000001, 0.17708333333333362},
|
|
0.010416666666666708],
|
|
CircleBox[{-0.2222222222222222, 0.18518518518518495},
|
|
0.01851851851851839],
|
|
CircleBox[{-0.2800000000000001, 0.15000000000000005},
|
|
0.029999999999999975],
|
|
CircleBox[{-0.2499999999999999, -0.1770833333333335},
|
|
0.010416666666666555],
|
|
CircleBox[{-0.24999999999999964, -0.20089285714285715},
|
|
0.013392857142856788],
|
|
CircleBox[{-0.22222222222222224, -0.18518518518518545},
|
|
0.018518518518518646],
|
|
CircleBox[{-0.2800000000000001, -0.1499999999999999},
|
|
0.030000000000000148],
|
|
CircleBox[{0.3333333333333328, 0.009259259259259012},
|
|
0.009259259259259706],
|
|
CircleBox[{0.33333333333333337, -0.009259259259259672},
|
|
0.009259259259259387],
|
|
CircleBox[{0.3125000000000002, 0.011718750000000064},
|
|
0.011718749999999821],
|
|
CircleBox[{0.3125000000000003, -0.011718750000000026},
|
|
0.011718749999999762],
|
|
CircleBox[{-0.28571428571428503, 0.22222222222222293},
|
|
0.007936507936507723],
|
|
CircleBox[{-0.2857142857142869, 0.20833333333333362},
|
|
0.00595238095238207],
|
|
CircleBox[{-0.2702702702702704, 0.2128378378378383}, 0.01013513513513555],
|
|
CircleBox[{-0.30232558139534843, 0.19186046511627916},
|
|
0.017441860465115852],
|
|
CircleBox[{-0.28571428571428403, -0.20833333333333273},
|
|
0.0059523809523796085],
|
|
CircleBox[{-0.2857142857142855, -0.22222222222222265},
|
|
0.007936507936507992],
|
|
CircleBox[{-0.2702702702702701, -0.21283783783783752},
|
|
0.01013513513513489],
|
|
CircleBox[{-0.30232558139534893, -0.19186046511627905},
|
|
0.017441860465116362],
|
|
CircleBox[{0.3636363636363631, 0.006198347107436713},
|
|
0.006198347107438421],
|
|
CircleBox[{0.3636363636363621, -0.006198347107436691},
|
|
0.006198347107439471],
|
|
CircleBox[{0.3500000000000002, 0.007499999999999892},
|
|
0.007499999999999853],
|
|
CircleBox[{0.3499999999999998, -0.007499999999999973},
|
|
0.007500000000000137],
|
|
CircleBox[{-0.30769230769230915, 0.23601398601398382},
|
|
0.005244755244755272],
|
|
CircleBox[{-0.30769230769230627, 0.22692307692307453},
|
|
0.003846153846153132],
|
|
CircleBox[{-0.29787234042553196, 0.22978723404255438},
|
|
0.006382978723404879],
|
|
CircleBox[{-0.31818181818181857, 0.2159090909090907},
|
|
0.011363636363636706],
|
|
CircleBox[{-0.30769230769230843, -0.22692307692307764},
|
|
0.0038461538461544167],
|
|
CircleBox[{-0.3076923076923092, -0.2360139860139843},
|
|
0.005244755244755619],
|
|
CircleBox[{-0.29787234042553123, -0.2297872340425553},
|
|
0.006382978723404749],
|
|
CircleBox[{-0.31818181818181857, -0.21590909090909055},
|
|
0.011363636363636864],
|
|
CircleBox[{0.3846153846153846, 0.004437869822484056},
|
|
0.0044378698224852246],
|
|
CircleBox[{0.3846153846153848, -0.004437869822485354},
|
|
0.004437869822484992],
|
|
CircleBox[{0.37500000000000006, 0.005208333333332472},
|
|
0.005208333333333206],
|
|
CircleBox[{0.37500000000000067, -0.005208333333331809},
|
|
0.005208333333332546],
|
|
CircleBox[{-0.3225806451612889, 0.24565756823821322},
|
|
0.0037220843672444567],
|
|
CircleBox[{-0.3225806451612897, 0.2392473118279574}, 0.00268817204301006],
|
|
CircleBox[{-0.3157894736842093, 0.24122807017544168},
|
|
0.004385964912281339],
|
|
CircleBox[{-0.32978723404255267, 0.23138297872340446},
|
|
0.007978723404254809],
|
|
CircleBox[{-0.32258064516129104, -0.239247311827959},
|
|
0.002688172043010896],
|
|
CircleBox[{-0.3225806451612895, -0.24565756823821597},
|
|
0.0037220843672462387],
|
|
CircleBox[{-0.3157894736842104, -0.241228070175438},
|
|
0.0043859649122801655],
|
|
CircleBox[{-0.3297872340425532, -0.23138297872340433},
|
|
0.007978723404255404],
|
|
CircleBox[{0.39999999999999913, 0.003333333333333808},
|
|
0.003333333333334195],
|
|
CircleBox[{0.3999999999999983, -0.003333333333333806},
|
|
0.003333333333334972],
|
|
CircleBox[{0.3928571428571437, 0.0038265306122435747},
|
|
0.003826530612243972],
|
|
CircleBox[{0.3928571428571435, -0.0038265306122454044},
|
|
0.003826530612244375],
|
|
CircleBox[{-0.33333333333333465, 0.25277777777777477},
|
|
0.002777777777777293],
|
|
CircleBox[{-0.33333333333333665, 0.24801587301587547},
|
|
0.001984126984129556],
|
|
CircleBox[{-0.32835820895522544, 0.24946695095948557},
|
|
0.0031982942430701443],
|
|
CircleBox[{-0.3385826771653563, 0.24212598425196777},
|
|
0.005905511811025356],
|
|
CircleBox[{-0.33333333333333504, -0.24801587301587608},
|
|
0.001984126984127763],
|
|
CircleBox[{-0.3333333333333335, -0.2527777777777765},
|
|
0.00277777777777706],
|
|
CircleBox[{-0.32835820895522305, -0.24946695095948682},
|
|
0.003198294243068962],
|
|
CircleBox[{-0.3385826771653541, -0.24212598425196924},
|
|
0.005905511811022952],
|
|
CircleBox[{0.41176470588235436, 0.002595155709342105},
|
|
0.002595155709341212],
|
|
CircleBox[{0.4117647058823516, -0.002595155709342964},
|
|
0.00259515570934392],
|
|
CircleBox[{0.4062500000000006, 0.00292968750000026}, 0.00292968749999954],
|
|
CircleBox[{0.40625000000000044, -0.002929687500002181},
|
|
0.0029296874999998777],
|
|
CircleBox[{-0.3414634146341445, 0.25824964131994116},
|
|
0.0021520803443304567],
|
|
CircleBox[{-0.3414634146341469, 0.25457317073170754},
|
|
0.0015243902439029645],
|
|
CircleBox[{-0.3376623376623412, 0.2556818181818181},
|
|
0.0024350649350677713],
|
|
CircleBox[{-0.3454545454545462, 0.24999999999999906},
|
|
0.004545454545455636],
|
|
CircleBox[{-0.3414634146341467, -0.2545731707317099},
|
|
0.0015243902439020073],
|
|
CircleBox[{-0.34146341463414703, -0.25824964131994144},
|
|
0.002152080344332821],
|
|
CircleBox[{-0.33766233766233733, -0.2556818181818156},
|
|
0.0024350649350631222],
|
|
CircleBox[{-0.34545454545454357, -0.2500000000000003},
|
|
0.004545454545453477],
|
|
CircleBox[{0.4210526315789507, 0.0020775623268684874},
|
|
0.002077562326866716],
|
|
CircleBox[{0.42105263157894507, -0.0020775623268656077},
|
|
0.0020775623268718332],
|
|
CircleBox[{0.4166666666666656, 0.002314814814812794},
|
|
0.0023148148148158724],
|
|
CircleBox[{0.4166666666666659, -0.0023148148148186033},
|
|
0.0023148148148157983],
|
|
CircleBox[{-0.347826086956521, 0.26258581235698}, 0.001716247139587834],
|
|
CircleBox[{-0.3478260869565226, 0.25966183574879237},
|
|
0.0012077294685998252],
|
|
CircleBox[{-0.3448275862068974, 0.2605363984674289},
|
|
0.0019157088122589067],
|
|
CircleBox[{-0.3509615384615381, 0.2560096153846162},
|
|
0.003605769230769694],
|
|
CircleBox[{-0.34782608695652434, -0.25966183574879304},
|
|
0.0012077294686013817],
|
|
CircleBox[{-0.347826086956521, -0.2625858123569828},
|
|
0.0017162471395894628],
|
|
CircleBox[{-0.3448275862068975, -0.26053639846743504},
|
|
0.0019157088122625082],
|
|
CircleBox[{-0.35096153846153527, -0.25600961538461703},
|
|
0.003605769230768436],
|
|
CircleBox[{0.42857142857142577, 0.0017006802721099988},
|
|
0.0017006802721116294],
|
|
CircleBox[{0.4285714285714269, -0.001700680272108873},
|
|
0.0017006802721105236],
|
|
CircleBox[{0.4250000000000043, 0.001874999999998213},
|
|
0.001874999999995596],
|
|
CircleBox[{0.4250000000000033, -0.0018749999999993895},
|
|
0.0018749999999966521],
|
|
CircleBox[{-0.35294117647059475, 0.26610644257701965},
|
|
0.0014005602240886987],
|
|
CircleBox[{-0.35294117647058165, 0.26372549019607244},
|
|
0.0009803921568581097],
|
|
CircleBox[{-0.35051546391752386, 0.26443298969072804},
|
|
0.001546391752579406],
|
|
CircleBox[{-0.35546875000000105, 0.26074218749999917},
|
|
0.0029296875000001245],
|
|
CircleBox[{-0.3529411764705844, -0.26372549019607355},
|
|
0.0009803921568603724],
|
|
CircleBox[{-0.35294117647058104, -0.26610644257703947},
|
|
0.0014005602240886345],
|
|
CircleBox[{-0.35051546391752203, -0.26443298969073165},
|
|
0.0015463917525799387],
|
|
CircleBox[{-0.35546875000000067, -0.26074218749999784},
|
|
0.00292968749999893],
|
|
CircleBox[{0.43478260869565427, 0.0014177693761726871},
|
|
0.001417769376179068],
|
|
CircleBox[{0.4347826086956519, -0.001417769376177424},
|
|
0.001417769376181541],
|
|
CircleBox[{0.4318181818181764, 0.0015495867768559686},
|
|
0.0015495867768647736],
|
|
CircleBox[{0.4318181818181764, -0.001549586776855948},
|
|
0.0015495867768647727],
|
|
CircleBox[{-0.3571428571428453, 0.2690217391304463},
|
|
0.0011645962732887841],
|
|
CircleBox[{-0.3571428571428612, 0.2670454545454604},
|
|
0.0008116883116904795],
|
|
CircleBox[{-0.35514018691589094, 0.2676295666949786},
|
|
0.0012744265080690935],
|
|
CircleBox[{-0.3592233009708749, 0.2645631067961155},
|
|
0.002427184466019444],
|
|
CircleBox[{-0.35714285714285926, -0.26704545454544926},
|
|
0.0008116883116918449],
|
|
CircleBox[{-0.3571428571428628, -0.26902173913042854},
|
|
0.0011645962732929748],
|
|
CircleBox[{-0.3551401869158934, -0.26762956669497906},
|
|
0.0012744265080712452],
|
|
CircleBox[{-0.35922330097087574, -0.26456310679611544},
|
|
0.0024271844660199884]}, {{{}, {}}, {}, {{}, {
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.07999999999999999, 0.06000000000000002}, {
|
|
9.25185853854297*^-18, 1.850371707708594*^-17}, {-0.0769230769230769,
|
|
0.11538461538461536`}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{2.3129646346357426`*^-17, 3.0814879110195774`*^-33}, {
|
|
0.08000000000000002, -0.060000000000000026`}, {-0.0769230769230769, \
|
|
-0.11538461538461539`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.22950819672131156`, 0.02459016393442627}, {
|
|
0.20000000000000004`, 0.}, {0.17073170731707316`,
|
|
0.03658536585365854}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2, -1.3877787807814457`*^-17}, {
|
|
0.22950819672131142`, -0.024590163934426243`}, {
|
|
0.1707317073170732, -0.03658536585365854}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.12499999999999999`, -2.0816681711721685`*^-17}, {
|
|
0.07999999999999993, 0.05999999999999997}, {0.17073170731707318`,
|
|
0.03658536585365854}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.08000000000000003, -0.05999999999999998}, {
|
|
0.125, -2.7755575615628914`*^-17}, {
|
|
0.17073170731707313`, -0.03658536585365853}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.15730337078651682`,
|
|
0.15168539325842698`}, {-0.18181818181818182`,
|
|
0.13636363636363638`}, {-0.20588235294117646`,
|
|
0.17647058823529416`}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.1818181818181818, 0.13636363636363635`}, {-0.16,
|
|
0.11999999999999997`}, {-0.20000000000000004`, 0.1}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.16, 0.12}, {-0.15730337078651685`,
|
|
0.15168539325842703`}, {-0.0769230769230769, 0.11538461538461538`}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.25000000000000006`, -1.5265566588595902`*^-16}, \
|
|
{-0.2702702702702704, 0.12162162162162168`}, {-0.20000000000000004`,
|
|
0.1}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.15999999999999998`, -0.12000000000000005`}, \
|
|
{-0.1818181818181818, -0.13636363636363635`}, {-0.1999999999999999, \
|
|
-0.09999999999999998}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.1818181818181818, -0.13636363636363638`}, \
|
|
{-0.15730337078651682`, -0.151685393258427}, {-0.20588235294117646`, \
|
|
-0.17647058823529416`}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.15730337078651682`, -0.15168539325842698`}, \
|
|
{-0.15999999999999995`, -0.12}, {-0.07692307692307691, \
|
|
-0.11538461538461539`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2702702702702703, -0.12162162162162168`}, \
|
|
{-0.25000000000000006`,
|
|
8.326672684688674*^-17}, {-0.19999999999999996`, \
|
|
-0.10000000000000002`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3008849557522124, 0.01327433628318582}, {
|
|
0.2857142857142857, -4.163336342344337*^-17}, {0.2705882352941176,
|
|
0.017647058823529425`}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.2857142857142857, 1.3877787807814457`*^-17}, {
|
|
0.3008849557522124, -0.013274336283185834`}, {
|
|
0.2705882352941176, -0.017647058823529425`}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.25000000000000006`, -4.163336342344337*^-17}, {
|
|
0.22950819672131148`, 0.024590163934426104`}, {0.2705882352941176,
|
|
0.017647058823529425`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.22950819672131148`, -0.024590163934426236`}, {
|
|
0.24999999999999992`, -2.7755575615628914`*^-17}, {
|
|
0.2705882352941176, -0.01764705882352942}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.23834196891191717`,
|
|
0.19430051813471505`}, {-0.24999999999999997`,
|
|
0.1875}, {-0.2615384615384615, 0.20769230769230762`}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.25, 0.1875}, {-0.24,
|
|
0.18000000000000002`}, {-0.2577319587628867, 0.17010309278350516`}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.24000000000000002`, 0.18}, {-0.2383419689119171,
|
|
0.19430051813471502`}, {-0.20588235294117646`,
|
|
0.17647058823529416`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2702702702702703,
|
|
0.12162162162162168`}, {-0.2941176470588235,
|
|
0.1764705882352941}, {-0.2577319587628866, 0.1701030927835051}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.23999999999999994`, -0.17999999999999994`}, \
|
|
{-0.24999999999999997`, -0.18749999999999997`}, {-0.25773195876288657`, \
|
|
-0.17010309278350513`}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.24999999999999997`, -0.1875}, {-0.23834196891191717`, \
|
|
-0.194300518134715}, {-0.2615384615384615, -0.20769230769230768`}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.23834196891191708`, -0.19430051813471502`}, \
|
|
{-0.23999999999999996`, -0.18}, {-0.20588235294117643`, \
|
|
-0.1764705882352942}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.29411764705882354`, -0.176470588235294}, \
|
|
{-0.2702702702702701, -0.12162162162162161`}, {-0.2577319587628865, \
|
|
-0.1701030927835051}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.34254143646408836`, 0.008287292817679565}, {
|
|
0.3333333333333333, 5.551115123125783*^-17}, {0.3241379310344827,
|
|
0.01034482758620691}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.33333333333333337`, 0.}, {
|
|
0.3425414364640885, -0.008287292817679578}, {
|
|
0.3241379310344828, -0.010344827586206917`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3125, -1.3877787807814457`*^-17}, {0.30088495575221225`,
|
|
0.013274336283185771`}, {0.3241379310344828,
|
|
0.010344827586206914`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.30088495575221247`, -0.013274336283185834`}, {
|
|
0.3125, -4.163336342344337*^-17}, {
|
|
0.3241379310344828, -0.01034482758620691}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2789317507418398,
|
|
0.2181008902077151}, {-0.2857142857142857,
|
|
0.21428571428571427`}, {-0.29245283018867924`, 0.2264150943396226}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2857142857142857,
|
|
0.21428571428571436`}, {-0.27999999999999997`,
|
|
0.21000000000000005`}, {-0.28994082840236685`,
|
|
0.20414201183431946`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.28, 0.20999999999999994`}, {-0.2789317507418398,
|
|
0.2181008902077151}, {-0.2615384615384615, 0.20769230769230762`}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.29411764705882354`,
|
|
0.1764705882352941}, {-0.31192660550458706`,
|
|
0.20642201834862373`}, {-0.28994082840236685`, 0.2041420118343194}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2799999999999999, -0.21000000000000008`}, \
|
|
{-0.2857142857142856, -0.21428571428571436`}, {-0.2899408284023668, \
|
|
-0.2041420118343196}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.2857142857142857, -0.21428571428571427`}, \
|
|
{-0.27893175074183973`, -0.21810089020771511`}, {-0.2924528301886793, \
|
|
-0.22641509433962265`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.27893175074183973`, -0.21810089020771514`}, {-0.28, \
|
|
-0.21}, {-0.2615384615384615, -0.20769230769230768`}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.31192660550458706`, -0.20642201834862378`}, \
|
|
{-0.29411764705882343`, -0.1764705882352942}, {-0.2899408284023669, \
|
|
-0.20414201183431957`}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.36981132075471695`, 0.005660377358490551}, {
|
|
0.3636363636363637, 2.7755575615628914`*^-17}, {0.35746606334841635`,
|
|
0.006787330316742085}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.3636363636363637, 0.}, {
|
|
0.369811320754717, -0.005660377358490537}, {
|
|
0.3574660633484163, -0.006787330316742085}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.35, -5.551115123125783*^-17}, {0.3425414364640884,
|
|
0.008287292817679565}, {0.35746606334841635`,
|
|
0.006787330316742071}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3425414364640885, -0.008287292817679565}, {
|
|
0.35, -2.7755575615628914`*^-17}, {
|
|
0.35746606334841624`, -0.006787330316742082}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3032629558541267,
|
|
0.23320537428023033`}, {-0.30769230769230765`,
|
|
0.23076923076923075`}, {-0.31210191082802546`,
|
|
0.23885350318471335`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3076923076923077, 0.23076923076923073`}, {-0.304,
|
|
0.22799999999999992`}, {-0.31034482758620685`, 0.2241379310344827}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.304, 0.22799999999999995`}, {-0.30326295585412677`,
|
|
0.2332053742802304}, {-0.2924528301886793, 0.22641509433962265`}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.31192660550458723`,
|
|
0.20642201834862378`}, {-0.3250000000000002,
|
|
0.22499999999999998`}, {-0.31034482758620696`, 0.2241379310344827}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.30399999999999994`, -0.228}, {-0.3076923076923077, \
|
|
-0.23076923076923078`}, {-0.31034482758620685`, -0.2241379310344827}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3076923076923076, -0.2307692307692307}, \
|
|
{-0.30326295585412666`, -0.23320537428023033`}, {-0.31210191082802546`, \
|
|
-0.23885350318471332`}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.30326295585412677`, -0.23320537428023033`}, {-0.304, \
|
|
-0.22799999999999998`}, {-0.2924528301886793, -0.22641509433962265`}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.325, -0.22499999999999998`}, {-0.3119266055045872, \
|
|
-0.20642201834862386`}, {-0.3103448275862069, -0.22413793103448273`}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.389041095890411, 0.0041095890410958735`}, {
|
|
0.3846153846153847, 0.}, {0.3801916932907348,
|
|
0.004792332268370605}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3846153846153845, 5.551115123125783*^-17}, {
|
|
0.3890410958904109, -0.004109589041095818}, {
|
|
0.3801916932907348, -0.004792332268370593}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.375, 0.}, {0.36981132075471695`, 0.005660377358490579}, {
|
|
0.3801916932907348, 0.004792332268370614}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.369811320754717, -0.005660377358490606}, {0.375, 0.}, {
|
|
0.3801916932907348, -0.004792332268370598}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3194630872483221,
|
|
0.24362416107382542`}, {-0.32258064516129037`,
|
|
0.24193548387096772`}, {-0.3256880733944954, 0.24770642201834858`}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.32258064516129026`,
|
|
0.24193548387096775`}, {-0.31999999999999995`,
|
|
0.23999999999999988`}, {-0.32439678284182316`,
|
|
0.23726541554959782`}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.32, 0.23999999999999996`}, {-0.31946308724832223`,
|
|
0.2436241610738255}, {-0.31210191082802546`, 0.23885350318471338`}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.32499999999999996`, 0.225}, {-0.33484162895927605`,
|
|
0.23755656108597278`}, {-0.32439678284182305`,
|
|
0.23726541554959785`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.31999999999999995`, -0.2399999999999999}, \
|
|
{-0.32258064516129026`, -0.24193548387096775`}, {-0.32439678284182305`, \
|
|
-0.23726541554959787`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3225806451612904, -0.24193548387096786`}, \
|
|
{-0.31946308724832223`, -0.2436241610738256}, {-0.3256880733944954, \
|
|
-0.2477064220183486}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3194630872483222, -0.24362416107382556`}, \
|
|
{-0.31999999999999995`, -0.24000000000000002`}, {-0.3121019108280256, \
|
|
-0.2388535031847134}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33484162895927594`, -0.23755656108597276`}, \
|
|
{-0.3249999999999999, -0.22500000000000003`}, {-0.32439678284182294`, \
|
|
-0.2372654155495979}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4033264033264033, 0.0031185031185031187`}, {
|
|
0.4000000000000001, 0.}, {0.39667458432304037`,
|
|
0.0035629453681710194`}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3999999999999999, 0.}, {
|
|
0.40332640332640324`, -0.003118503118503091}, {
|
|
0.39667458432304037`, -0.0035629453681710384`}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.3928571428571429, 2.7755575615628914`*^-17}, {
|
|
0.389041095890411, 0.0041095890410958735`}, {0.39667458432304037`,
|
|
0.0035629453681710367`}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.389041095890411, -0.004109589041095887}, {
|
|
0.39285714285714296`, -5.551115123125783*^-17}, {
|
|
0.3966745843230405, -0.0035629453681710332`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33102081268582745`,
|
|
0.2512388503468781}, {-0.33333333333333326`,
|
|
0.24999999999999994`}, {-0.33564013840830453`, 0.2543252595155709}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33333333333333326`,
|
|
0.24999999999999994`}, {-0.33142857142857135`,
|
|
0.24857142857142858`}, {-0.33465346534653456`, 0.2465346534653464}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33142857142857135`,
|
|
0.24857142857142855`}, {-0.3310208126858275,
|
|
0.2512388503468781}, {-0.3256880733944954, 0.2477064220183487}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.334841628959276,
|
|
0.23755656108597287`}, {-0.3424657534246575,
|
|
0.2465753424657533}, {-0.33465346534653473`, 0.24653465346534645`}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3314285714285714, -0.2485714285714285}, \
|
|
{-0.33333333333333326`, -0.24999999999999994`}, {-0.3346534653465346, \
|
|
-0.24653465346534656`}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33333333333333337`, -0.25}, {-0.33102081268582767`, \
|
|
-0.25123885034687815`}, {-0.3356401384083046, -0.25432525951557095`}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3310208126858275, -0.25123885034687815`}, \
|
|
{-0.3314285714285714, -0.2485714285714286}, {-0.3256880733944953, \
|
|
-0.24770642201834864`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3424657534246575, -0.2465753424657534}, \
|
|
{-0.33484162895927594`, -0.2375565610859727}, {-0.3346534653465346, \
|
|
-0.24653465346534653`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.41435562805872767`, 0.002446982055464869}, {
|
|
0.4117647058823531, 0.}, {0.40917431192660564`,
|
|
0.002752293577981648}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.41176470588235303`, 0.}, {
|
|
0.41435562805872755`, -0.002446982055464897}, {
|
|
0.4091743119266057, -0.0027522935779816533`}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4062500000000001, 2.7755575615628914`*^-17}, {
|
|
0.40332640332640357`, 0.0031185031185031326`}, {0.40917431192660564`,
|
|
0.0027522935779816446`}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.40332640332640335`, -0.003118503118503202}, {
|
|
0.4062500000000001, 5.551115123125783*^-17}, {
|
|
0.4091743119266057, -0.0027522935779816533`}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3396801218583397,
|
|
0.2570449352627571}, {-0.34146341463414637`,
|
|
0.2560975609756098}, {-0.3432432432432433, 0.25945945945945953`}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.34146341463414637`,
|
|
0.25609756097560976`}, {-0.33999999999999997`,
|
|
0.255}, {-0.34246575342465757`, 0.2534246575342464}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.34, 0.255}, {-0.3396801218583396,
|
|
0.2570449352627571}, {-0.3356401384083046, 0.25432525951557095`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3424657534246578,
|
|
0.24657534246575347`}, {-0.34852546916890065`,
|
|
0.25335120643431636`}, {-0.34246575342465757`, 0.2534246575342465}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3400000000000001, -0.25500000000000006`}, \
|
|
{-0.3414634146341463, -0.25609756097560965`}, {-0.34246575342465757`, \
|
|
-0.2534246575342466}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3414634146341463, -0.25609756097560976`}, \
|
|
{-0.3396801218583397, -0.25704493526275696`}, {-0.3432432432432432, \
|
|
-0.2594594594594594}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.33968012185833973`, -0.257044935262757}, \
|
|
{-0.3400000000000001, -0.25500000000000006`}, {-0.3356401384083046, \
|
|
-0.254325259515571}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3485254691689008, -0.2533512064343163}, \
|
|
{-0.3424657534246575, -0.2465753424657535}, {-0.34246575342465757`, \
|
|
-0.2534246575342466}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.423127463863338, 0.0019710906701708164`}, {
|
|
0.4210526315789474, -1.1102230246251565`*^-16}, {0.4189781021897811,
|
|
0.00218978102189781}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4210526315789473, -5.551115123125783*^-17}, {
|
|
0.42312746386333766`, -0.001971090670170844}, {
|
|
0.4189781021897809, -0.002189781021897815}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4166666666666668, 5.551115123125783*^-17}, {
|
|
0.4143556280587277, 0.0024469820554649108`}, {0.4189781021897811,
|
|
0.0021897810218978048`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4143556280587275, -0.0024469820554649524`}, {
|
|
0.4166666666666666, 2.7755575615628914`*^-17}, {
|
|
0.41897810218978104`, -0.00218978102189781}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3464091732045866,
|
|
0.2616173808086904}, {-0.3478260869565217,
|
|
0.26086956521739124`}, {-0.34924078091106286`, 0.2635574837310195}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3478260869565216,
|
|
0.26086956521739124`}, {-0.3466666666666667,
|
|
0.25999999999999995`}, {-0.3486127864897466, 0.2587454764776839}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3466666666666666, 0.26}, {-0.3464091732045866,
|
|
0.26161738080869035`}, {-0.3432432432432433, 0.2594594594594595}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3485254691689007,
|
|
0.2533512064343163}, {-0.35344827586206884`,
|
|
0.2586206896551725}, {-0.3486127864897466, 0.25874547647768387`}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.34666666666666657`, -0.2599999999999999}, \
|
|
{-0.3478260869565216, -0.26086956521739124`}, {-0.3486127864897466, \
|
|
-0.2587454764776839}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3478260869565217, -0.26086956521739135`}, \
|
|
{-0.3464091732045866, -0.26161738080869035`}, {-0.3492407809110628, \
|
|
-0.26355748373101945`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.34640917320458653`, -0.26161738080869035`}, \
|
|
{-0.3466666666666667, -0.25999999999999995`}, {-0.34324324324324323`, \
|
|
-0.2594594594594595}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35344827586206895`, -0.25862068965517215`}, \
|
|
{-0.3485254691689007, -0.25335120643431625`}, {-0.3486127864897468, \
|
|
-0.258745476477684}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4302702702702702, 0.001621621621621605}, {
|
|
0.42857142857142855`, 0.}, {0.4268727705112961,
|
|
0.0017835909631391204`}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4285714285714286, 0.}, {
|
|
0.43027027027027026`, -0.001621621621621605}, {
|
|
0.4268727705112961, -0.001783590963139122}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4250000000000001, 0.}, {0.4231274638633378,
|
|
0.001971090670170761}, {0.4268727705112961,
|
|
0.001783590963139136}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4231274638633379, -0.0019710906701708164`}, {
|
|
0.4250000000000001, -1.1102230246251565`*^-16}, {
|
|
0.4268727705112961, -0.0017835909631391204`}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3517883390494855,
|
|
0.2653111219990201}, {-0.35294117647058826`,
|
|
0.2647058823529412}, {-0.35409252669039154`, 0.26690391459074736`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3529411764705883, 0.2647058823529412}, {-0.352,
|
|
0.26399999999999996`}, {-0.35357492654260547`,
|
|
0.262977473065622}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35200000000000004`,
|
|
0.26399999999999996`}, {-0.35178833904948553`,
|
|
0.2653111219990201}, {-0.34924078091106286`, 0.2635574837310195}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.353448275862069,
|
|
0.2586206896551724}, {-0.35752212389380544`,
|
|
0.2628318584070796}, {-0.35357492654260536`, 0.2629774730656219}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35200000000000004`, -0.264}, {-0.3529411764705882, \
|
|
-0.26470588235294124`}, {-0.35357492654260525`, -0.2629774730656219}}]},
|
|
{RGBColor[0.560181, 0.691569, 0.194885], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35294117647058826`, -0.26470588235294124`}, \
|
|
{-0.3517883390494855, -0.2653111219990202}, {-0.35409252669039154`, \
|
|
-0.2669039145907474}}]},
|
|
{RGBColor[0.922526, 0.385626, 0.209179], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35178833904948553`, -0.26531112199902}, \
|
|
{-0.3519999999999999, -0.264}, {-0.34924078091106286`, \
|
|
-0.2635574837310195}}]},
|
|
{RGBColor[0.528488, 0.470624, 0.701351], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35752212389380544`, -0.26283185840707973`}, \
|
|
{-0.35344827586206895`, -0.2586206896551724}, {-0.35357492654260536`, \
|
|
-0.2629774730656219}}]},
|
|
{RGBColor[0.772079, 0.431554, 0.102387], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4361990950226245, 0.001357466063348356}, {
|
|
0.43478260869565216`, -8.326672684688674*^-17}, {0.43336623889437315`,
|
|
0.0014807502467916994`}}]},
|
|
{RGBColor[0.363898, 0.618501, 0.782349], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{0.4347826086956522, 0.}, {
|
|
0.4361990950226244, -0.0013574660633484115`}, {
|
|
0.43336623889437315`, -0.0014807502467916924`}}]},
|
|
{RGBColor[1, 0.75, 0], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4318181818181819, 0.}, {0.4302702702702703,
|
|
0.001621621621621619}, {0.43336623889437315`,
|
|
0.0014807502467917063`}}]},
|
|
{RGBColor[0.647624, 0.37816, 0.614037], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{0.4302702702702703, -0.0016216216216216606`}, {
|
|
0.4318181818181819, 0.}, {
|
|
0.43336623889437315`, -0.0014807502467917063`}}]},
|
|
{RGBColor[0.571589, 0.586483, 0.], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3561866125760649,
|
|
0.2683569979716025}, {-0.35714285714285704`,
|
|
0.2678571428571428}, {-0.3580980683506687, 0.2696879643387816}}]},
|
|
{RGBColor[0.915, 0.3325, 0.2125], PointSize[0.007333333333333334],
|
|
AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3571428571428572,
|
|
0.2678571428571428}, {-0.35636363636363644`,
|
|
0.2672727272727272}, {-0.3576642335766424, 0.2664233576642336}}]},
|
|
{RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3563636363636364,
|
|
0.2672727272727272}, {-0.35618661257606493`,
|
|
0.2683569979716024}, {-0.35409252669039143`, 0.2669039145907472}}]},
|
|
{RGBColor[0.9728288904374106, 0.621644452187053, 0.07336199581899142],
|
|
PointSize[0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3575221238938053,
|
|
0.26283185840707973`}, {-0.3609467455621302,
|
|
0.2662721893491124}, {-0.35766423357664234`, 0.26642335766423353`}}]},
|
|
{RGBColor[0.736782672705901, 0.358, 0.5030266573755369], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3563636363636363, -0.2672727272727272}, \
|
|
{-0.35714285714285704`, -0.2678571428571428}, {-0.35766423357664234`, \
|
|
-0.26642335766423364`}}]},
|
|
{RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.35714285714285715`, -0.2678571428571428}, \
|
|
{-0.356186612576065, -0.2683569979716024}, {-0.3580980683506687, \
|
|
-0.2696879643387816}}]},
|
|
{RGBColor[0.368417, 0.506779, 0.709798], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3561866125760648, -0.2683569979716024}, \
|
|
{-0.35636363636363627`, -0.2672727272727272}, {-0.3540925266903915, \
|
|
-0.2669039145907473}}]},
|
|
{RGBColor[0.880722, 0.611041, 0.142051], PointSize[
|
|
0.007333333333333334], AbsoluteThickness[1.6],
|
|
PointBox[{{-0.3609467455621303, -0.26627218934911234`}, \
|
|
{-0.3575221238938053, -0.26283185840707973`}, {-0.35766423357664234`, \
|
|
-0.26642335766423353`}}]}}, {{}, {}}}, {}, {{}, {{{}, {}, {}, {}}, {}}}}},
|
|
ImageSize->{343.03515625, Automatic}]], "Output",
|
|
CellChangeTimes->{
|
|
3.834172984080517*^9, 3.834173227588378*^9, {3.834173259704145*^9,
|
|
3.834173353396474*^9}, 3.834173828706335*^9, {3.834173895223419*^9,
|
|
3.8341740189145927`*^9}, 3.8341744325579157`*^9, 3.8341744931683693`*^9,
|
|
3.834174632898912*^9, 3.8341747447851048`*^9, 3.834174902135592*^9,
|
|
3.834174997283566*^9, 3.8341753011060543`*^9, 3.834175370849649*^9, {
|
|
3.8341754033097486`*^9, 3.8341754236128807`*^9}, {3.834175492458315*^9,
|
|
3.834175522914528*^9}, 3.834175596537112*^9, 3.8341756872341843`*^9, {
|
|
3.834175730308991*^9, 3.834175834294437*^9}, {3.8341759029634523`*^9,
|
|
3.83417603035765*^9}, 3.8341763004289913`*^9, 3.834176360971574*^9, {
|
|
3.8341764160050507`*^9, 3.8341764318643084`*^9}, {3.834176468640738*^9,
|
|
3.834176497187849*^9}, 3.834177096638218*^9, {3.834177456984709*^9,
|
|
3.83417748607789*^9}, {3.8341783853016233`*^9, 3.834178402071065*^9}, {
|
|
3.834178455454453*^9, 3.834178481710392*^9}, 3.834178525291133*^9,
|
|
3.834227781239526*^9, 3.8342280159324713`*^9, 3.834228066716303*^9},
|
|
CellLabel->"Out[22]=",ExpressionUUID->"789f1d96-6ca6-4656-a00e-70a796d9ee0c"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.834176380646549*^9, 3.8341763806593523`*^9}},
|
|
CellLabel->"In[23]:=",ExpressionUUID->"36a43484-6a11-40a5-87a0-4b751c4c9e49"],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.834176379080104*^9, 3.8341763790932703`*^9}},
|
|
CellLabel->"In[24]:=",ExpressionUUID->"018aa653-b0f1-4588-a341-789ac3010fa0"],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.8341761370152197`*^9, 3.834176137647676*^9}, {
|
|
3.83417624945298*^9, 3.834176310761992*^9}, {3.834176383792181*^9,
|
|
3.83417640193452*^9}},
|
|
CellLabel->"In[25]:=",ExpressionUUID->"cc8eb836-ed7d-475d-9dea-f507636aeea6"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"\[Lambda]func", "[",
|
|
RowBox[{"q_", ",", "Nc_", ",", "k0_", ",", "p0_"}], "]"}], ":=",
|
|
RowBox[{"Block", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"generators", ",", "M", ",", "testM", ",", "fancyM", ",", "F", ",",
|
|
"fancyF", ",", "fancyL", ",", "\[CapitalPhi]0", ",", "\[CapitalPhi]1",
|
|
",", "count"}], "}"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"generators", "=",
|
|
RowBox[{
|
|
SubscriptBox["fullSetRemastered", "k0"], "[",
|
|
RowBox[{"p0", ",", "M0"}], "]"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"M", "=",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"With", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"A", "=",
|
|
RowBox[{"N", "[",
|
|
RowBox[{
|
|
"generators", "\[LeftDoubleBracket]", "i",
|
|
"\[RightDoubleBracket]"}], "]"}]}], "}"}], ",",
|
|
"\[IndentingNewLine]", "\[IndentingNewLine]",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"With", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"series", " ", "=",
|
|
RowBox[{"N", "[",
|
|
RowBox[{"Series", "[",
|
|
RowBox[{
|
|
FractionBox[
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "z"}],
|
|
"+",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"1", ",", "2"}], "\[RightDoubleBracket]"}]}],
|
|
")"}], "n"],
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], "z"}],
|
|
"+",
|
|
RowBox[{"A", "\[LeftDoubleBracket]",
|
|
RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}],
|
|
")"}],
|
|
RowBox[{"n", "+", "q"}]]], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"z", ",", "0", ",", "Nc"}], "}"}]}], "]"}],
|
|
"]"}]}], "}"}], ",",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"SeriesCoefficient", "[",
|
|
RowBox[{"series", ",", "s"}], "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"s", ",", "0", ",", "Nc"}], "}"}]}], "]"}]}], "]"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"n", ",", "0", ",", "Nc"}], "}"}]}], "]"}]}],
|
|
"\[IndentingNewLine]", "\[IndentingNewLine]", "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"i", ",", "1", ",",
|
|
RowBox[{"Length", "[", "generators", "]"}]}], "}"}]}], "]"}]}], ";",
|
|
"\[IndentingNewLine]", "\[IndentingNewLine]",
|
|
RowBox[{"fancyM", "=",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{"0", ",",
|
|
RowBox[{"{",
|
|
RowBox[{"i", ",", "0", ",",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}], "2"], "-", "1"}]}], "}"}], ",",
|
|
|
|
RowBox[{"{",
|
|
RowBox[{"j", ",", "0", ",",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}], "2"], "-", "1"}]}], "}"}]}],
|
|
"]"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"For", "[",
|
|
RowBox[{
|
|
RowBox[{"m", "=", "0"}], ",",
|
|
RowBox[{"m", "\[LessEqual]", "Nc"}], ",",
|
|
RowBox[{"m", "++"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"Print", "[", "m", "]"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"For", "[",
|
|
RowBox[{
|
|
RowBox[{"n", "=", "0"}], ",",
|
|
RowBox[{"n", "\[LessEqual]", "Nc"}], ",",
|
|
RowBox[{"n", "++"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"For", "[",
|
|
RowBox[{
|
|
RowBox[{"r", "=", "0"}], ",",
|
|
RowBox[{"r", "\[LessEqual]", "Nc"}], ",",
|
|
RowBox[{"r", "++"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"For", "[",
|
|
RowBox[{
|
|
RowBox[{"s", "=", "0"}], ",",
|
|
RowBox[{"s", "\[LessEqual]", "Nc"}], ",",
|
|
RowBox[{"s", "++"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"If", "[",
|
|
RowBox[{
|
|
RowBox[{"m", "\[LessEqual]", "n"}], ",",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"fancyM", "\[LeftDoubleBracket]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"m", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "n", "+",
|
|
"1"}], ",",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"r", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "s", "+",
|
|
"1"}]}], "\[RightDoubleBracket]"}], "=",
|
|
RowBox[{
|
|
UnderoverscriptBox["\[Sum]",
|
|
RowBox[{"i", "=", "1"}],
|
|
RowBox[{"Length", "[", "generators", "]"}]],
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"M", "\[LeftDoubleBracket]",
|
|
RowBox[{"i", ",",
|
|
RowBox[{"m", "+", "1"}], ",",
|
|
RowBox[{"r", "+", "1"}]}], "\[RightDoubleBracket]"}],
|
|
"\[Conjugate]"}],
|
|
RowBox[{"M", "\[LeftDoubleBracket]",
|
|
RowBox[{"i", ",",
|
|
RowBox[{"n", "+", "1"}], ",",
|
|
RowBox[{"s", "+", "1"}]}],
|
|
"\[RightDoubleBracket]"}]}]}]}], ";"}], ",",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"fancyM", "\[LeftDoubleBracket]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"m", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "n", "+",
|
|
"1"}], ",",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"r", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "s", "+",
|
|
"1"}]}], "\[RightDoubleBracket]"}], "=",
|
|
RowBox[{
|
|
RowBox[{"fancyM", "\[LeftDoubleBracket]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"n", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "m", "+",
|
|
"1"}], ",",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{"s", "*",
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}]}], ")"}], "+", "r", "+",
|
|
"1"}]}], "\[RightDoubleBracket]"}], "\[Conjugate]"}]}],
|
|
";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}], "]"}]}],
|
|
"]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]",
|
|
|
|
RowBox[{"fancyL", "=",
|
|
RowBox[{"Re", "[", "fancyM", "]"}]}], ";", "\[IndentingNewLine]",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"\[CapitalPhi]0", "=",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{"0", ",",
|
|
RowBox[{"{",
|
|
RowBox[{"i", ",", "0", ",",
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"Nc", "+", "1"}], ")"}], "2"], "-", "1"}]}], "}"}]}],
|
|
"]"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
"\[CapitalPhi]0", "\[LeftDoubleBracket]", "1",
|
|
"\[RightDoubleBracket]"}], "=", "1"}], ";", "\[IndentingNewLine]",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"For", "[",
|
|
RowBox[{
|
|
RowBox[{"count", "=", "1"}], ",",
|
|
RowBox[{"count", "\[LessEqual]", "52"}], ",",
|
|
RowBox[{"count", "++"}], ",", "\[IndentingNewLine]",
|
|
RowBox[{"\[CapitalPhi]0", "=",
|
|
RowBox[{"\[CapitalPhi]0", ".", "fancyL"}]}]}], "\[IndentingNewLine]",
|
|
"]"}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"\[CapitalPhi]1", "=",
|
|
RowBox[{"\[CapitalPhi]0", ".", "fancyL"}]}], ";", "\[IndentingNewLine]",
|
|
FractionBox[
|
|
RowBox[{
|
|
"\[CapitalPhi]1", "\[LeftDoubleBracket]", "1",
|
|
"\[RightDoubleBracket]"}],
|
|
RowBox[{
|
|
"\[CapitalPhi]0", "\[LeftDoubleBracket]", "1",
|
|
"\[RightDoubleBracket]"}]]}]}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.834174007625821*^9, 3.8341740125918617`*^9},
|
|
3.834174100587122*^9, {3.83417413617372*^9, 3.834174266582179*^9}, {
|
|
3.834174311217011*^9, 3.834174360167204*^9}, 3.834174475573525*^9, {
|
|
3.83417489543192*^9, 3.834174898846045*^9}, {3.834174952956216*^9,
|
|
3.834174958304064*^9}, {3.834175668031386*^9, 3.834175684062613*^9}, {
|
|
3.8342276076710577`*^9, 3.834227695799903*^9}, {3.834227928724372*^9,
|
|
3.8342279574097643`*^9}},
|
|
CellLabel->"In[26]:=",ExpressionUUID->"ff212400-d0f3-4358-8b76-7df3b91aa75d"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"Timing", "[",
|
|
RowBox[{"secantmethod", "[",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"\[Lambda]func", "[",
|
|
RowBox[{"#", ",", "20", ",", "100", ",", "3"}], "]"}], "&"}], ",", "1",
|
|
",", "1.3", ",", "1.31", ",",
|
|
SuperscriptBox["10",
|
|
RowBox[{"-", "13"}]], ",", "12"}], "]"}], "]"}]], "Input",
|
|
CellChangeTimes->{{3.834174097540978*^9, 3.834174097806774*^9}, {
|
|
3.834174396654336*^9, 3.834174401386774*^9}, {3.8341744605326147`*^9,
|
|
3.8341744719426603`*^9}, {3.834174740376451*^9, 3.834174740565044*^9}, {
|
|
3.83417486448559*^9, 3.8341748753589687`*^9}, {3.83417648802667*^9,
|
|
3.8341764901587677`*^9}, {3.8342277180323267`*^9, 3.8342277252296343`*^9}, {
|
|
3.834227795559033*^9, 3.834227828404303*^9}, {3.834228048906712*^9,
|
|
3.8342280534297037`*^9}},
|
|
CellLabel->"In[27]:=",ExpressionUUID->"281fe7bd-978f-467d-8219-28a787893364"],
|
|
|
|
Cell[BoxData["0"], "Print",
|
|
CellChangeTimes->{3.834228090360202*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[27]:=",ExpressionUUID->"3e33dc86-c786-4204-b61e-b19afd8c27d0"],
|
|
|
|
Cell[BoxData["$Aborted"], "Output",
|
|
CellChangeTimes->{3.834228096531745*^9},
|
|
CellLabel->"Out[27]=",ExpressionUUID->"d3566560-a8e9-490a-97d2-7db5801f3e1e"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[""], "Input",
|
|
CellChangeTimes->{{3.834228054328124*^9,
|
|
3.834228056911347*^9}},ExpressionUUID->"d20757c1-d656-44bb-90fb-\
|
|
0132077777f7"]
|
|
},
|
|
WindowSize->{1440, 855},
|
|
WindowMargins->{{0, Automatic}, {Automatic, 0}},
|
|
TaggingRules->{
|
|
"WelcomeScreenSettings" -> {"FEStarting" -> False}, "TryRealOnly" -> False},
|
|
FrontEndVersion->"12.2 for Mac OS X x86 (64-bit) (December 12, 2020)",
|
|
StyleDefinitions->"Default.nb",
|
|
ExpressionUUID->"b49d0cc0-82c9-4033-bcc9-5698f2c0dac9"
|
|
]
|
|
(* End of Notebook Content *)
|
|
|
|
(* Internal cache information *)
|
|
(*CellTagsOutline
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*CellTagsIndex
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*NotebookFileOutline
|
|
Notebook[{
|
|
Cell[558, 20, 6266, 164, 736, "Input",ExpressionUUID->"ac9676b1-1997-485c-a9c1-54de0dc0e0d8"],
|
|
Cell[6827, 186, 990, 30, 69, "Input",ExpressionUUID->"c7f763e0-500a-4d08-8071-77de1b9a2407"],
|
|
Cell[7820, 218, 3696, 109, 327, "Input",ExpressionUUID->"3fd9be47-43c2-4a41-b28e-97bac01f2677"],
|
|
Cell[11519, 329, 245, 3, 30, "Input",ExpressionUUID->"bba09b94-c8ef-4445-bf47-3079c695ac1e"],
|
|
Cell[11767, 334, 4947, 153, 188, "Input",ExpressionUUID->"3430a802-cac7-4d92-b4a8-a5a9d8e92df6"],
|
|
Cell[CellGroupData[{
|
|
Cell[16739, 491, 3649, 91, 94, "Input",ExpressionUUID->"27950318-ac29-44c1-af06-ec3a3f6d9b18"],
|
|
Cell[20391, 584, 37123, 657, 61, "Output",ExpressionUUID->"377b0c59-ade6-4513-97ad-554cb4981911"],
|
|
Cell[57517, 1243, 46300, 852, 254, "Output",ExpressionUUID->"789f1d96-6ca6-4656-a00e-70a796d9ee0c"]
|
|
}, Open ]],
|
|
Cell[103832, 2098, 173, 2, 30, "Input",ExpressionUUID->"36a43484-6a11-40a5-87a0-4b751c4c9e49"],
|
|
Cell[104008, 2102, 173, 2, 30, "Input",ExpressionUUID->"018aa653-b0f1-4588-a341-789ac3010fa0"],
|
|
Cell[104184, 2106, 269, 4, 30, "Input",ExpressionUUID->"cc8eb836-ed7d-475d-9dea-f507636aeea6"],
|
|
Cell[104456, 2112, 9569, 228, 764, "Input",ExpressionUUID->"ff212400-d0f3-4358-8b76-7df3b91aa75d"],
|
|
Cell[CellGroupData[{
|
|
Cell[114050, 2344, 878, 17, 33, "Input",ExpressionUUID->"281fe7bd-978f-467d-8219-28a787893364"],
|
|
Cell[114931, 2363, 174, 4, 24, "Print",ExpressionUUID->"3e33dc86-c786-4204-b61e-b19afd8c27d0"],
|
|
Cell[115108, 2369, 156, 2, 34, "Output",ExpressionUUID->"d3566560-a8e9-490a-97d2-7db5801f3e1e"]
|
|
}, Open ]],
|
|
Cell[115279, 2374, 152, 3, 30, "Input",ExpressionUUID->"d20757c1-d656-44bb-90fb-0132077777f7"]
|
|
}
|
|
]
|
|
*)
|
|
|