https://github.com/hzenilc/algorithmicdynamicGoL
Tip revision: ed02360ba8a6189685c189ce70a106263a6942b6 authored by hzenilc on 23 January 2018, 02:25:30 UTC
Main source code in Wolfram Language
Main source code in Wolfram Language
Tip revision: ed02360
GameOfLifeGoLComplexity.nb
(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 11.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 2804412, 62549]
NotebookOptionsPosition[ 2793996, 62222]
NotebookOutlinePosition[ 2794380, 62239]
CellTagsIndexPosition[ 2794337, 62236]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["\<\
Algorithmic Dynamics of Emergent Patterns and Colliding Particles in the Game \
of Life\
\>", "Title",
CellChangeTimes->{{3.7063407672169867`*^9, 3.706340791609496*^9}, {
3.725662953557291*^9, 3.725662966533078*^9}}],
Cell["Hector Zenil, Narsis A. Kiani and Jesper Tegn\[EAcute]r", "Text",
CellChangeTimes->{{3.725662946313799*^9, 3.72566297357246*^9}}],
Cell["Supporting sources:", "Text",
CellChangeTimes->{{3.725662935658702*^9, 3.7256629444056883`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Import", "[",
RowBox[{
"\"\<http://wwwhomes.uni-bielefeld.de/achim/freq_top_life.html\>\"", ",",
"\"\<Elements\>\""}], "]"}]], "Input",
CellChangeTimes->{{3.706443325923045*^9, 3.706443328535692*^9}, {
3.70644348082297*^9, 3.706443482820293*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"Data\"\>", ",", "\<\"FullData\"\>", ",", "\<\"Hyperlinks\"\>",
",", "\<\"ImageLinks\"\>", ",", "\<\"Images\"\>", ",", "\<\"Plaintext\"\>",
",", "\<\"Source\"\>", ",", "\<\"Title\"\>", ",", "\<\"XMLObject\"\>"}],
"}"}]], "Output",
CellChangeTimes->{3.706443338874422*^9, 3.7064434839573317`*^9}]
}, Open ]],
Cell["Required data: (update the locations)", "Text",
CellChangeTimes->{{3.725662979767294*^9, 3.725663001763534*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SetDirectory", "[", "\"\</Users/hectorzenil/Desktop/BDM/\>\"",
"]"}]], "Input",
CellChangeTimes->{
3.637739655538965*^9, {3.6527869166034527`*^9, 3.6527869168012533`*^9}, {
3.663788416326832*^9, 3.66378841648246*^9}, {3.706718461371314*^9,
3.70671849384105*^9}}],
Cell[BoxData["\<\"/Users/hectorzenil/Desktop/BDM\"\>"], "Output",
CellChangeTimes->{
3.653641230652542*^9, 3.658544806276919*^9, 3.6594263163077297`*^9, {
3.6637883880392733`*^9, 3.663788416869359*^9}, 3.6669646289150953`*^9,
3.6779990402945766`*^9, 3.6874382058521547`*^9, 3.7061985113750067`*^9,
3.7063731338104553`*^9, {3.706718462153983*^9, 3.7067184941453543`*^9},
3.72081355959378*^9, 3.724077223602998*^9, 3.725388140367326*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"reducedD2", "=",
RowBox[{"<<", "\"\<squares2Dsize1to4.m\>\""}]}], ";"}]], "Input",
CellChangeTimes->{{3.569830247347394*^9, 3.569830304078729*^9}, {
3.569831073992546*^9, 3.569831080840762*^9}, {3.570030976444743*^9,
3.570030976976096*^9}, {3.5700310125358047`*^9, 3.570031013382367*^9},
3.5804830698126574`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"With", "[",
RowBox[{
RowBox[{"{",
RowBox[{"sq", "=",
RowBox[{"reducedD2", "[",
RowBox[{"[", "nS", "]"}], "]"}]}], "}"}], ",",
RowBox[{
RowBox[{"HashSquares", "[",
RowBox[{"sq", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "=",
RowBox[{"sq", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"nS", ",",
RowBox[{"Length", "@", "reducedD2"}]}], "}"}]}], "]"}], ";"}]], "Input",\
CellChangeTimes->{
3.567771083121954*^9, {3.567771358947811*^9, 3.567771363397556*^9},
3.580483075899708*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"BDM", "[",
RowBox[{"array_", ",",
RowBox[{"dim_Integer:", "4"}]}], "]"}], ":=",
RowBox[{"If", "[",
RowBox[{
RowBox[{"TrueQ", "[",
RowBox[{
RowBox[{"Min", "[",
RowBox[{"Dimensions", "[", "array", "]"}], "]"}], "<", "dim"}], "]"}],
",",
RowBox[{"BDM", "[",
RowBox[{"array", ",",
RowBox[{"Min", "[",
RowBox[{"Dimensions", "[", "array", "]"}], "]"}]}], "]"}], ",",
RowBox[{"First", "[",
RowBox[{"Block", "[",
RowBox[{
RowBox[{"{",
RowBox[{"part", "=",
RowBox[{"Partition", "[",
RowBox[{"array", ",",
RowBox[{"{",
RowBox[{"dim", ",", "dim"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"Total", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Log", "[",
RowBox[{"2", ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "+",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"HashSquares", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"Tally", "[",
RowBox[{"Flatten", "[",
RowBox[{"part", ",", "1"}], "]"}], "]"}]}], ")"}]}], "]"}]}],
"]"}], "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.5717731904630985`*^9, 3.571773190719269*^9}, {
3.5719109331189013`*^9, 3.5719109373157067`*^9}, {3.5719112330672483`*^9,
3.571911234296072*^9}, 3.5804830827112465`*^9, {3.5862513724868393`*^9,
3.5862513730929003`*^9}}],
Cell[BoxData[
RowBox[{"Clear", "[", "reducedD2", "]"}]], "Input",
CellChangeTimes->{{3.706373140726893*^9, 3.706373141739045*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"ArrayTrim", "[", "ca_", "]"}], ":=",
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"vals", "=",
RowBox[{"Flatten", "[",
RowBox[{"Position", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"Count", "[",
RowBox[{"#", ",", "1"}], "]"}], ")"}], "&"}], "/@",
RowBox[{"(", "ca", ")"}]}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", "\[NotEqual]", "0"}]}]}], "]"}], "]"}]}], ",",
RowBox[{"restrans", "=",
RowBox[{
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{"Position", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"Count", "[",
RowBox[{"#", ",", "1"}], "]"}], ")"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Transpose", "[", "ca", "]"}], ")"}]}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", "\[NotEqual]", "0"}]}]}], "]"}], "]"}], "&"}], "/@",
RowBox[{"Transpose", "[", "ca", "]"}]}]}]}], "}"}], ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{
RowBox[{"Min", "[", "restrans", "]"}], ";;",
RowBox[{"Max", "[", "restrans", "]"}]}], "]"}], "]"}], "&"}], "/@",
RowBox[{"ca", "[",
RowBox[{"[",
RowBox[{
RowBox[{"Min", "[", "vals", "]"}], ";;",
RowBox[{"Max", "[", "vals", "]"}]}], "]"}], "]"}]}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.706341797655126*^9, 3.706341906026588*^9}, {
3.706341938626203*^9, 3.7063419596388702`*^9}, {3.706342048474416*^9,
3.70634206560635*^9}, {3.706342116493132*^9, 3.706342231560472*^9}, {
3.706342357774104*^9, 3.7063423627184553`*^9}, {3.706342396504177*^9,
3.7063424569098883`*^9}, {3.70634256502993*^9, 3.706342613235764*^9}, {
3.706342647056284*^9, 3.706342738046782*^9}, 3.7063427909603453`*^9, {
3.706342866205308*^9, 3.706342871193213*^9}, {3.706342908770227*^9,
3.70634292720219*^9}, {3.706443831903152*^9, 3.706443843530015*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"CoarseGrain", "[", "array_", "]"}], ":=",
RowBox[{"Flatten", "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"SplitBy", "/@",
RowBox[{"Transpose", "[",
RowBox[{"List", "/@",
RowBox[{"Map", "[",
RowBox[{"Flatten", ",",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"(",
RowBox[{"SplitBy", "/@",
RowBox[{"ArrayTrim", "[",
RowBox[{"ImageData", "[",
RowBox[{"Binarize", "@",
RowBox[{"ColorNegate", "@", "array"}]}], "]"}], "]"}]}],
")"}], ")"}], "/.",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "___"}], "}"}], "\[Rule]", "1"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "___"}], "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ",",
RowBox[{
RowBox[{"{", "0", "}"}], "\[Rule]", "0"}]}], "}"}]}], ")"}],
",",
RowBox[{"{", "1", "}"}]}], "]"}]}], "]"}]}], ")"}], "/.",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "___"}], "}"}], "\[Rule]", "1"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "___"}], "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ",",
RowBox[{
RowBox[{"{", "0", "}"}], "\[Rule]", "0"}]}], "}"}]}],
")"}]}]}]], "Input",
CellChangeTimes->{{3.70644391836382*^9, 3.706443940463314*^9}, {
3.706444010597383*^9, 3.70644401092549*^9}, {3.706444059809388*^9,
3.706444122596661*^9}, {3.7064442809220133`*^9, 3.706444316139544*^9}, {
3.7064443643961897`*^9, 3.706444582085239*^9}, {3.706444691022065*^9,
3.7064448190858297`*^9}, 3.706445062142804*^9, {3.706445153849894*^9,
3.706445159571018*^9}, {3.706450743109727*^9, 3.706450764484704*^9},
3.706450841657352*^9, {3.7064508756907454`*^9, 3.706450896597681*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"GoLmotifs", "=",
RowBox[{"Rest", "[",
RowBox[{"Import", "[",
RowBox[{
"\"\<http://wwwhomes.uni-bielefeld.de/achim/freq_top_life.html\>\"",
",", "\"\<Images\>\""}], "]"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{
3.7064434900613527`*^9, {3.706500939025284*^9, 3.706500947349732*^9},
3.7065010644327383`*^9}],
Cell[BoxData[
RowBox[{"GoLdata", "=",
RowBox[{"Import", "[",
RowBox[{
"\"\<http://wwwhomes.uni-bielefeld.de/achim/freq_top_life.html\>\"", ",",
"\"\<Source\>\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.7065017958344717`*^9, 3.706501799025021*^9},
3.706501829788775*^9, {3.70650187269591*^9, 3.706501903356843*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"bdmGoLmotifs", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "@",
RowBox[{"BDM", "[",
RowBox[{"ArrayTrim", "@",
RowBox[{"ImageData", "[",
RowBox[{"ColorNegate", "@",
RowBox[{"Binarize", "@", "#"}]}], "]"}]}], "]"}]}], "&"}], ",",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"!",
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}]}], ",",
RowBox[{"{", "#", "}"}], ",", "#"}], "]"}], "&"}], "/@",
"GoLmotifs"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706501067824617*^9, 3.706501163863818*^9}, {
3.706501210797122*^9, 3.706501255784707*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"entropyGoLmotifs", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "@",
RowBox[{"Entropy", "[",
RowBox[{"ArrayTrim", "@",
RowBox[{"ImageData", "[",
RowBox[{"ColorNegate", "@",
RowBox[{"Binarize", "@", "#"}]}], "]"}]}], "]"}]}], "&"}], ",",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"!",
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}]}], ",",
RowBox[{"{", "#", "}"}], ",", "#"}], "]"}], "&"}], "/@",
"GoLmotifs"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.7065029624633636`*^9, 3.7065029722991*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"compressGoLmotifs", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ByteCount", "@",
RowBox[{"Compress", "[",
RowBox[{"ArrayTrim", "@",
RowBox[{"ImageData", "[",
RowBox[{"ColorNegate", "@",
RowBox[{"Binarize", "@", "#"}]}], "]"}]}], "]"}]}], "&"}], ",",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"!",
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}]}], ",",
RowBox[{"{", "#", "}"}], ",", "#"}], "]"}], "&"}], "/@",
"GoLmotifs"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706502976241108*^9, 3.706502982916995*^9}}],
Cell["Total number of occurrences:", "Text",
CellChangeTimes->{{3.706503753964961*^9, 3.706503760266138*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Total", "[",
RowBox[{"ToExpression", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "2"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}], "/.",
" ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ")"}]}], "]"}]], "Input",\
CellChangeTimes->{{3.706503738078658*^9, 3.706503739107418*^9},
3.706503791250999*^9}],
Cell[BoxData["50157774850"], "Output",
CellChangeTimes->{3.706503739373947*^9}]
}, Open ]],
Cell["Classification by symmetries:", "Text",
CellChangeTimes->{{3.706503805454146*^9, 3.70650383235089*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"sizes", "=",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "7"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}], "/.",
" ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}]}], ";"}]], "Input",
CellChangeTimes->{{3.7065078353687563`*^9, 3.7065078645100613`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"{",
RowBox[{
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"entropyGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}],
"&"}], "@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], ")"}], "}"}]}],
",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<Shannon Entropy\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}], ",", "\"\< \>\"", ",",
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"entropyGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "/",
RowBox[{"Total", "[",
RowBox[{"ImageDimensions", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}], ",",
RowBox[{"First", "@", "#"}], ",", "#"}], "]"}], "&"}],
"@",
RowBox[{"GoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}]}],
"]"}], "]"}]}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}],
"&"}], "@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], ")"}], "}"}]}],
",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<Normalized Entropy\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "}"}], "]"}]], "Input",
CellChangeTimes->{{3.725467981960881*^9, 3.725467993260707*^9}, {
3.725468040492318*^9, 3.725468041331015*^9}, {3.7254680974547987`*^9,
3.725468099358086*^9}, {3.725468195310083*^9, 3.725468250791586*^9}, {
3.7254685155896263`*^9, 3.72546852278347*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, -0.10215959352725604`}, {
6.467222418737246, 2.1453514640723768`}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{0.7014054506919506, 1.4799909999731922`}, {
1.2985945493080495`, 1.4799909999731922`}, {
1.2985945493080495`, 0.994923632571775}, {0.7014054506919506,
0.994923632571775}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{1.2985945493080495`, 1.0641518941613246`}, {
0.7014054506919505, 1.0641518941613246`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1., 0.994923632571775}, {1.,
0.410116318288409}}, {{1., 1.4799909999731922`}, {1.,
1.870568889415637}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1.1492972746540246`, 0.410116318288409}, {
0.8507027253459752, 0.410116318288409}}, {{
1.1492972746540246`, 1.870568889415637}, {
0.8507027253459752, 1.870568889415637}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"1.870568889415637`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.4799909999731922`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.0641518941613246`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.994923632571775`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.410116318288409`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 1.870568889415637}, {
Style["75%", Bold], 1.4799909999731922`}, {
Style["median", Bold], 1.0641518941613246`}, {
Style["25%", Bold], 0.994923632571775}, {
Style["min", Bold], 0.410116318288409}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{1.7014054506919507`, 1.3474848769969376`}, {
2.2985945493080497`, 1.3474848769969376`}, {
2.2985945493080497`, 0.994923632571775}, {
1.7014054506919507`, 0.994923632571775}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
2., 0.}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{2.2985945493080493`, 1.0459781656993947`}, {
1.7014054506919505`, 1.0459781656993947`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2., 0.994923632571775}, {2.,
0.47413931305783746`}}, {{2., 1.3474848769969376`}, {2.,
1.5935702336159947`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2.1492972746540246`, 0.47413931305783746`}, {
1.8507027253459754`, 0.47413931305783746`}}, {{
2.1492972746540246`, 1.5935702336159947`}, {
1.8507027253459754`, 1.5935702336159947`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"1.5935702336159947`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.3474848769969376`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.0459781656993947`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.994923632571775`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "0.`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 1.5935702336159947`}, {
Style["75%", Bold], 1.3474848769969376`}, {
Style["median", Bold], 1.0459781656993947`}, {
Style["25%", Bold], 0.994923632571775}, {
Style["min", Bold], 0.}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{2.7014054506919507`, 1.7852620436663766`}, {
3.2985945493080497`, 1.7852620436663766`}, {
3.2985945493080497`, 1.6094379124341003`}, {
2.7014054506919507`, 1.6094379124341003`}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {3., 1.0549201679861442`}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{3.2985945493080493`, 1.7351264569629226`}, {
2.7014054506919507`, 1.7351264569629226`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3., 1.6094379124341003`}, {3.,
1.3730039128771998`}}, {{3., 1.7852620436663766`}, {3.,
1.9258328786162595`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3.1492972746540246`, 1.3730039128771998`}, {
2.8507027253459754`, 1.3730039128771998`}}, {{
3.1492972746540246`, 1.9258328786162595`}, {
2.8507027253459754`, 1.9258328786162595`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"1.9258328786162595`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.7852620436663766`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.7351264569629226`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"1.6094379124341003`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"1.0549201679861442`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 1.9258328786162595`}, {
Style["75%", Bold], 1.7852620436663766`}, {
Style["median", Bold], 1.7351264569629226`}, {
Style["25%", Bold], 1.6094379124341003`}, {
Style["min", Bold], 1.0549201679861442`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{3.7014054506919507`, 1.9258328786162595`}, {
4.298594549308049, 1.9258328786162595`}, {4.298594549308049,
1.6772248937130132`}, {3.7014054506919507`,
1.6772248937130132`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{4.298594549308049, 1.7852620436663766`}, {
3.7014054506919507`, 1.7852620436663766`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4., 1.6772248937130132`}, {4.,
1.3730039128771998`}}, {{4., 1.9258328786162595`}, {4.,
2.0431918705451206`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4.149297274654025, 1.3730039128771998`}, {
3.8507027253459754`, 1.3730039128771998`}}, {{
4.149297274654025, 2.0431918705451206`}, {
3.8507027253459754`, 2.0431918705451206`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"2.0431918705451206`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.9258328786162595`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.7852620436663766`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"1.6772248937130132`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"1.3730039128771998`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 2.0431918705451206`}, {
Style["75%", Bold], 1.9258328786162595`}, {
Style["median", Bold], 1.7852620436663766`}, {
Style["25%", Bold], 1.6772248937130132`}, {
Style["min", Bold], 1.3730039128771998`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{4.701405450691951, 1.8310204811135162`}, {
5.298594549308049, 1.8310204811135162`}, {5.298594549308049,
1.595265831302962}, {4.701405450691951,
1.595265831302962}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
5., 1.0042424730540764`}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{5.298594549308049, 1.7601942503146497`}, {
4.701405450691951, 1.7601942503146497`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5., 1.595265831302962}, {5.,
1.3321790402101221`}}, {{5., 1.8310204811135162`}, {5.,
2.0431918705451206`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5.149297274654025, 1.3321790402101221`}, {
4.850702725345975, 1.3321790402101221`}}, {{
5.149297274654025, 2.0431918705451206`}, {4.850702725345975,
2.0431918705451206`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"2.0431918705451206`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.8310204811135162`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.7601942503146497`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"1.595265831302962`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"1.0042424730540764`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 2.0431918705451206`}, {
Style["75%", Bold], 1.8310204811135162`}, {
Style["median", Bold], 1.7601942503146497`}, {
Style["25%", Bold], 1.595265831302962}, {
Style["min", Bold], 1.0042424730540764`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{5.701405450691951, 1.9258328786162595`}, {
6.298594549308049, 1.9258328786162595`}, {6.298594549308049,
1.6786815542048203`}, {5.701405450691951,
1.6786815542048203`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{6.298594549308049, 1.7852620436663766`}, {
5.701405450691951, 1.7852620436663766`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6., 1.6786815542048203`}, {6.,
1.3147757375472728`}}, {{6., 1.9258328786162595`}, {6.,
2.0431918705451206`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6.149297274654025, 1.3147757375472728`}, {
5.850702725345975, 1.3147757375472728`}}, {{
6.149297274654025, 2.0431918705451206`}, {5.850702725345975,
2.0431918705451206`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"2.0431918705451206`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"1.9258328786162595`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"1.7852620436663766`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"1.6786815542048203`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"1.3147757375472728`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 2.0431918705451206`}, {
Style["75%", Bold], 1.9258328786162595`}, {
Style["median", Bold], 1.7852620436663766`}, {
Style["25%", Bold], 1.6786815542048203`}, {
Style["min", Bold], 1.3147757375472728`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {0.42154599576114565`, -0.10215959352725604`}, Frame ->
True, FrameLabel -> {{
FormBox[
StyleBox["\"Shannon Entropy\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}],"\" \"",
GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, -0.0007981218244316878}, {
6.467222418737246, 0.016760558313065443`}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{0.7014054506919506, 0.011562429687290564`}, {
1.2985945493080495`, 0.011562429687290564`}, {
1.2985945493080495`, 0.007772840879466992}, {
0.7014054506919506,
0.007772840879466992}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{1.2985945493080495`, 0.008313686673135348}, {
0.7014054506919505, 0.008313686673135348}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1., 0.007772840879466992}, {1.,
0.0032040337366281953`}}, {{1., 0.011562429687290564`}, {1.,
0.014613819448559663`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1.1492972746540246`, 0.0032040337366281953`}, {
0.8507027253459752, 0.0032040337366281953`}}, {{
1.1492972746540246`, 0.014613819448559663`}, {
0.8507027253459752, 0.014613819448559663`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.014613819448559663`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.011562429687290564`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.008313686673135348`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.007772840879466992`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.0032040337366281953`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.014613819448559663`}, {
Style["75%", Bold], 0.011562429687290564`}, {
Style["median", Bold], 0.008313686673135348}, {
Style["25%", Bold], 0.007772840879466992}, {
Style["min", Bold], 0.0032040337366281953`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{1.7014054506919507`, 0.010527225601538575`}, {
2.2985945493080497`, 0.010527225601538575`}, {
2.2985945493080497`, 0.007772840879466992}, {
1.7014054506919507`, 0.007772840879466992}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
2., 0.}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{2.2985945493080493`, 0.008171704419526521}, {
1.7014054506919505`, 0.008171704419526521}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2., 0.007772840879466992}, {2.,
0.003704213383264355}}, {{2., 0.010527225601538575`}, {2.,
0.012449767450124959`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2.1492972746540246`, 0.003704213383264355}, {
1.8507027253459754`, 0.003704213383264355}}, {{
2.1492972746540246`, 0.012449767450124959`}, {
1.8507027253459754`, 0.012449767450124959`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.012449767450124959`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.010527225601538575`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.008171704419526521`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.007772840879466992`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "0.`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.012449767450124959`}, {
Style["75%", Bold], 0.010527225601538575`}, {
Style["median", Bold], 0.008171704419526521}, {
Style["25%", Bold], 0.007772840879466992}, {
Style["min", Bold], 0.}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{2.7014054506919507`, 0.013947359716143568`}, {
3.2985945493080497`, 0.013947359716143568`}, {
3.2985945493080497`, 0.012573733690891408`}, {
2.7014054506919507`, 0.012573733690891408`}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {3., 0.008241563812391751}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{3.2985945493080493`, 0.013555675445022832`}, {
2.7014054506919507`, 0.013555675445022832`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3., 0.012573733690891408`}, {3.,
0.010726593069353123`}}, {{3., 0.013947359716143568`}, {3.,
0.015045569364189527`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3.1492972746540246`, 0.010726593069353123`}, {
2.8507027253459754`, 0.010726593069353123`}}, {{
3.1492972746540246`, 0.015045569364189527`}, {
2.8507027253459754`, 0.015045569364189527`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.015045569364189527`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.013947359716143568`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.013555675445022832`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.012573733690891408`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.008241563812391751`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.015045569364189527`}, {
Style["75%", Bold], 0.013947359716143568`}, {
Style["median", Bold], 0.013555675445022832`}, {
Style["25%", Bold], 0.012573733690891408`}, {
Style["min", Bold], 0.008241563812391751}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{3.7014054506919507`, 0.015045569364189527`}, {
4.298594549308049, 0.015045569364189527`}, {
4.298594549308049, 0.013103319482132916`}, {
3.7014054506919507`,
0.013103319482132916`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{4.298594549308049, 0.013947359716143568`}, {
3.7014054506919507`, 0.013947359716143568`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4., 0.013103319482132916`}, {4.,
0.010726593069353123`}}, {{4., 0.015045569364189527`}, {4.,
0.015962436488633755`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4.149297274654025, 0.010726593069353123`}, {
3.8507027253459754`, 0.010726593069353123`}}, {{
4.149297274654025, 0.015962436488633755`}, {
3.8507027253459754`, 0.015962436488633755`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.015962436488633755`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.015045569364189527`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.013947359716143568`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.013103319482132916`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.010726593069353123`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.015962436488633755`}, {
Style["75%", Bold], 0.015045569364189527`}, {
Style["median", Bold], 0.013947359716143568`}, {
Style["25%", Bold], 0.013103319482132916`}, {
Style["min", Bold], 0.010726593069353123`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{4.701405450691951, 0.014304847508699346`}, {
5.298594549308049, 0.014304847508699346`}, {
5.298594549308049, 0.01246301430705439}, {4.701405450691951,
0.01246301430705439}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
5., 0.007845644320734972}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{5.298594549308049, 0.0137515175805832}, {
4.701405450691951, 0.0137515175805832}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5., 0.01246301430705439}, {5.,
0.010407648751641579`}}, {{5., 0.014304847508699346`}, {5.,
0.015962436488633755`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5.149297274654025, 0.010407648751641579`}, {
4.850702725345975, 0.010407648751641579`}}, {{
5.149297274654025, 0.015962436488633755`}, {
4.850702725345975, 0.015962436488633755`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.015962436488633755`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.014304847508699346`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.0137515175805832`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.01246301430705439`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.007845644320734972`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.015962436488633755`}, {
Style["75%", Bold], 0.014304847508699346`}, {
Style["median", Bold], 0.0137515175805832}, {
Style["25%", Bold], 0.01246301430705439}, {
Style["min", Bold], 0.007845644320734972}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{5.701405450691951, 0.015045569364189527`}, {
6.298594549308049, 0.015045569364189527`}, {
6.298594549308049, 0.013114699642225159`}, {
5.701405450691951,
0.013114699642225159`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{6.298594549308049, 0.013947359716143568`}, {
5.701405450691951, 0.013947359716143568`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6., 0.013114699642225159`}, {6.,
0.010271685449588069`}}, {{6., 0.015045569364189527`}, {6.,
0.015962436488633755`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6.149297274654025, 0.010271685449588069`}, {
5.850702725345975, 0.010271685449588069`}}, {{
6.149297274654025, 0.015962436488633755`}, {
5.850702725345975, 0.015962436488633755`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.015962436488633755`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.015045569364189527`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.013947359716143568`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.013114699642225159`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.010271685449588069`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.015962436488633755`}, {
Style["75%", Bold], 0.015045569364189527`}, {
Style["median", Bold], 0.013947359716143568`}, {
Style["25%", Bold], 0.013114699642225159`}, {
Style["min", Bold], 0.010271685449588069`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {0.42154599576114565`, -0.0007981218244316878}, Frame ->
True, FrameLabel -> {{
FormBox[
StyleBox["\"Normalized Entropy\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}]},
"RowDefault"]], "Output",
CellChangeTimes->{{3.725468240054611*^9, 3.7254682512931023`*^9},
3.725468523552265*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"{",
RowBox[{
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"compressGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}],
"&"}], "@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], ")"}], "}"}]}],
",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress\>\"", ",", "14", ",", "Black"}], "]"}]}],
"}"}]}]}], "]"}], ",", "\"\< \>\"", ",",
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"compressGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "/",
RowBox[{"Total", "[",
RowBox[{"ImageDimensions", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}], ",",
RowBox[{"First", "@", "#"}], ",", "#"}], "]"}], "&"}],
"@",
RowBox[{"GoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}]}],
"]"}], "]"}]}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}],
"&"}], "@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], ")"}], "}"}]}],
",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<Normalized Compress\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "}"}], "]"}]], "Input",
CellChangeTimes->{{3.725468028643852*^9, 3.7254680317950706`*^9}, {
3.725468106762615*^9, 3.725468112323079*^9}, {3.725468535745768*^9,
3.725468577962371*^9}, {3.725476456061379*^9, 3.725476467742708*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, 81.6}, {6.467222418737246, 398.4}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{0.7014054506919506, 384}, {
1.2985945493080495`, 384}, {1.2985945493080495`, 120}, {
0.7014054506919506, 120}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{1.2985945493080495`, 228}, {
0.7014054506919505, 228}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1., 120}, {1., 104}}, {{1., 384}, {1., 384}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1.1492972746540246`, 104}, {
0.8507027253459752, 104}}, {{1.1492972746540246`, 384}, {
0.8507027253459752, 384}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "384"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "384"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "228"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "120"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "104"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 384}, {
Style["75%", Bold], 384}, {
Style["median", Bold], 228}, {
Style["25%", Bold], 120}, {
Style["min", Bold], 104}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{1.7014054506919507`, 208}, {
2.2985945493080497`, 208}, {2.2985945493080497`, 150}, {
1.7014054506919507`, 150}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{2.2985945493080493`, 176}, {
1.7014054506919505`, 176}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2., 150}, {2., 96}}, {{2., 208}, {2., 240}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2.1492972746540246`, 96}, {
1.8507027253459754`, 96}}, {{2.1492972746540246`, 240}, {
1.8507027253459754`, 240}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "240"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "208"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "176"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "150"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "96"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 240}, {
Style["75%", Bold], 208}, {
Style["median", Bold], 176}, {
Style["25%", Bold], 150}, {
Style["min", Bold], 96}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{2.7014054506919507`, 172}, {
3.2985945493080497`, 172}, {3.2985945493080497`, 128}, {
2.7014054506919507`, 128}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{3.2985945493080493`, 152}, {
2.7014054506919507`, 152}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3., 128}, {3., 120}}, {{3., 172}, {3., 208}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3.1492972746540246`, 120}, {
2.8507027253459754`, 120}}, {{3.1492972746540246`, 208}, {
2.8507027253459754`, 208}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "208"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "172"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "152"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "128"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "120"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 208}, {
Style["75%", Bold], 172}, {
Style["median", Bold], 152}, {
Style["25%", Bold], 128}, {
Style["min", Bold], 120}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{3.7014054506919507`, 176}, {
4.298594549308049, 176}, {4.298594549308049, 144}, {
3.7014054506919507`, 144}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{4.298594549308049, 164}, {
3.7014054506919507`, 164}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4., 144}, {4., 120}}, {{4., 176}, {4., 208}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4.149297274654025, 120}, {
3.8507027253459754`, 120}}, {{4.149297274654025, 208}, {
3.8507027253459754`, 208}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "208"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "176"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "164"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "144"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "120"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 208}, {
Style["75%", Bold], 176}, {
Style["median", Bold], 164}, {
Style["25%", Bold], 144}, {
Style["min", Bold], 120}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{4.701405450691951, 176}, {
5.298594549308049, 176}, {5.298594549308049, 136}, {
4.701405450691951, 136}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{5.298594549308049, 152}, {
4.701405450691951, 152}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5., 136}, {5., 112}}, {{5., 176}, {5., 192}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5.149297274654025, 112}, {
4.850702725345975, 112}}, {{5.149297274654025, 192}, {
4.850702725345975, 192}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "192"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "176"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "152"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "136"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "112"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 192}, {
Style["75%", Bold], 176}, {
Style["median", Bold], 152}, {
Style["25%", Bold], 136}, {
Style["min", Bold], 112}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{5.701405450691951, 176}, {
6.298594549308049, 176}, {6.298594549308049, 152}, {
5.701405450691951, 152}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{6.298594549308049, 176}, {
5.701405450691951, 176}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6., 152}, {6., 136}}, {{6., 176}, {6., 208}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6.149297274654025, 136}, {
5.850702725345975, 136}}, {{6.149297274654025, 208}, {
5.850702725345975, 208}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "208"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "176"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False], "176"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "152"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False], "136"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 208}, {
Style["75%", Bold], 176}, {
Style["median", Bold], 176}, {
Style["25%", Bold], 152}, {
Style["min", Bold], 136}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.42154599576114565`, 81.6},
Frame -> True, FrameLabel -> {{
FormBox[
StyleBox["\"Compress\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}],"\" \"",
GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, 0.6375}, {6.467222418737246, 3.1125}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{0.7014054506919506, 3}, {1.2985945493080495`, 3}, {
1.2985945493080495`,
Rational[15, 16]}, {0.7014054506919506,
Rational[15, 16]}}, {{0.7014054506919506, 3}, {
1.2985945493080495`, 3}, {1.2985945493080495`, 0.9375}, {
0.7014054506919506, 0.9375}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{1.2985945493080495`,
Rational[57, 32]}, {0.7014054506919505,
Rational[57, 32]}}, {{1.2985945493080495`, 1.78125}, {
0.7014054506919505, 1.78125}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{1.,
Rational[15, 16]}, {1.,
Rational[13, 16]}}, {{1., 3}, {1., 3}}}, {{{1., 0.9375}, {
1., 0.8125}}, {{1., 3}, {1., 3}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{1.1492972746540246`,
Rational[13, 16]}, {0.8507027253459752,
Rational[13, 16]}}, {{1.1492972746540246`, 3}, {
0.8507027253459752, 3}}}, {{{1.1492972746540246`,
0.8125}, {0.8507027253459752,
0.8125}}, {{1.1492972746540246`, 3}, {
0.8507027253459752, 3}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False], "3"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False], "3"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["57", "32"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
FractionBox["15", "16"]}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["13", "16"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 3}, {
Style["75%", Bold], 3}, {
Style["median", Bold],
Rational[57, 32]}, {
Style["25%", Bold],
Rational[15, 16]}, {
Style["min", Bold],
Rational[13, 16]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{1.7014054506919507`,
Rational[13, 8]}, {2.2985945493080497`,
Rational[13, 8]}, {2.2985945493080497`,
Rational[75, 64]}, {1.7014054506919507`,
Rational[75, 64]}}, {{1.7014054506919507`, 1.625}, {
2.2985945493080497`, 1.625}, {2.2985945493080497`,
1.171875}, {1.7014054506919507`,
1.171875}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{2.2985945493080493`,
Rational[11, 8]}, {1.7014054506919505`,
Rational[11, 8]}}, {{2.2985945493080493`, 1.375}, {
1.7014054506919505`, 1.375}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{2.,
Rational[75, 64]}, {2.,
Rational[3, 4]}}, {{2.,
Rational[13, 8]}, {2.,
Rational[15, 8]}}}, {{{2., 1.171875}, {2., 0.75}}, {{2.,
1.625}, {2., 1.875}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{2.1492972746540246`,
Rational[3, 4]}, {1.8507027253459754`,
Rational[3, 4]}}, {{2.1492972746540246`,
Rational[15, 8]}, {1.8507027253459754`,
Rational[15, 8]}}}, {{{2.1492972746540246`, 0.75}, {
1.8507027253459754`, 0.75}}, {{2.1492972746540246`,
1.875}, {1.8507027253459754`, 1.875}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
FractionBox["15", "8"]}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
FractionBox["13", "8"]}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["11", "8"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
FractionBox["75", "64"]}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["3", "4"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold],
Rational[15, 8]}, {
Style["75%", Bold],
Rational[13, 8]}, {
Style["median", Bold],
Rational[11, 8]}, {
Style["25%", Bold],
Rational[75, 64]}, {
Style["min", Bold],
Rational[3, 4]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{2.7014054506919507`,
Rational[43, 32]}, {3.2985945493080497`,
Rational[43, 32]}, {3.2985945493080497`, 1}, {
2.7014054506919507`, 1}}, {{2.7014054506919507`,
1.34375}, {3.2985945493080497`, 1.34375}, {
3.2985945493080497`, 1}, {
2.7014054506919507`, 1}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{3.2985945493080493`,
Rational[19, 16]}, {2.7014054506919507`,
Rational[19, 16]}}, {{3.2985945493080493`, 1.1875}, {
2.7014054506919507`, 1.1875}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{3., 1}, {3.,
Rational[15, 16]}}, {{3.,
Rational[43, 32]}, {3.,
Rational[13, 8]}}}, {{{3., 1}, {3., 0.9375}}, {{3.,
1.34375}, {3., 1.625}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{3.1492972746540246`,
Rational[15, 16]}, {2.8507027253459754`,
Rational[15, 16]}}, {{3.1492972746540246`,
Rational[13, 8]}, {2.8507027253459754`,
Rational[13, 8]}}}, {{{3.1492972746540246`, 0.9375}, {
2.8507027253459754`, 0.9375}}, {{3.1492972746540246`,
1.625}, {2.8507027253459754`, 1.625}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
FractionBox["13", "8"]}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
FractionBox["43", "32"]}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["19", "16"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False], "1"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["15", "16"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold],
Rational[13, 8]}, {
Style["75%", Bold],
Rational[43, 32]}, {
Style["median", Bold],
Rational[19, 16]}, {
Style["25%", Bold], 1}, {
Style["min", Bold],
Rational[15, 16]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{3.7014054506919507`,
Rational[11, 8]}, {4.298594549308049,
Rational[11, 8]}, {4.298594549308049,
Rational[9, 8]}, {3.7014054506919507`,
Rational[9, 8]}}, {{3.7014054506919507`, 1.375}, {
4.298594549308049, 1.375}, {4.298594549308049, 1.125}, {
3.7014054506919507`, 1.125}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{4.298594549308049,
Rational[41, 32]}, {3.7014054506919507`,
Rational[41, 32]}}, {{4.298594549308049, 1.28125}, {
3.7014054506919507`, 1.28125}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{4.,
Rational[9, 8]}, {4.,
Rational[15, 16]}}, {{4.,
Rational[11, 8]}, {4.,
Rational[13, 8]}}}, {{{4., 1.125}, {4., 0.9375}}, {{4.,
1.375}, {4., 1.625}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{4.149297274654025,
Rational[15, 16]}, {3.8507027253459754`,
Rational[15, 16]}}, {{4.149297274654025,
Rational[13, 8]}, {3.8507027253459754`,
Rational[13, 8]}}}, {{{4.149297274654025, 0.9375}, {
3.8507027253459754`, 0.9375}}, {{4.149297274654025,
1.625}, {3.8507027253459754`, 1.625}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
FractionBox["13", "8"]}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
FractionBox["11", "8"]}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["41", "32"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
FractionBox["9", "8"]}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["15", "16"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold],
Rational[13, 8]}, {
Style["75%", Bold],
Rational[11, 8]}, {
Style["median", Bold],
Rational[41, 32]}, {
Style["25%", Bold],
Rational[9, 8]}, {
Style["min", Bold],
Rational[15, 16]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{4.701405450691951,
Rational[11, 8]}, {5.298594549308049,
Rational[11, 8]}, {5.298594549308049,
Rational[17, 16]}, {4.701405450691951,
Rational[17, 16]}}, {{4.701405450691951, 1.375}, {
5.298594549308049, 1.375}, {5.298594549308049, 1.0625}, {
4.701405450691951, 1.0625}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{5.298594549308049,
Rational[19, 16]}, {4.701405450691951,
Rational[19, 16]}}, {{5.298594549308049, 1.1875}, {
4.701405450691951, 1.1875}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{5.,
Rational[17, 16]}, {5.,
Rational[7, 8]}}, {{5.,
Rational[11, 8]}, {5.,
Rational[3, 2]}}}, {{{5., 1.0625}, {5., 0.875}}, {{5.,
1.375}, {5., 1.5}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{5.149297274654025,
Rational[7, 8]}, {4.850702725345975,
Rational[7, 8]}}, {{5.149297274654025,
Rational[3, 2]}, {4.850702725345975,
Rational[3, 2]}}}, {{{5.149297274654025, 0.875}, {
4.850702725345975, 0.875}}, {{5.149297274654025, 1.5}, {
4.850702725345975, 1.5}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
FractionBox["3", "2"]}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
FractionBox["11", "8"]}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["19", "16"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
FractionBox["17", "16"]}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["7", "8"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold],
Rational[3, 2]}, {
Style["75%", Bold],
Rational[11, 8]}, {
Style["median", Bold],
Rational[19, 16]}, {
Style["25%", Bold],
Rational[17, 16]}, {
Style["min", Bold],
Rational[7, 8]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[
NCache[{{5.701405450691951,
Rational[11, 8]}, {6.298594549308049,
Rational[11, 8]}, {6.298594549308049,
Rational[19, 16]}, {5.701405450691951,
Rational[19, 16]}}, {{5.701405450691951, 1.375}, {
6.298594549308049, 1.375}, {6.298594549308049, 1.1875}, {
5.701405450691951, 1.1875}}]], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[
NCache[{{6.298594549308049,
Rational[11, 8]}, {5.701405450691951,
Rational[11, 8]}}, {{6.298594549308049, 1.375}, {
5.701405450691951, 1.375}}]]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{6.,
Rational[19, 16]}, {6.,
Rational[17, 16]}}, {{6.,
Rational[11, 8]}, {6.,
Rational[13, 8]}}}, {{{6., 1.1875}, {6., 1.0625}}, {{6.,
1.375}, {6., 1.625}}}]]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[
NCache[{{{6.149297274654025,
Rational[17, 16]}, {5.850702725345975,
Rational[17, 16]}}, {{6.149297274654025,
Rational[13, 8]}, {5.850702725345975,
Rational[13, 8]}}}, {{{6.149297274654025, 1.0625}, {
5.850702725345975, 1.0625}}, {{6.149297274654025, 1.625}, {
5.850702725345975, 1.625}}}]]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
FractionBox["13", "8"]}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
FractionBox["11", "8"]}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
FractionBox["11", "8"]}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
FractionBox["19", "16"]}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
FractionBox["17", "16"]}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold],
Rational[13, 8]}, {
Style["75%", Bold],
Rational[11, 8]}, {
Style["median", Bold],
Rational[11, 8]}, {
Style["25%", Bold],
Rational[19, 16]}, {
Style["min", Bold],
Rational[17, 16]}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.42154599576114565`, 0.6375},
Frame -> True, FrameLabel -> {{
FormBox[
StyleBox["\"Normalized Compress\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}]},
"RowDefault"]], "Output",
CellChangeTimes->{
3.725468032175461*^9, 3.725468112851492*^9, {3.725468558078178*^9,
3.7254685784126463`*^9}, {3.725476460639176*^9, 3.725476468368435*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "@",
RowBox[{"{",
RowBox[{
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"bdmGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], "}"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "14", ",", "Black"}], "]"}]}], "}"}]}],
",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"52", ",", "All"}], "}"}]}]}], "]"}], ",", "\"\< \>\"", ",",
RowBox[{"BoxWhiskerChart", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Map", "[",
RowBox[{"First", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"bdmGoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "/",
RowBox[{"Total", "[",
RowBox[{"ImageDimensions", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}], ",",
RowBox[{"First", "@", "#"}], ",", "#"}], "]"}], "&"}],
"@",
RowBox[{"GoLmotifs", "[",
RowBox[{"[",
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}]}],
"]"}], "]"}]}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",", "Last"}],
"]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ")"}], ",", "\"\<Outliers\>\"",
",",
RowBox[{"ChartStyle", "\[Rule]", "10"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Detailed\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]",
RowBox[{"1", "/", "3"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"ChartLabels", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "20", ",", "Black", ",", "Bold"}], "]"}], "&"}],
"/@",
RowBox[{"Flatten", "[",
RowBox[{"Union", "/@",
RowBox[{"Map", "[",
RowBox[{"Last", ",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "3", ",",
RowBox[{"-", "1"}], ",", "5", ",",
RowBox[{"-", "2"}], ",", "4"}], "}"}], "]"}], "]"}], "&"}],
"@",
RowBox[{"GatherBy", "[",
RowBox[{
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "6"}], "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}],
"/.", " ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ",",
"Last"}], "]"}], ",", "Last"}], "]"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}], "}"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<\>\"", ",",
RowBox[{"Style", "[",
RowBox[{"\"\<Normalized BDM\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{".40", ",", "All"}], "}"}]}]}], "]"}]}], "}"}]}]], "Input",
CellChangeTimes->{
3.725467540927288*^9, {3.725467880388558*^9, 3.72546789805623*^9},
3.725468004557253*^9, {3.72546806914328*^9, 3.7254680774970818`*^9}, {
3.725468147360681*^9, 3.725468183535946*^9}, {3.7254683098110332`*^9,
3.7254684158335447`*^9}, {3.7254684902299833`*^9, 3.725468496589088*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, 28.198279051600757`}, {6.467222418737246,
66.5630571646639}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{0.7014054506919506, 64.27076698937407}, {
1.2985945493080495`, 64.27076698937407}, {
1.2985945493080495`, 53.94883889448671}, {0.7014054506919506,
53.94883889448671}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
1., 29.942132602194537`}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{1.2985945493080495`, 60.072209193733286`}, {
0.7014054506919505, 60.072209193733286`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1., 53.94883889448671}, {1.,
53.94883889448671}}, {{1., 64.27076698937407}, {1.,
64.81920361407012}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1.1492972746540246`, 53.94883889448671}, {
0.8507027253459752, 53.94883889448671}}, {{
1.1492972746540246`, 64.81920361407012}, {
0.8507027253459752, 64.81920361407012}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"64.81920361407012`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"64.27076698937407`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"60.072209193733286`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"53.94883889448671`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"29.942132602194537`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 64.81920361407012}, {
Style["75%", Bold], 64.27076698937407}, {
Style["median", Bold], 60.072209193733286`}, {
Style["25%", Bold], 53.94883889448671}, {
Style["min", Bold], 29.942132602194537`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{1.7014054506919507`, 60.63103381356671}, {
2.2985945493080497`, 60.63103381356671}, {
2.2985945493080497`, 57.98604715088642}, {
1.7014054506919507`, 57.98604715088642}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {2., 46.83071492110369}],
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {2., 46.83071492110369}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{2.2985945493080493`, 59.656198026567594`}, {
1.7014054506919505`, 59.656198026567594`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2., 57.98604715088642}, {2.,
55.11876389592902}}, {{2., 60.63103381356671}, {2.,
61.53192166198964}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2.1492972746540246`, 55.11876389592902}, {
1.8507027253459754`, 55.11876389592902}}, {{
2.1492972746540246`, 61.53192166198964}, {
1.8507027253459754`, 61.53192166198964}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"61.53192166198964`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"60.63103381356671`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"59.656198026567594`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"57.98604715088642`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"46.83071492110369`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 61.53192166198964}, {
Style["75%", Bold], 60.63103381356671}, {
Style["median", Bold], 59.656198026567594`}, {
Style["25%", Bold], 57.98604715088642}, {
Style["min", Bold], 46.83071492110369}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{2.7014054506919507`, 58.75875600629945}, {
3.2985945493080497`, 58.75875600629945}, {
3.2985945493080497`, 56.270766989374074`}, {
2.7014054506919507`,
56.270766989374074`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{3.2985945493080493`, 57.85572949009523}, {
2.7014054506919507`, 57.85572949009523}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3., 56.270766989374074`}, {3.,
53.94883889448671}}, {{3., 58.75875600629945}, {3.,
60.11876389592902}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3.1492972746540246`, 53.94883889448671}, {
2.8507027253459754`, 53.94883889448671}}, {{
3.1492972746540246`, 60.11876389592902}, {
2.8507027253459754`, 60.11876389592902}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"60.11876389592902`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"58.75875600629945`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"57.85572949009523`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"56.270766989374074`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"53.94883889448671`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 60.11876389592902}, {
Style["75%", Bold], 58.75875600629945}, {
Style["median", Bold], 57.85572949009523}, {
Style["25%", Bold], 56.270766989374074`}, {
Style["min", Bold], 53.94883889448671}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{3.7014054506919507`, 59.14821074045581}, {
4.298594549308049, 59.14821074045581}, {4.298594549308049,
56.90228419229097}, {3.7014054506919507`,
56.90228419229097}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{4.298594549308049, 58.259406951124035`}, {
3.7014054506919507`, 58.259406951124035`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4., 56.90228419229097}, {4.,
53.533801395207874`}}, {{4., 59.14821074045581}, {4.,
60.11876389592902}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4.149297274654025, 53.533801395207874`}, {
3.8507027253459754`, 53.533801395207874`}}, {{
4.149297274654025, 60.11876389592902}, {3.8507027253459754`,
60.11876389592902}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"60.11876389592902`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"59.14821074045581`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"58.259406951124035`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"56.90228419229097`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"53.533801395207874`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 60.11876389592902}, {
Style["75%", Bold], 59.14821074045581}, {
Style["median", Bold], 58.259406951124035`}, {
Style["25%", Bold], 56.90228419229097}, {
Style["min", Bold], 53.533801395207874`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{4.701405450691951, 59.093416071348386`}, {
5.298594549308049, 59.093416071348386`}, {5.298594549308049,
56.194765442651544`}, {4.701405450691951,
56.194765442651544`}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {5., 31.527095102915695`}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{5.298594549308049, 57.73019860801137}, {
4.701405450691951, 57.73019860801137}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5., 56.194765442651544`}, {5.,
52.94883889448671}}, {{5., 59.093416071348386`}, {5.,
60.05212670289873}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5.149297274654025, 52.94883889448671}, {
4.850702725345975, 52.94883889448671}}, {{5.149297274654025,
60.05212670289873}, {4.850702725345975,
60.05212670289873}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"60.05212670289873`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"59.093416071348386`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"57.73019860801137`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"56.194765442651544`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"31.527095102915695`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 60.05212670289873}, {
Style["75%", Bold], 59.093416071348386`}, {
Style["median", Bold], 57.73019860801137}, {
Style["25%", Bold], 56.194765442651544`}, {
Style["min", Bold], 31.527095102915695`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{5.701405450691951, 59.1087102312651}, {
6.298594549308049, 59.1087102312651}, {6.298594549308049,
57.85572949009523}, {5.701405450691951,
57.85572949009523}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
6., 55.94883889448671}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{6.298594549308049, 58.578195514566325`}, {
5.701405450691951, 58.578195514566325`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6., 57.85572949009523}, {6.,
56.270766989374074`}}, {{6., 59.1087102312651}, {6.,
59.736741453878146`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6.149297274654025, 56.270766989374074`}, {
5.850702725345975, 56.270766989374074`}}, {{
6.149297274654025, 59.736741453878146`}, {5.850702725345975,
59.736741453878146`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"59.736741453878146`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"59.1087102312651`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"58.578195514566325`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"57.85572949009523`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"55.94883889448671`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 59.736741453878146`}, {
Style["75%", Bold], 59.1087102312651}, {
Style["median", Bold], 58.578195514566325`}, {
Style["25%", Bold], 57.85572949009523}, {
Style["min", Bold], 55.94883889448671}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {0.42154599576114565`, 28.198279051600757`}, Frame -> True,
FrameLabel -> {{
FormBox[
StyleBox["\"BDM\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRange -> {52, All},
PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}],"\" \"",
GraphicsBox[{{
Opacity[0],
PointBox[{{0.5327775812627538, 0.2202990550906309}, {6.467222418737246,
0.5200238840989367}}]}, {
CapForm[None],
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{}, {
Directive[
RGBColor[0.982864, 0.7431472, 0.3262672]], {{
Directive[
RGBColor[0.6980392156862745, 0.01568627450980392, 0.]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{0.7014054506919506, 0.5021153671044849}, {
1.2985945493080495`, 0.5021153671044849}, {
1.2985945493080495`, 0.42147530386317744`}, {
0.7014054506919506, 0.42147530386317744`}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
1., 0.23392291095464482`}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{1.2985945493080495`, 0.4693141343260413}, {
0.7014054506919505, 0.4693141343260413}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1., 0.42147530386317744`}, {1.,
0.42147530386317744`}}, {{1., 0.5021153671044849}, {1.,
0.5064000282349228}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{1.1492972746540246`, 0.42147530386317744`}, {
0.8507027253459752, 0.42147530386317744`}}, {{
1.1492972746540246`, 0.5064000282349228}, {
0.8507027253459752, 0.5064000282349228}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.5064000282349228`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.5021153671044849`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.4693141343260413`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.42147530386317744`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.23392291095464482`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.5064000282349228}, {
Style["75%", Bold], 0.5021153671044849}, {
Style["median", Bold], 0.4693141343260413}, {
Style["25%", Bold], 0.42147530386317744`}, {
Style["min", Bold], 0.23392291095464482`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9215686274509803, 0.49411764705882355`, 0.43137254901960786`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{1.7014054506919507`, 0.4736799516684899}, {
2.2985945493080497`, 0.4736799516684899}, {
2.2985945493080497`, 0.45301599336630016`}, {
1.7014054506919507`, 0.45301599336630016`}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {2., 0.3658649603211226}],
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {2., 0.3658649603211226}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{2.2985945493080493`, 0.46606404708255933`}, {
1.7014054506919505`, 0.46606404708255933`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2., 0.45301599336630016`}, {2.,
0.4306153429369455}}, {{2., 0.4736799516684899}, {2.,
0.4807181379842941}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{2.1492972746540246`, 0.4306153429369455}, {
1.8507027253459754`, 0.4306153429369455}}, {{
2.1492972746540246`, 0.4807181379842941}, {
1.8507027253459754`, 0.4807181379842941}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.4807181379842941`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.4736799516684899`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.46606404708255933`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.45301599336630016`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.3658649603211226`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.4807181379842941}, {
Style["75%", Bold], 0.4736799516684899}, {
Style["median", Bold], 0.46606404708255933`}, {
Style["25%", Bold], 0.45301599336630016`}, {
Style["min", Bold], 0.3658649603211226}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9372549019607843, 0.6274509803921569, 0.16862745098039217`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{2.7014054506919507`, 0.45905278129921445`}, {
3.2985945493080497`, 0.45905278129921445`}, {
3.2985945493080497`, 0.43961536710448496`}, {
2.7014054506919507`,
0.43961536710448496`}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{3.2985945493080493`, 0.451997886641369}, {
2.7014054506919507`, 0.451997886641369}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3., 0.43961536710448496`}, {3.,
0.42147530386317744`}}, {{3., 0.45905278129921445`}, {3.,
0.4696778429369455}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{3.1492972746540246`, 0.42147530386317744`}, {
2.8507027253459754`, 0.42147530386317744`}}, {{
3.1492972746540246`, 0.4696778429369455}, {
2.8507027253459754`, 0.4696778429369455}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.4696778429369455`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.45905278129921445`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.451997886641369`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.43961536710448496`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.42147530386317744`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.4696778429369455}, {
Style["75%", Bold], 0.45905278129921445`}, {
Style["median", Bold], 0.451997886641369}, {
Style["25%", Bold], 0.43961536710448496`}, {
Style["min", Bold], 0.42147530386317744`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.9921568627450981, 0.8156862745098039, 0.49019607843137253`]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{3.7014054506919507`, 0.462095396409811}, {
4.298594549308049, 0.462095396409811}, {4.298594549308049,
0.4445490952522732}, {3.7014054506919507`,
0.4445490952522732}}], {}, {{}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{4.298594549308049, 0.4551516168056565}, {
3.7014054506919507`, 0.4551516168056565}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4., 0.4445490952522732}, {4.,
0.4182328234000615}}, {{4., 0.462095396409811}, {4.,
0.4696778429369455}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{4.149297274654025, 0.4182328234000615}, {
3.8507027253459754`, 0.4182328234000615}}, {{
4.149297274654025, 0.4696778429369455}, {
3.8507027253459754`, 0.4696778429369455}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.4696778429369455`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.462095396409811`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.4551516168056565`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.4445490952522732`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.4182328234000615`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.4696778429369455}, {
Style["75%", Bold], 0.462095396409811}, {
Style["median", Bold], 0.4551516168056565}, {
Style["25%", Bold], 0.4445490952522732}, {
Style["min", Bold], 0.4182328234000615}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[0.7254901960784313, 0.8, 0.07058823529411765]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{4.701405450691951, 0.46166731305740927`}, {
5.298594549308049, 0.46166731305740927`}, {5.298594549308049,
0.4390216050207152}, {4.701405450691951,
0.4390216050207152}}], {}, {{}, {
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0.5], StripOnInput -> False],
TraditionalForm]], {5., 0.24630543049152887`}]}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{5.298594549308049, 0.45101717662508883`}, {
4.701405450691951, 0.45101717662508883`}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5., 0.4390216050207152}, {5.,
0.41366280386317744`}}, {{5., 0.46166731305740927`}, {5.,
0.46915723986639635`}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{5.149297274654025, 0.41366280386317744`}, {
4.850702725345975, 0.41366280386317744`}}, {{
5.149297274654025, 0.46915723986639635`}, {
4.850702725345975, 0.46915723986639635`}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.46915723986639635`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.46166731305740927`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.45101717662508883`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.4390216050207152`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.24630543049152887`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.46915723986639635`}, {
Style["75%", Bold], 0.46166731305740927`}, {
Style["median", Bold], 0.45101717662508883`}, {
Style["25%", Bold], 0.4390216050207152}, {
Style["min", Bold], 0.24630543049152887`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}], "Tooltip"]& ]}, {
Directive[
RGBColor[
0.3176470588235294, 0.49019607843137253`, 0.0784313725490196]],
TagBox[
TooltipBox[
DynamicBox[{
FEPrivate`If[
CurrentValue["MouseOver"],
EdgeForm[{
GrayLevel[0.5],
AbsoluteThickness[1.5],
Opacity[0.66]}], {}, {}],
GraphicsGroupBox[{Antialiasing -> False,
PolygonBox[{{5.701405450691951, 0.4617867986817586}, {
6.298594549308049, 0.4617867986817586}, {6.298594549308049,
0.451997886641369}, {5.701405450691951,
0.451997886641369}}], {}, {{
InsetBox[
BoxData[
FormBox[
StyleBox["\"\[FilledSmallCircle]\"", 10,
GrayLevel[0], StripOnInput -> False], TraditionalForm]], {
6., 0.43710030386317744`}]}, {}}, {}, {
GrayLevel[0],
GrayLevel[1],
LineBox[{{6.298594549308049, 0.4576421524575494}, {
5.701405450691951, 0.4576421524575494}}]}, {}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6., 0.451997886641369}, {6.,
0.43961536710448496`}}, {{6., 0.4617867986817586}, {6.,
0.466693292608423}}}]}, {
GrayLevel[0],
GrayLevel[0.5],
LineBox[{{{6.149297274654025, 0.43961536710448496`}, {
5.850702725345975, 0.43961536710448496`}}, {{
6.149297274654025, 0.466693292608423}, {5.850702725345975,
0.466693292608423}}}]}, {}}]}],
StyleBox[
TagBox[
GridBox[{{
StyleBox["\"max\"", Bold, StripOnInput -> False],
"0.466693292608423`"}, {
StyleBox["\"75%\"", Bold, StripOnInput -> False],
"0.4617867986817586`"}, {
StyleBox["\"median\"", Bold, StripOnInput -> False],
"0.4576421524575494`"}, {
StyleBox["\"25%\"", Bold, StripOnInput -> False],
"0.451997886641369`"}, {
StyleBox["\"min\"", Bold, StripOnInput -> False],
"0.43710030386317744`"}},
GridBoxAlignment -> {"Columns" -> {Center, ".", {Left}}},
AutoDelete -> False, GridBoxDividers -> {"Columns" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, "Rows" -> {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}},
GridBoxFrame -> {
"ColumnsIndexed" -> {{{1, -1}, {1, -1}} -> GrayLevel[0]}},
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], "Grid"], {}, StripOnInput -> False]],
Annotation[#,
Style[
Grid[{{
Style["max", Bold], 0.466693292608423}, {
Style["75%", Bold], 0.4617867986817586}, {
Style["median", Bold], 0.4576421524575494}, {
Style["25%", Bold], 0.451997886641369}, {
Style["min", Bold], 0.43710030386317744`}}, Dividers -> {{
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}, {
Directive[
GrayLevel[0.3]], {
Directive[
GrayLevel[0.3]]},
Directive[
GrayLevel[0.3]]}}, Alignment -> {{Center, ".", {Left}}},
Frame -> GrayLevel[0], BaseStyle -> Directive[
AbsoluteThickness[1],
Dashing[{}]]], {}],
"Tooltip"]& ]}}}, {}, {}}}, {{{{{{{}, {}}, {}}, {{{}, {}}, {}}, \
{{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}, {{{}, {}}, {}}}, {}}, {}}, \
{}}, {}}, {AspectRatio -> NCache[
Rational[1, 3], 0.3333333333333333], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {0.42154599576114565`, 0.2202990550906309}, Frame -> True,
FrameLabel -> {{
FormBox[
StyleBox["\"Normalized BDM\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox["\"\"", TraditionalForm], None}}, FrameStyle -> Automatic,
FrameTicks -> {{Automatic, Automatic}, {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm],
0}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, {{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}}},
GridLines -> {None, Automatic}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> Medium, PlotRange -> {0.4, All},
PlotRangePadding -> {{
Scaled[0.05],
Scaled[0.05]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {{{1.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {1.,
FormBox[
StyleBox["\"*\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
2.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {2.,
FormBox[
StyleBox["\"+\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
3.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {3.,
FormBox[
StyleBox["\"x\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
4.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {4.,
FormBox[
StyleBox["\"/\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
5.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {5.,
FormBox[
StyleBox["\":\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
6.,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0.008, 0}}, {6.,
FormBox[
StyleBox["\".\"", 20,
GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 0}, {
0.7014054506919506,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}, {6.298594549308049,
FormBox[
InterpretationBox[
StyleBox[
GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition ->
Baseline], "CacheGraphics" -> False],
Spacer[0]], TraditionalForm], {0, 0}}}, Automatic}}]},
"RowDefault"]], "Output",
CellChangeTimes->{
3.725467541560199*^9, {3.7254678835057*^9, 3.725467898990151*^9},
3.7254680050705748`*^9, {3.725468069800229*^9, 3.725468077895714*^9}, {
3.725468159578532*^9, 3.725468184121228*^9}, {3.7254683280306263`*^9,
3.725468389103635*^9}, {3.725468491955967*^9, 3.7254684971906357`*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell["Algorithmic Distribution of Patterns in GoL", "Subchapter",
CellChangeTimes->{{3.706629823033452*^9, 3.706629831345387*^9}}],
Cell["GoL patterns roughly follow the Universal Distribution", "Text",
CellChangeTimes->{{3.7244362007149563`*^9, 3.724436209939659*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "2"}], "]"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}], "/.",
" ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{", "\"\<GoL Frequency\\nndistribution\>\"", "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "13", ",", "Black"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{"\"\<Rank\>\"", ",", "\"\<Frequency\>\""}], "}"}]}], ")"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.725470248136191*^9, 3.7254702865808697`*^9}, {
3.725470401613163*^9, 3.7254704157310457`*^9}, {3.7254704651387997`*^9,
3.7254704701493483`*^9}, {3.725470519656191*^9, 3.725470553493621*^9}, {
3.725470687723795*^9, 3.7254708993706617`*^9}, {3.7254709492418118`*^9,
3.7254709544572477`*^9}, {3.725471027534871*^9, 3.725471098547677*^9}, {
3.725471130451014*^9, 3.7254711618737793`*^9}, {3.725471345293621*^9,
3.725471345659384*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw1ywlME1Ycx/EiBAGBMaeCVKOFcl/lLJQKP4pAoRTa0kIRYVEO3SFolyEi
0TqsxAyyQSiEMWWMxRTnJHMOpuxAyHBkBBmzDHDD4DF2NEbcwIZDt2Xv/5KX
l8/75sfbX6EqXcfhcEr+vf+9/5/HicrVzN7VM0KwD0w3Wkqlb5EdoGuSGOdX
YpjdsPXU7Kt7fohm3oTO4Ibezn6yB7arS67Fi6OYt6HHXvXhWDB5J0w3E8v7
volk9sLdj97xiLMh87Ela3iR2xfB7ItP7oQnd28g+yNF2LJ3ri6cORAq9/En
YgM5GLzjniKnF8mhcOj1P19lFDAL4GU6W2+/FMYcDjvfxu8cU8kR6LiH9Ell
KHMkPAd+tjrXhjBHYbnWz1H8CjkaOwIWSio3k2Mgssyd2FoVzCxEWKCu+GEe
ORaWHRFJDyPJcTjyvFopDSeLkPXBRU2BBzkeX478rvjWFMQsxlIC76ciQyDz
Ltj1PyjM0ZETUN3WIO9xIyfizP3ihs9uBDAD+/Qx4WFGZj3Q7ja2fCWdehIE
8yaV6AXqSbhwa1RYc9mfdQlaTl9wKh/yY12Cy9oq98FGZk4yvoi9xO04SD0Z
pc3mtflC6rtRkT1Uhwjqu9E2Mb05rcmX9RQkySxu+2qZ9Skomnnt3Q436qkw
GR/lB9hST4UVyj/V131YT8PHtr3Ft7OZ9WmYKnpzndWduhQnerxsT63wWZfC
pvzuFe4yMycd1WelXYYn1NPhZxZYXSzUMzCRG3LVPEk9A55vTP+VcYu6DJXe
iYqlEeoyTPbPDg1fpJ6JY7YVDt7t1DPxeetziaiNuhxxb/Neai+jLsc4d1EQ
raCeBd1vY7qREOpZcDLelDUFUc/GYHp8zIwH9WyMCF3el1i9WVfg0Ho7vutT
ZijQNbFRdmOOWa+AfVLI67O/MA8oYPVwtTt/nfZKHOdHxrgco70SfwfLS5MP
016JXZL59d3ltFdC31J3skxOexVWW+8ozULaqxCpPJpQFUp7FfjXnH7VO9Ne
Bdusnb4/2tM+By42WvPIghfb5+CZWFSyaGHW50A3Oehd38I8kIPHAn3lAwMz
R43R+xxpQS3t1dD+sbGw5wDt1eDukcr3F9NejZrMg1Lzy7TXYPSqO+9kFO01
qF8J5Rdxaa9Ba5uzBFtor0FBgfjwpjUe2+ci6JnBsfkRM3LBtZk63TfDrM/F
7YXv+VVTzAO5iB3v/jriPdrnIZHn7DzcTPs8FLVvG+yupX0etnduOJdWQ/s8
3JN1fWo4RHstvMcuVUsO0F4Ln6/WusRltNciNezIUfVe2mvhOjxwzkdD+3zY
e+Zrnmby8A9Xr42k
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJw1y3lME2YcxvFiCQIC65wKUo0Wyn2Vs1AqPBSBQim0pYUiwqIcukPQLkNE
onVYiRGyQTjCmDLGYsA5yZyDKTsQMhwZQcYsA9wweIwdjRE3sOHQ+cf7e5Pf
H5/3m0ewv0xTzOVwOEUvz+blrePQexKvXk3vXT0jBvvAdL2lWP4e2R6GBlnT
/EoUMw9bT82+uefnSOZN6Ais6+3oJ7thu7boeqw0gnkbeuw0n4wFknei61Z8
ad/34cweuPfp+24xNmQhtmQML/L7wpi98fnd0MTuDWRfJImb987VhDL7Q+M6
/lRqIgdCcNxd4vgqORj2vb4XKppEzCJ4dJ2ttVsKYQ6FrXf9jw7J5DC030fq
pDqYORzuA79ZnaqDmCOwXO3jIH2DHIkdfgtF5ZvJUZBY5k5srQhkFiPE31D4
KIccDcuOsIRH4eQYHHlRqZaHkiXI+PiSLs+NHItvRv5S/dAVwCzFUpzg1wKT
P/Mu2PY/zM8ykONQ2Vqn7OGR43HmQWHdlzf9mIF9xqjQkCZmI9DGG1u+mko9
AaL5Lo3kFeoJuHh7VFx1xZd1GZpPX3QsHfJhXYYr+grXwXpmTiK+jr7Mbz9I
PRHFjea1+Xzqu1GWOVSDMOq70ToxvTmlwZv1JCQoLLx91czGJBTMvPVBO496
MrqaHuf6caknwwr1P9obXqyn4DNub+GdTGZjCqYK3l1ndaUux4keD+6pFSHr
ctiU3rvKX2bmpKLyrLzT9JR6KnzMIquzhXoaJrKDrpknqafB/Z3pf9NuU1eg
3DNetTRCXYHJ/tmh4UvU03GMW2bv2UY9HV+1vJBJWqkrEXNO8FpbCXUlxvmL
okgV9QwY/hwzjARRz4Bj0y1FQwD1TAymxkbNuFHPxIjY+SOZ1ZN1FQ6ttxW6
PGOGCp0TGxU355iNKtglBL09+zvzgApWNxfbCzdor8ZxYXiU8zHaq/FfoLI4
8TDt1dglm1/fXUp7NYzNNSdLlLTXYLXlrtospr0G4eqjcRXBtNdAeN3xD6MT
7TXgZuz0/sWO9llwttGbRxY82D4Lz6WSokULszELhslBz9pm5oEsPBEZyx+a
mDlajD7gyPOqaa+F/u+N+T0HaK8Ff49cub+Q9lpUpR+Um1+nvQ6j11wFJyNo
r0PtSrCwgE97HVpanWTYQnsd8vKkhzetCdg+GwHPTQ6Nj5mRDb7N1Om+GWZj
Nu4s/CSsmGIeyEb0ePd3YR/SPgfxAien4Uba56CgbdtgdzXtc7C9Y8P5lCra
5+C+ovML0yHa6+E5drlSdoD2enh9u9YpLaG9HskhR45q99JeD5fhgfNeOtrn
ws49V/csXYD/AWyHjaY=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, 7.570544490381126},
PlotRange -> {{0, 100.}, {7.823826221975292, 23.52729358081371}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0, 7.570544490381126}, DisplayFunction :> Identity,
Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"Frequency\"", 13,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"Rank\"", 13,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {9.210340371976184, 11.512925464970229`, 13.815510557964274`,
16.11809565095832, 18.420680743952367`, 20.72326583694641,
23.025850929940457`}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange -> {{0, 100.}, {7.823826221975292, 23.52729358081371}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{"\"GoL Frequency\\nndistribution\""}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], "}"}],
",",
RowBox[{"{", #, "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], "}"}]}],
",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{", "True", "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.7254707611647577`*^9, 3.7254709000765953`*^9}, {
3.725470950062606*^9, 3.7254709549329863`*^9}, {3.725471029037236*^9,
3.725471099041812*^9}, {3.7254711416766863`*^9, 3.725471162692958*^9},
3.7254713461057787`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"(",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ToExpression", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"-", "2"}], "]"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"#", ",",
RowBox[{"{", "\"\< \>\"", "}"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{"StringSplit", "[",
RowBox[{"GoLdata", ",", "\"\<\\n\>\""}], "]"}], "[",
RowBox[{"[",
RowBox[{"11", ";;", "110"}], "]"}], "]"}], ")"}]}], ")"}], "/.",
" ",
RowBox[{"\"\<\>\"", "\[Rule]",
RowBox[{"Sequence", "[", "]"}]}]}], ")"}]}], ")"}], "/",
"10000000000000"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
SuperscriptBox["\[ExponentialE]", "#"], "&"}], "/@",
RowBox[{"(",
RowBox[{"-",
RowBox[{"Median", "/@",
RowBox[{"bdmGoLmotifs", "[",
RowBox[{"[",
RowBox[{"1", ";;", "100"}], "]"}], "]"}]}]}], ")"}]}], ")"}],
"10000000000000"}]}], " ", "}"}], ")"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<GoL pattern\\noccurrence\>\"", ",",
"\"\<GoL BDM\\ndistribution\>\""}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7066307065254793`*^9, 3.706630714704259*^9}, {
3.7066307959377403`*^9, 3.706630847812902*^9}, {3.7066309234779243`*^9,
3.706630989267632*^9}, {3.706631070407151*^9, 3.706631072856737*^9}, {
3.706631135150652*^9, 3.706631498414628*^9}, {3.7066315415272017`*^9,
3.706631546048667*^9}, 3.706631588232259*^9, {3.706631620928322*^9,
3.706631621615652*^9}, {3.706631813193301*^9, 3.7066318416631613`*^9}, {
3.706632035784053*^9, 3.706632066035056*^9}, {3.725404550384107*^9,
3.7254046988013887`*^9}, {3.7254047824870453`*^9, 3.725404958595353*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw10H9M1HUcx/GDwIQVQSA/4jJEfpwcICIHlwi8OA4O8A7uB8edEGDABf4K
2YLMyboFnU1ghUoojUCdJHAOT4QsBE7Hge6YOHMqOQQsAbcQwgaUTbP5eX+3
z757fJ+f1z/fdfklSp0th8MpfHn+f796FuKGf5ze5dziZWYf0PphsXHqAnk1
RHnO84Uj3szOUCnlI9JoH2Y3JD5bjOj/iOwJmVG88bBuPTMXPMnOnMIqsg8i
LbWWI7l+zL645vhk39f3/Zn9kHVJ33O9JIA5APymNu/OoUBmHv59NDkbe4PH
HIQp/72XD/1CDoY4917IXO8G5lCUz/bqnLuCmMNQaKxc82yGz7wJX4QeHFtu
CGYOx0zpiJZfE8K8GXuOhbX9lRXKHIGam4+OWz4hC1DE58ZUXyNHQlrMXz+r
28gcBU3Qd7FcA1mIxoj7O7jt5PexRn1E/pORvAXCi/nSVgs5GjpLHe/7d8KY
t778X+U6hZEcgytSN9+73eRYGMbjgtqmyXHQX8pwDHTaxAy47tot3OnHrAeW
TjarAlOpx6Mj8sIPBUXU47FP5NN9tYG6CCtFXdaUN8NZF+GPilTLewHMnATM
1IYlmLZQT4DLpPetN0BdjGpb/9pJNXUxlsxeSeNnqCfiVNU3yfJz1BPh1ndz
tWmaehJK8t7y2zNHPQnDDrnZd1w2sy7B3rP8ZncJs16Cu/9YR+0KqCejSlmW
jlLqyRA9/XZ5kcxJgUGX/6KvjHoKOuOe3P57P/VU/Pp8fqm+knoqeha8NNmH
qG/DV54zZ+0PU98GrdSjpOkEdSkMvFFpyUnqUhQ/MHQWnKIuQ+vvZZKuXuoy
ZHNrhNND1NPgGNnswb1HPQ39E74dUWPU05Fv/7j76EPq6chz4lROLFKXo7bV
buCzp8yQ409U8H2e0305zA4LjS6ciFc2yzHc9OKGyYWZo8AqzznBgXBmKHDd
dcfaiUhmvQL+Dq4yYxTtFXhtQlQnS6a9EokPPHnuKtor0W5jNQ1qaK+ESWaT
ay6mvRLxlUsxDbtpr8Lltqxp73LaqzBY/XitYT/tVXCM8x/4+TTtVbDWDdU7
GWmfgRzhqhDVOdpnwENQ4buhl/YZEFTkt6f30T4D9lW3gt0HaK/G+OgBXLlN
ezUqguf7FVO0V+PTHM75yd9or0b9wdnj5Qu0z0RIR8JIzzLtM9Hd1uh0xkbA
9pnYbmrpH7RlNmci8KqpdGYdM0eD0yc41iY/Zmhw7IOVeX4I7TW4OKa3HQ+j
vQZKO8FKjJD2WoQnnD+aF017LUzW1z9/SNZr0fJ2Wv0d0F6LrZIA24/FtN8O
vJsV8GWywPwfe4/N7w==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdVF1IU3EUv7oXw4g9OCxxUiJjNDG/am66eea8zn243d3duzsbQYXFIkEo
KFCQWzRSqKcI+gCDouFLPURBiNh9sAzSiDLCh8AXhSLJlyQIpA/PCf7nwrj8
9jvnd87vnP//Hjg5op4qlyRp6M/v73vn2eyWXz34Or3WbOEfcGazsj564dKL
HVgBj+KXx08f8iFvh5GJgEfJ+hFXwUqqf6h024t4L5Rpe2Lrtg7EtSx+P+Pr
Gd8A5ZOrJ/QFD2IXOJy7QrGaAGI3jDXdvX+uiuIPsvxG7DeIuAl+VLh/bTd0
Im5m8S0gX7ko278R34r9kd828M5POdyeEOJ2+Dw7vHtmugvxYaZ3BPMJe6Fa
mxvdeEP6HcyPD+Npfn7UJ76T+emCtsXhpGOb9ALMXxDjKb+bxYPo12RYCol6
Zgg+/dsv8T3oF/2bPZhP9cJYn/LD8Ox5yTUaJL4X+0Fs9kIxMnvL9ZJ4GZbs
Z+vWiqQvQ35wTL6zRHwf668PvufLpj40Eh8R/ZoRto9+Md5kWIoyf1HUo33H
4Oryz30335N+jM07jv2Rfhwmn66Cf5n4BM6T9BPs/AzAsXet7XqB+AHmP8n8
J1n/KbbfFJuvAvnw1pP1o6gPCutHwfOH+ZbCzmsaeewX0nDd+hI9fo/8prEe
5afFepIqnm9Q2TxVcX+WKp4nKSPGQ4btOyP6sTJsPhoY1ba3tofkXwPntZnC
VoL616A4sZE36vC+WRq777o4T9DZvnUx3tLFfqUsq8+wmRXnbWXZ98MQ/YAh
xpuMtwxwjp+f8z0m/zlWPweVr0uFjzcoP4f1qP+cOA9p8P99/g1Dp7sL
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJw10H9M1HUcx/EvCCasCAL5EWSI/Dg5QEQOLhF5cfw4wDu4Hxx3QoABF/gr
ZAsyJ+sWeDaBFSqhNAJ1ksA5PBGyEDgdB7pj4syp5BCwBNxCCBtQNo2tz/uz
ff54fJ+f1z/f9XnFCu0qjuMKVq7VyrXm6MzHDP04tcex2cPEPqDloyLD5GXy
GohyHecKhj2ZHaFUyIYlUd7MLkh4uRDe9zHZHVJD/KZj2g3MXuCJd2cXVJK9
EWGuMR/P8WX2wU375we+fuTH7IvMq7ruW8X+zP7gN7Z6dgwGMPPw79OJme23
ecyBmPTbf+3oL+QgxOc8DJ7t2cgcgrKZHq1jZyBzKAoMFWtfTvOZN+PLkMOj
S/VBzGGYLhnW8KuDmbdg38nQ1r8yQ5jDUX3n6Snzp2QBCvle0VU3yRGQFPE3
zGg3MUdCHfjddi89WYiG8Ee7vNrIH2Ct6rjsJwN5K4RX8iQtZnIUtOZa3vfv
hjJvW/lfZVq5gRyN6xIXnwdd5O3Qj8UEtk6RY6C7mm4f4LCZGXDes1e425dZ
ByyeaVIGpFCPRXvE5R/yC6nH4oDIu+tGPXURlgs7LclvhbEuwh/lKeb3/Zm5
OEzXhMYZt1KPg9OE5903QT0eVdZ+NRMq6vFYNHkkjp2nnoCzld8kyS5ST4BL
7501xinqiSjOfdt33yz1RAzZ5WTdd9rCuhj7L/CbXMXMOjEe/GMZscmnnoRK
RWkaSqgnQfTi26UFMpcMvTbvdW8p9WR0xDy/9/dB6in49dXcYl0F9RR0z3uo
s45S34Gv3Kcv2B6jvgMaiVtx42nqEuh5I5LiM9QlKHqs78g/S12Klt9LxZ09
1KXI8qoWTg1ST4V9RJOb10Pqqegb92mPHKWehjzbZ10nnlBPQ64DVzG+QF2G
mhab/s9fMEOGP1HO935F72Uw2c03OHHh/9skw1Dj69tGJ2ZOjtXus4JDYcyQ
45bzrnXjEcw6OfzsnKWGSNrLsWpcVCtNor0CCY/dea5K2ivQZmUxDqhpr4BR
apVjKqK9ArEVi9H1e2mvxLXWzCnPMtorMVD1bJ3+IO2VsI/x6//5HO2VsNQO
1jkYaJ+ObOHqYOVF2qfDTVDus7GH9ukQlOe1pfXSPh22lXeDXPtpr8LYyCFc
v0d7FcqD5vrkk7RX4bNs7tLEb7RXoe7wzKmyedpnILg9brh7ifYZ6GptcDhv
JWD7DOw0NvcNWDObMhBww1gyvZ6ZU+Pcac7S6MsMNU5+uDzHD6a9GldGddZj
obRXQ2EjWI4W0l6DsLhLJ3KjaK+B0fLGF0/IOg2a30mtuw/aa7BN7G/9STzt
dwLvZfofSRKY/gOQZ83x
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdVF9IU2EU/+ZeDCP24LCiSYmM0cRMrbnp5pnzOvfH7W67d3c2ggqLRYJQ
UKAgt2ikUE8R9AcMioYv9RAFIWL3oX+gRpQRPQS+KBRJviRBIEmdE3znwn34
3d85v3N+53zf3XdiJHvSLoQY2nptW2+VoGe9W3l1/9v0SouFH+D0ek1D7PzF
5/9gNTxMXBo/dcCPvANGJoJeNR9AXAuf0/1DlVs+xDvBpu2Ir9o7EO9h8XsZ
38D4RqiaXD6uv/YidoPTtS0c3x1E7IGx5jv3ztZS/H6W34T9hhA3w89qz+/N
xk7ELSz+ICiXLyiO78S3Yn/ktw18L6acHm8YcTt8mR3ePjPdhfgQ0zuM+YR9
UKfNja7Nk34H8+PHeJpfAPWJ72R+uqBtYTjl3CS9IPMXwnjK72bxIPs1GRZh
Wc8Mw6e/+yW+B/2if7MH86leBOtTfgSePqu4R0PE92I/iM1eKEdnb7pfEq/A
ouNM/UqZ9BUoDo4ptxeJ72P99cGPom3qQxPxUdmvGWX76JfjTYZFjPmLoR7t
Ow5Xln7tuvGe9ONs3gnsj/QTMPlkGQJLxCdxnqSfZOdnAI6+a23XS8QPMP8p
5j/F+k+z/abZfFUoRjYerx5BfVBZPyqeP8y3VHZeM8hjv5CBa9bX2LG75DeD
9Sg/I9cTWfl8Q5bNMyvvz8rK50nk5HjIsX3nZD9Wjs1HA6PO/tb+gPxr4Lo6
U9pIUv8alCfWikY93jdLY/ddl+cJOtu3LsdbutyvyLP6DJt5ed5Wnv0/DNkP
GHK8yXjLANf4uTn/I/JfYPULUPOmUvp4nfILWI/6L8jzEIP/7/MfWH+7DQ==
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, -36.82875521177903},
PlotRange -> {{0, 100.}, {-36.24430713529478, -0.008526393271943005}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0, -36.82875521177903}, DisplayFunction :> Identity,
Frame -> {{True, True}, {True, True}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {-34.538776394910684`, -25.328436022934504`, -16.11809565095832, \
-6.907755278982137}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange -> {{0, 100.}, {-36.24430713529478, -0.008526393271943005}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
"\"GoL pattern\\noccurrence\"", "\"GoL BDM\\ndistribution\""},
"PointLegend", DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.97, 0.606, 0.081]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}]}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706630708706756*^9, 3.706630715057157*^9}, {
3.706630800282302*^9, 3.7066308482386913`*^9}, {3.706630945722186*^9,
3.7066309897005873`*^9}, {3.7066310710813103`*^9, 3.706631073269204*^9}, {
3.706631136323331*^9, 3.706631187117248*^9}, 3.706631235453302*^9, {
3.706631281880022*^9, 3.70663131928793*^9}, {3.7066313942896757`*^9,
3.706631463736252*^9}, 3.7066314997931004`*^9, 3.706631547061222*^9,
3.7066315890679483`*^9, 3.706631772826112*^9, {3.706631820575478*^9,
3.706631842874*^9}, {3.706632037200259*^9, 3.706632066753501*^9}, {
3.725404551752618*^9, 3.725404699745118*^9}, {3.7254047870920277`*^9,
3.725404882224094*^9}, {3.725404918026183*^9, 3.725404959747911*^9}}]
}, Open ]],
Cell["\<\
Algorithmic distribution of most-likely still structures and most-likely \
periodic structures:\
\>", "Text",
CellChangeTimes->{{3.7067226852796383`*^9, 3.7067227048996983`*^9}, {
3.70677173999936*^9, 3.706771754070784*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"Riffle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"N", "/@", "1000"}],
RowBox[{"Table", "[",
RowBox[{
RowBox[{"1", "/",
RowBox[{"2", "^", "n"}]}], ",",
RowBox[{"{",
RowBox[{"n", ",", "1", ",", "10"}], "}"}]}], "]"}]}], "}"}],
",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ";;", "10"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"dists", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"2", ",", "3", ",", "5", ",", "7"}], "}"}], "]"}],
"]"}]}]}], "}"}], ",", "1"}], "]"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "300"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Likely still\>\"", ",", "14", ",", "Black"}], "]"}]}],
",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<motifs sorted by highest frequency\>\"", ",", "13"}],
"]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<frequency\>\"", ",", "13"}], "]"}]}], "}"}]}]}],
"]"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"N", "/@", "1000"}],
RowBox[{"Table", "[",
RowBox[{
RowBox[{"1", "/",
RowBox[{"2", "^", "n"}]}], ",",
RowBox[{"{",
RowBox[{"n", ",", "1", ",", "10"}], "}"}]}], "]"}]}], "}"}],
",",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ";;", "10"}], "]"}], "]"}], "&"}], "/@",
RowBox[{"distperiodic", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"2", ",", "3", ",", "5", ",", "7"}], "}"}], "]"}],
"]"}]}]}], "}"}], ",", "1"}], "]"}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<m(s)\>\"", ",", "\"\<3x3\>\"", ",", "\"\<4x4\>\"", ",",
"\"\<6x6\>\"", ",", "\"\<8x8\>\""}], "}"}]}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "300"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Likely periodic\>\"", ",", "14", ",", "Black"}],
"]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<motifs sorted by highest frequency\>\"", ",", "13"}],
"]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<frequency\>\"", ",", "13"}], "]"}]}], "}"}]}]}],
"]"}]}], "}"}], ",", "\"\< \>\""}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.706722486812931*^9, 3.706722648543556*^9}, {
3.706771315097603*^9, 3.706771319317927*^9}, {3.706771715383918*^9,
3.7067717328959208`*^9}, {3.706771767639229*^9, 3.706771775730871*^9}, {
3.7067954581202297`*^9, 3.706795514410832*^9}, {3.706795556946527*^9,
3.706795590424879*^9}, {3.70679562094363*^9, 3.706795655175487*^9}, {
3.706795780032528*^9, 3.706795862680891*^9}, {3.7067958951405087`*^9,
3.706795897428136*^9}, {3.706796026476493*^9, 3.7067960394595118`*^9}, {
3.706796148865028*^9, 3.706796343459436*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.214608098422191}, {2., 5.521460917862246}, {3.,
4.8283137373023015`}, {4., 4.135166556742356}, {5.,
3.4420193761824107`}, {6., 2.7488721956224653`}, {7.,
2.05572501506252}, {8., 1.3625778345025745`}, {9.,
0.6694306539426292}, {10., -0.023716526617316044`}}]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.897704943128636}, {2., 3.4011973816621555`}, {3.,
2.772588722239781}, {4., 2.4849066497880004`}, {5.,
2.0794415416798357`}, {6., 1.791759469228055}, {7.,
1.3862943611198906`}, {8., 1.0986122886681098`}, {9.,
1.0986122886681098`}, {10., 1.0986122886681098`}}]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.255750041753367}, {2., 3.1780538303479458`}, {3.,
2.8903717578961645`}, {4., 2.0794415416798357`}, {5.,
2.0794415416798357`}, {6., 1.791759469228055}, {7.,
1.791759469228055}, {8., 1.6094379124341003`}, {9.,
1.0986122886681098`}, {10., 0.6931471805599453}}]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 5.1647859739235145`}, {2., 1.791759469228055}, {3.,
1.6094379124341003`}, {4., 1.6094379124341003`}, {5.,
1.6094379124341003`}, {6., 1.0986122886681098`}, {7.,
1.0986122886681098`}, {8., 1.0986122886681098`}, {9.,
1.0986122886681098`}, {10., 0.6931471805599453}}]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 4.219507705176107}, {2., 2.0794415416798357`}, {3.,
1.6094379124341003`}, {4., 1.0986122886681098`}, {5.,
1.0986122886681098`}, {6., 1.0986122886681098`}, {7.,
0.6931471805599453}, {8., 0.6931471805599453}, {9.,
0.6931471805599453}, {10., 0.6931471805599453}}]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], {{{1., 6.214608098422191}}, {{2.,
5.521460917862246}}, {{3., 4.8283137373023015`}}, {{4.,
4.135166556742356}}, {{5., 3.4420193761824107`}}, {{6.,
2.7488721956224653`}}, {{7., 2.05572501506252}}, {{8.,
1.3625778345025745`}}, {{9., 0.6694306539426292}}, {{
10., -0.023716526617316044`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0., 0.}], {{{1.,
6.897704943128636}}, {{2., 3.4011973816621555`}}, {{3.,
2.772588722239781}}, {{4., 2.4849066497880004`}}, {{5.,
2.0794415416798357`}}, {{6., 1.791759469228055}}, {{7.,
1.3862943611198906`}}, {{8., 1.0986122886681098`}}, {{9.,
1.0986122886681098`}}, {{10., 1.0986122886681098`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], {{{1.,
6.255750041753367}}, {{2., 3.1780538303479458`}}, {{3.,
2.8903717578961645`}}, {{4., 2.0794415416798357`}}, {{5.,
2.0794415416798357`}}, {{6., 1.791759469228055}}, {{7.,
1.791759469228055}}, {{8., 1.6094379124341003`}}, {{9.,
1.0986122886681098`}}, {{10., 0.6931471805599453}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], {0., 0.}], {{{1.,
5.1647859739235145`}}, {{2., 1.791759469228055}}, {{3.,
1.6094379124341003`}}, {{4., 1.6094379124341003`}}, {{5.,
1.6094379124341003`}}, {{6., 1.0986122886681098`}}, {{7.,
1.0986122886681098`}}, {{8., 1.0986122886681098`}}, {{9.,
1.0986122886681098`}}, {{10., 0.6931471805599453}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], {0., 0.}], {{{1.,
4.219507705176107}}, {{2., 2.0794415416798357`}}, {{3.,
1.6094379124341003`}}, {{4., 1.0986122886681098`}}, {{5.,
1.0986122886681098`}}, {{6., 1.0986122886681098`}}, {{7.,
0.6931471805599453}}, {{8., 0.6931471805599453}}, {{9.,
0.6931471805599453}}, {{10.,
0.6931471805599453}}}]}, {}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {0.8593750000000001, -0.5260777623246836},
PlotRange -> {{1., 10.}, {-0.4082399416032023, 6.897704943128636}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0.8593750000000001, -0.5260777623246836}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"frequency\"", 13, StripOnInput -> False],
TraditionalForm], None}, {
FormBox[
StyleBox[
"\"motifs sorted by highest frequency\"", 13, StripOnInput -> False],
TraditionalForm], None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {0., 2.302585092994046, 4.605170185988092, 6.907755278982137}},
GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 300,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Likely still\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 10.}, {-0.4082399416032023, 6.897704943128636}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],"\" \"",TemplateBox[{
GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.214608098422191}, {2., 5.521460917862246}, {3.,
4.8283137373023015`}, {4., 4.135166556742356}, {5.,
3.4420193761824107`}, {6., 2.7488721956224653`}, {7.,
2.05572501506252}, {8., 1.3625778345025745`}, {9.,
0.6694306539426292}, {10., -0.023716526617316044`}}]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.418364935936212}, {2., 4.382026634673881}, {3.,
3.828641396489095}, {4., 3.6109179126442243`}, {5.,
2.8903717578961645`}, {6., 2.772588722239781}, {7.,
2.5649493574615367`}, {8., 2.5649493574615367`}, {9.,
2.3978952727983707`}, {10., 2.3978952727983707`}}]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 5.583496308781699}, {2., 3.58351893845611}, {3.,
3.367295829986474}, {4., 2.4849066497880004`}, {5.,
2.302585092994046}, {6., 2.1972245773362196`}, {7.,
2.0794415416798357`}, {8., 1.9459101490553132`}, {9.,
1.6094379124341003`}, {10., 1.6094379124341003`}}]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 3.871201010907891}, {2., 2.5649493574615367`}, {3.,
1.9459101490553132`}, {4., 1.3862943611198906`}, {5.,
1.3862943611198906`}, {6., 1.0986122886681098`}, {7.,
1.0986122886681098`}, {8., 0.6931471805599453}, {9.,
0.6931471805599453}, {10., 0.6931471805599453}}]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 3.091042453358316}, {2., 0.6931471805599453}, {3.,
0.6931471805599453}, {4., 0.}, {5., 0.}, {6., 0.}, {7., 0.}, {8.,
0.}, {9., 0.}, {10., 0.}}]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], {{{1., 6.214608098422191}}, {{2.,
5.521460917862246}}, {{3., 4.8283137373023015`}}, {{4.,
4.135166556742356}}, {{5., 3.4420193761824107`}}, {{6.,
2.7488721956224653`}}, {{7., 2.05572501506252}}, {{8.,
1.3625778345025745`}}, {{9., 0.6694306539426292}}, {{
10., -0.023716526617316044`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0., 0.}], {{{1.,
6.418364935936212}}, {{2., 4.382026634673881}}, {{3.,
3.828641396489095}}, {{4., 3.6109179126442243`}}, {{5.,
2.8903717578961645`}}, {{6., 2.772588722239781}}, {{7.,
2.5649493574615367`}}, {{8., 2.5649493574615367`}}, {{9.,
2.3978952727983707`}}, {{10., 2.3978952727983707`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], {{{1.,
5.583496308781699}}, {{2., 3.58351893845611}}, {{3.,
3.367295829986474}}, {{4., 2.4849066497880004`}}, {{5.,
2.302585092994046}}, {{6., 2.1972245773362196`}}, {{7.,
2.0794415416798357`}}, {{8., 1.9459101490553132`}}, {{9.,
1.6094379124341003`}}, {{10., 1.6094379124341003`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], {0., 0.}], {{{1.,
3.871201010907891}}, {{2., 2.5649493574615367`}}, {{3.,
1.9459101490553132`}}, {{4., 1.3862943611198906`}}, {{5.,
1.3862943611198906`}}, {{6., 1.0986122886681098`}}, {{7.,
1.0986122886681098`}}, {{8., 0.6931471805599453}}, {{9.,
0.6931471805599453}}, {{10., 0.6931471805599453}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], {0., 0.}], {{{
1., 3.091042453358316}}, {{2., 0.6931471805599453}}, {{3.,
0.6931471805599453}}, {{4., 0.}}, {{5., 0.}}, {{6., 0.}}, {{7.,
0.}}, {{8., 0.}}, {{9., 0.}}, {{10.,
0.}}}]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {0.8593750000000001, -0.49128695535104},
PlotRange -> {{1., 10.}, {-0.3816099412036232, 6.418364935936212}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0.8593750000000001, -0.49128695535104}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"frequency\"", 13, StripOnInput -> False],
TraditionalForm], None}, {
FormBox[
StyleBox[
"\"motifs sorted by highest frequency\"", 13, StripOnInput ->
False], TraditionalForm], None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {0., 1.6094379124341003`, 2.302585092994046, 3.912023005428146,
4.605170185988092, 6.214608098422191}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 300,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Likely periodic\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 10.}, {-0.3816099412036232, 6.418364935936212}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],
FormBox[
FormBox[
TemplateBox[{"\"m(s)\"", "\"3x3\"", "\"4x4\"", "\"6x6\"", "\"8x8\""},
"PointLegend", DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.198],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #5}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {
"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}],
",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}],
",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}],
",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}],
",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], ",", "Automatic"}], "}"}],
",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}]}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",",
"True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]}, "Legended",
DisplayFunction -> (GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
InterpretationFunction -> (RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& ), Editable -> True]},
"RowDefault"]], "Output",
CellChangeTimes->{{3.706722492468109*^9, 3.70672252111835*^9}, {
3.706722622990056*^9, 3.706722649204446*^9}, 3.706771321015541*^9,
3.706794667627187*^9, 3.706795471125496*^9, {3.706795503143965*^9,
3.706795519726244*^9}, {3.70679564567006*^9, 3.706795656008561*^9}, {
3.7067957855572147`*^9, 3.7067958147294407`*^9}, {3.706795844936883*^9,
3.706795863378611*^9}, 3.706795898162183*^9, {3.706796028622649*^9,
3.70679604082472*^9}, {3.7067961550632753`*^9, 3.706796162975561*^9}, {
3.7067962025741367`*^9, 3.706796228060051*^9}, {3.7067962676031637`*^9,
3.706796344077999*^9}}]
}, {2}]],
Cell["\<\
Given the structured nature of the output of GoL, taking larger blocks \
reveals this structure, if the pattern were random the block decomposition \
would have highest block entropy and the distribution of patterns would start \
flat and remain flat. However, the higher number of structures, the less \
uniform, but larger blocks will tend to flatten the distributions.\
\>", "Text",
CellChangeTimes->{{3.706771645065078*^9, 3.706771658297779*^9}, {
3.7067717870138683`*^9, 3.706772043462276*^9}, {3.706796125344486*^9,
3.706796144926029*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Column", "[",
RowBox[{
RowBox[{"Reverse", "[", "#", "]"}], ",",
RowBox[{"Alignment", "\[Rule]", "Center"}], ",",
RowBox[{"Spacings", "\[Rule]", "0"}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"DeleteDuplicates", "@",
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ArrayTrim", "@",
RowBox[{"ImageData", "[",
RowBox[{"ColorNegate", "@",
RowBox[{"Binarize", "@", "#"}]}], "]"}]}], ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"Max", "[",
RowBox[{"ImageDimensions", "[", "#", "]"}], "]"}], ">",
"80"}], ",",
RowBox[{"{",
RowBox[{"40", ",", "50"}], "}"}], ",",
RowBox[{"{",
RowBox[{"60", ",", "60"}], "}"}]}], "]"}]}]}], "]"}],
"&"}], "/@",
RowBox[{"(",
RowBox[{"First", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"!",
RowBox[{
RowBox[{"Head", "[", "#", "]"}], "===", "List"}]}], ",",
RowBox[{"{", "#", "}"}], ",", "#"}], "]"}], "&"}], "/@",
RowBox[{"GoLmotifs", "[",
RowBox[{"[",
RowBox[{"1", ";;", "100"}], "]"}], "]"}]}], ")"}]}],
")"}]}], ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "10", ",", "Black"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"\"\<H = \>\"", "<>", "#"}], "&"}], "/@",
RowBox[{"ToString", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"SetPrecision", "[",
RowBox[{"#", ",", "3"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Median", "/@",
RowBox[{"entropyGoLmotifs", "[",
RowBox[{"[",
RowBox[{"1", ";;", "100"}], "]"}], "]"}]}], ")"}]}],
")"}]}]}], ")"}]}], ")"}], ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "10", ",", "Black"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"\"\<C = \>\"", "<>", "#"}], "&"}], "/@",
RowBox[{"ToString", "/@",
RowBox[{"(",
RowBox[{
RowBox[{"#", "&"}], "@",
RowBox[{"(",
RowBox[{"Median", "/@",
RowBox[{"compressGoLmotifs", "[",
RowBox[{"[",
RowBox[{"1", ";;", "100"}], "]"}], "]"}]}], ")"}]}],
")"}]}]}], ")"}]}], ")"}], ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "10", ",", "Black"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"\"\<AP = \>\"", "<>", "#"}], "&"}], "/@",
RowBox[{"ToString", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"SetPrecision", "[",
RowBox[{"#", ",", "3"}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Median", "/@",
RowBox[{"bdmGoLmotifs", "[",
RowBox[{"[",
RowBox[{"1", ";;", "100"}], "]"}], "]"}]}], ")"}]}],
")"}]}]}], ")"}]}], ")"}]}], "}"}], "]"}], ",", "Last"}],
"]"}]}], ")"}]}], ",", "10", ",", "10", ",", "1", ",", "\"\<\>\""}],
"]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7065012611196117`*^9, 3.706501396533147*^9}, {
3.706501465711863*^9, 3.7065016861553802`*^9}, {3.706502407589967*^9,
3.706502415446485*^9}, {3.70650249278578*^9, 3.706502546907155*^9}, {
3.7065025900352583`*^9, 3.70650259364347*^9}, {3.706502748560286*^9,
3.7065028467961197`*^9}, {3.70650305361662*^9, 3.70650305657023*^9}, {
3.7065097759526043`*^9, 3.70650992445117*^9}, {3.706509956423666*^9,
3.706509975477992*^9}, {3.7065100663974113`*^9, 3.706510148931443*^9}, {
3.706510209145411*^9, 3.706510311668144*^9}, {3.706510344711049*^9,
3.706510408540389*^9}, {3.725388906165471*^9, 3.725389018045657*^9}, {
3.7253890857472486`*^9, 3.725389087280212*^9}, {3.7253891199135427`*^9,
3.725389123768742*^9}, 3.725472819368223*^9}],
Cell[BoxData[
TagBox[GridBox[{
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 29.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 104\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 0.410\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0}, {0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0}, {0, 0,
0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0}}, {{0, 0}, {7, 7}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 43.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 120\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.17\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 46.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 96\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 0.237\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}, {1, 1, 1}, {0, 0, 0}, {
0, 0, 0}, {0, 0, 0}, {1, 1, 1}, {0, 0, 0}, {0, 0, 0}, {0, 0,
0}}, {{0, 0}, {3, 11}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 52.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 128\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.33\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0}, {0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0,
0}, {0, 0, 0, 1, 0, 0, 0}}, {{0, 0}, {7, 15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 53.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 120\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0,
0}, {11, 11}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 53.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 120\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1,
1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}}, {{0,
0}, {11, 11}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 53.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 120\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 0.995\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0,
0}, {11, 11}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 54.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 128\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1,
1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0}}, {{0, 0}, {11, 15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 55.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 128\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.05\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0,
1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}}, {{0, 0}, {11, 15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 55.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 144\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0,
0, 0}}, {{0, 0}, {11, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 55.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 144\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1,
1, 1}}, {{0, 0}, {11, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 124\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.33\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0,
0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 128\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0,
0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.05\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 128\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.61\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15,
15}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 56.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.75\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0,
0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0,
0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1,
1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1}}, {{0, 0}, {11, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.31\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0,
0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0,
0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.10\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0,
1, 0, 0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0,
0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0,
0}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 136\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.35\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0,
0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0,
0}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 144\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 144\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.74\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0,
0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0,
0, 1, 1, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 0,
0, 0, 1, 1, 1, 1}}, {{0, 0}, {11, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmIgYARhJECcEBaARQVxQnQ2D0kHcUJ4zCM67AB1RgLw
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+IGaEAhCTaC4WgCaLnzsE9cFkiQ4jAEIGAuA=
"], {{0,
0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmIgYARhJECcEBaARQVxQnjMQ7OZOCE6uZOksAMAbGEC
5w==
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 148\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.66\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGJADikiWEA2BRRZwQmgySCuKEqOwOdFVkhREAcr4C
8A==
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+BjBgBGEowM/FAtBk8XOpoA9ZFkrj59JIP8EwAwA5
zALO
"], {{0, 0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.51\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+BjBgBGEowM9FA5TopQTATIZi/FwsepHY+Ll47CbI
BQAtWgK8
"], {{0, 0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.70\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+IGYEAigFA/i5WGTQjMHOxaIXSQY/l4oAZjIU4+di
0YvExs8FADjHAsU=
"], {{0, 0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+IGaEAhCTaC4SgIlCafxcHHqJ4lJJP6XuJTqMADXc
As4=
"], {{0, 0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2J+IGaEAiQmYS4WGSiNn0sFfZS4lVL9IBm0IMPNBQA8
gQLX
"], {{0, 0}, {15, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmIgYARhJECcEBYAU4GkkjihIWwe0WEHAGYEAt4=
"], {{0,
0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmIgYEQDxAlhASBVMEySEBHmUuJGZNugNHFCRJgFDULC
QgBoegLM
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmIgYEQDxAlhASBVMEySEBHmUuJGdNug3iYshMctSKqJ
EwIAaX8C1Q==
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGIIBSyIA4IRwqkFQSJ4TDLDSVxAkR6UaShQi4kaAQ
AG7pAuc=
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGIIBSyIA4IRwqkFQSJzTEzSNKCAByvgLw
"], {{0,
0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGKAAxkbjEC6EBZFkomzghHOYg0cQJ0dBNyLIkhxUA
X6cC1Q==
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGJADikiWEBWBRQZwQFlkkVcQJ0cgcmCxZYQQAbukC
5w==
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGJIDGJV4IhwoklcQJDXJzYLJYgo2wEABxcQLn
"], {{0,
0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 57.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 144\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.79\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQhmJGJIDGJV4IhwoklcQJ0cgcHLJk+w1LsBEWAgB1RgLw
"], {{0, 0}, {19, 19}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAhAFZcIAcUJoACaLpIo4ITxmkSxEZ/Oo4VeY
CqLjAABflQMu
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJ+BjBgBGEowM9FA8gyUKNwc3HoR7IBP5eKgFx7KfEv
SeEMANmaAuo=
"], {{0, 0}, {15, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 2.04\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJ+BjBgRAL4uWgAJAvDBLkEzCHHDWim4+dSwU6YKJIH
cXMpcSsA6dgC/A==
"], {{0, 0}, {15, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJ+IGYEAhAFZRLmIgFkUQYwwMPFohfJZPxcKgJK7KXE
v8imE+QCANlSAuo=
"], {{0, 0}, {15, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.52\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJ+IGYEAhAFZRLmIgFkUQYwwMPFohfJZPxcKgJK7KXE
v+j24+UCANmaAuo=
"], {{0, 0}, {15, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.51\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhBjBgBGEkQJwQFkBNs6gJYDYi2UycEA6z0PjECRHp
RqKEAFT3Axw=
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 152\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.51\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAhAFZcIAcUJYADXNoiaA2YhkM3FCWMxB4xMn
hMdNJAsBAFU/Axw=
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.56\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAiiFDIgTwqECSSVxQjQ2C4cKsvyIrBKGSRKi
hhsBYkEDLg==
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGZEA2QLocnCMElCNHALtc2DyaJ5hLAQDrPQVBAn
BABiQQMu
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAhAFZcIAcUJoAFkWyWjCQjjMgslicSZuIQJu
Q9JBnBCN/YnDNvxCAEDtAwo=
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAiiFDIgTwgJAqmCYJCEizKXEjci2IXmbsBAe
G7AEH24hAm4iSQgAVWMDHA==
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGYEAiiFDIgTwgJAqmCYJCEizKXEjci2IXmbsBAe
G7AEH24hItxFtBAAVasDHA==
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.70\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGaEAhATiUu8EBpAloWyiRPCYRaajcQJ0RDAbEGy
kTghHGYhqyRaCABPKgMT
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 160\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.51\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGaEAhATiUu8EBpAloWyiRPCYx413EUtALMJyUbi
hHCYhcYmTggAVasDHA==
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQB2JhIGZEA2QLocnCMElCNHALsgo0ywkLEXATlE2cEB7z
0FQQFgIAXAgDJQ==
"], {{0, 0}, {19, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2IgYARhNECaMA6AQyVpwiPAfDSdpAkTMJ/kuAUAu3sD
lw==
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.68\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQB2J+IGaEAiQmYS4WGSiNn4vDRAYwwMPFoheGCXKpCCix
lxL/IptOkAsApO4DIQ==
"], {{0, 0}, {15, 31}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 58.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2IgYARhNECaMA6AQyVpwgTMx+Ii0oSJsINiYQJmY3Eo
8cIEzCc5bgGlwQOF
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2IgYARhNECaMA4AU4mmgzRhAubTyu30sGNQhg8AmuQD
fA==
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGIIBS6IA0YTwq0XSQJkzAfCyqSRMeQDvoET4kCwMA
rYYDjg==
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGNAASolgYD8ChmjRhLC5AU0maMB3cia4Si8OIF8Zj
NsVxBwClwQOF
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGNIBFiHRhPCrRdJAmTEdz0XVQJIymAobJFqalWwGw
ngOO
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.0\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.75\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGNIBFiHRhPCrRdJAmTIT5FAmjqYBhsoXp4E5srqBI
GACztgOO
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGIIBS6IA0YTwq0XSQJkzAbDQ2acIEzMfiItKESfQH
2cJ4zMaiA78wAKjZA4U=
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGNIBFiHRhPCrRdJAmjMdsHF4hXpgOZsJUItNkCdPS
zQCr8QOF
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhBjBgBGEQgLKJE2LEBOiiUI2EhbCYhWwTkgrihGgM
qOUuaoYX2fEIACoWAzY=
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.58\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGYEAhAFZcIAcUJoAFkWyWjCQjjMgslicSZuIQKA
Ur9S013UDC+y/QYAO3QDSA==
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.89\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGYEAhAFZcIAcUJYAEwFkkrihIgwk2QhHGZR4ldk
GSzBh1sIh1lobOKEqOk3AFNuA1o=
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.89\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGYEAiiFDIgTwqECSSVxQnjMQ1NFnBCdzKRGuFEz
zMjyGwBlgANs
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.83\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGaEAhATiUu8EJosGps4IRxmodlGnBCdALXcR4sw
I0kIAE46A1o=
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.68\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGaEAhATiUu8EBpAloWyiRPCYRaajcQJ0RhQy120
CCuShQBN8gNa
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.68\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGaEAhATiUu8EBpAloWyiRPCYRaajcQJ0RhQy13U
DCtkG0kSAgBOOgNa
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.68\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGaEAhATiUu8EBpAloWyiRPCYx413EUtALMJyUbi
hHCYhcamf1gBAFNuA1o=
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.83\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJhIGaEAiQmaUI4VGAxGr8QHrOQ2MQJ4TEPTQVxQjQC
MJuQbCROCIdZaGzihABkewNj
"], {{0, 0}, {19, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.2\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.75\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2IgYARhNECaMA4AU4mmgzRhIu2gSJiA2Wi+Jk0Yj5lI
qkkTxmM2xXEJAJQ2A2o=
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.2\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.93\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGIABRUCYyIE0YC0BWhcQmTZiA+TCVaAYRL0yE+9FU
kyZMwEyoq0gTxmM2xfEIAIYdA2E=
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.2\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 176\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.75\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQh2JGIIBS6IA0YTwq0XSQJjwAZqPrQNJFmjAR5qOxSRMm
YD4WlYSFAaQsA3w=
"], {{0, 0}, {23, 23}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.5\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.74\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGYEAiiFDkgTxqMSTQdpwgNgNh6VFIcJsg4YJluY
SHsoFsahEotq/MIAD9gD3A==
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 2.04\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGZEAiAumhDpwjgATCUWK4kXJtIOioSRZJExWcI0
diMu1bQKY4rTBwDzlwPK
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 208\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.89\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGZEA1iESBfGoxJNB2nCBFyAxCZNmIB7sRhAnDAB
c8kWHgCz8agkXhgA/nQD0w==
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.71\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQhmJGLAAkTFUpAgCPLvKkcKjEooM8qQEG9PIPreMFXRdV
0xwA/UcEXg==
"], {{0, 0}, {27, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.6\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.81\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQB2JhIGYEAiiFDIgTwqECSSVxQnjMQmITJ4THPBgmSYjG
gJruolWYES0EAHMqA6E=
"], {{0, 0}, {19, 31}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.37\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxBjBgBGEYgPJJE2bEDrDJQA0hXhiH2ci2o7mCNOEB
ALRyNy3DmyrpBACx/QOU
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.68\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGYEAhAFZSID0oSxAGRVSGzShAmYTwt30xrAXILm
ItKEcZiLRYw0YQJuRuOTJgwA9sEDuA==
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.83\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGYEAiiFDkgTxqMSTQdpwgTMx6KaNOEBADCXoLmI
NGEc5mIRI02YgJvR+KQJAwALYQPB
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]},
{
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 2.04\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGaEAhATiUueMBaArArNOuKF8ZgNU4XDK4SFifQD
NcMGpgJNFWnCOMzFwqZKWCO7hGxhAN1xA7g=
"], {{0, 0}, {23, 27}}, {0,
1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.7\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.83\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQBmJxIGaEAiQmMiBNGI9KNB2kCeMxG4tK0oQHAMBcguYi
0oRxmItFjDRhAm5G45MmDAALzQPB
"], {{0, 0}, {23, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.8\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 0.995\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGDgBmJ9BjBghAEYG0Qjs5HkaauckTQAMwndRHQ2FNNWORlu
JyFkaKscACv8AyI=
"], {{0, 0}, {47, 11}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 208\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.76\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGBQBmJhBjBgBGEkQJwQFgBTgaSSOCEizCRZCIdZ1PIrNd1H
izig1D1oqsiOR7L9BgCnFwPx
"], {{0, 0}, {19, 35}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 59.9\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.52\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGBQBmJhIGYEAiiFDIgTwgJAqmCYJCEizKXEjdRyFzXDipru
orY7qekustwCAJCFA98=
"], {{0, 0}, {19, 35}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 60.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 208\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.74\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQhmJGIABRUCY6IE8KB0BWjaaTPKlBYhdMNUwHWsiQJ0Wk
naR7ZOiFJ1lSALBJBCg=
"], {{0, 0}, {27, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 60.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 208\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 2.04\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQhmJGIIBS2AB5UgR0YNFJnhQRdmHRSZ4UEfbhcCl5UkTa
iUPnsApPsqQA1OsEOg==
"], {{0, 0}, {27, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 60.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 2.04\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQhmJGLACHMPlSBHRg0Ume1ADbA1ONJ1hJlxogO2A6kGmK
pQjYRVU/AQDhwARD
"], {{0, 0}, {27, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 60.1\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 192\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.74\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQhmJGLACHMPlSBHRg0Ume1ADaBVKBrBpJB3lSA+SPgbKL
gA7SpQDJ8wQ6
"], {{0, 0}, {27, 27}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"],
TagBox[GridBox[{
{
StyleBox["\<\"AP = 64.3\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"C = 384\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
StyleBox["\<\"H = 1.48\"\>",
StripOnInput->False,
LineColor->GrayLevel[0],
FrontFaceColor->GrayLevel[0],
BackFaceColor->GrayLevel[0],
GraphicsColor->GrayLevel[0],
FontSize->10,
FontColor->GrayLevel[0]]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCwhmJGNIBFCK/4gGulAIw0v6LbgE1s0GgdBVgBLPSQQxCZ
j0uOAQwGQCuV/EwKPeBaqQBG8+vwBCMhXkdCfh2J5fBIBCMhvyLbQIr4gGul
AAx6vwIADv0NwA==
"], {{0, 0}, {59, 59}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{Automatic}}, "Rows" -> {{0}}}],
"Column"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.706501276043754*^9, 3.7065013970968857`*^9}, {
3.706501563823004*^9, 3.7065015985922213`*^9}, {3.706501651615055*^9,
3.706501691712672*^9}, 3.7065024463105707`*^9, 3.706502561900518*^9,
3.706502609424267*^9, {3.70650277717733*^9, 3.706502850456653*^9},
3.706503060304886*^9, {3.706509836158949*^9, 3.706509861809095*^9},
3.7065099281270514`*^9, {3.706509962039435*^9, 3.706509979142941*^9},
3.706510127980927*^9, {3.70651022706562*^9, 3.706510315492296*^9}, {
3.706510353775888*^9, 3.706510372591593*^9}, 3.706510412491375*^9,
3.72538879546784*^9, 3.725388933100966*^9, 3.725388965319483*^9, {
3.725389009047106*^9, 3.725389020902604*^9}, 3.725389089846552*^9,
3.725389126496458*^9, 3.725472822363267*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Dynamic Complexity", "Subchapter",
CellChangeTimes->{{3.7065110116756144`*^9, 3.706511021407154*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"GameOfLife", "=",
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706380826229354*^9, 3.706380828930551*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "@",
RowBox[{"Riffle", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "->", "40"}], ",",
RowBox[{"Mesh", "->", "True"}]}], "]"}], "&"}], "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",", "0"}],
"}"}], ",", "8"}], "]"}]}], ",", "\"\< \>\""}], "]"}]}]], "Input",
CellChangeTimes->{{3.7063410196857777`*^9, 3.706341046120693*^9}, {
3.706718242134303*^9, 3.706718249078369*^9}, {3.7253891884708*^9,
3.725389193621724*^9}},
CellID->13861],
Cell[BoxData[
TemplateBox[{GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {0, 0, 0, 1, 1}, {1, 1, 0,
1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 1, 1, 1}, {1, 0, 0, 1, 1}, {0, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {1, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {1, 1, 0, 0, 1}, {1, 0, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 0, 1}, {1, 1, 1, 0, 1}, {1, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 1, 0, 0, 1}, {1, 0, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 0, 1, 0, 1}, {1, 1, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 1, 1, 0, 0}, {1, 1, 0, 1, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0}, {1, 1, 1, 1, 0}, {1, 1, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None}, FrameTicks -> {{None, None}, {None, None}},
GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 40,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
"RowDefault"]], "Output",
CellChangeTimes->{{3.706341043336706*^9, 3.7063410465865393`*^9},
3.706718249561348*^9, {3.725389189186577*^9, 3.725389194035122*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ArrayTrim", "[",
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",", "0"}],
"}"}], ",", "36"}], "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7063417811697073`*^9, 3.706341784701529*^9},
3.706341837122093*^9, {3.706341914451704*^9, 3.706341917966834*^9}, {
3.7063419504511213`*^9, 3.706341976785347*^9}}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 1}}, {{0, 0}, {3, 3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{
3.706341785063849*^9, {3.706341918754828*^9, 3.706341977024262*^9},
3.706342810622653*^9, 3.706342873923826*^9, 3.706342928746792*^9,
3.720813808967883*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLinePlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"BDM", "/@",
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",", "0"}],
"}"}], ",", "10"}], "]"}]}]}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Medium"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"18.5", ",", "19.5"}], "}"}]}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Row", "[",
RowBox[{"Riffle", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]", "30"}]}], "]"}], "&"}], "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
"0"}], "}"}], ",", "9"}], "]"}]}], ",", "\"\< \>\""}], "]"}],
"]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}], "]"}]}],
"}"}]}], ",",
RowBox[{"DataRange", "\[Rule]",
RowBox[{"{",
RowBox[{"1.7", ",", "10"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.7063409766275*^9, 3.706341048715438*^9}, {
3.7063410998673058`*^9, 3.706341135055184*^9}, {3.706341391498094*^9,
3.7063414016712713`*^9}, 3.706343076379937*^9, {3.706343113036849*^9,
3.70634315542144*^9}, {3.706347695149911*^9, 3.70634770158386*^9}, {
3.706350821100507*^9, 3.706350825450034*^9}, {3.7063511877265387`*^9,
3.706351190705714*^9}, 3.706351357124949*^9, {3.706380471317827*^9,
3.706380577603191*^9}, {3.706380616688274*^9, 3.70638064110526*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {{{}, {},
{RGBColor[0.34398, 0.49112, 0.89936], PointSize[0.019444444444444445`],
AbsoluteThickness[3], CapForm["Butt"],
LineBox[{{1.7, 18.92890357141047}, {2.5300000000000002`,
18.980868502975127`}, {3.3600000000000003`, 18.92890357141047}, {4.19,
18.980868502975127`}, {5.0200000000000005`, 18.92890357141047}, {
5.8500000000000005`, 18.980868502975127`}, {6.680000000000001,
18.92890357141047}, {7.510000000000001, 18.980868502975127`}, {8.34,
18.92890357141047}, {9.17, 18.980868502975127`}, {10.,
18.92890357141047}}]}}, {
{RGBColor[0.34398, 0.49112, 0.89936], AbsolutePointSize[6],
AbsoluteThickness[3], CapForm["Butt"],
GeometricTransformationBox[InsetBox[
StyleBox["\<\"\[FilledCircle]\"\>",
StripOnInput->False,
FontSize->Large], {0., 0.}], {{{1.7, 18.92890357141047}}, {{
2.5300000000000002`, 18.980868502975127`}}, {{3.3600000000000003`,
18.92890357141047}}, {{4.19, 18.980868502975127`}}, {{
5.0200000000000005`, 18.92890357141047}}, {{5.8500000000000005`,
18.980868502975127`}}, {{6.680000000000001, 18.92890357141047}}, {{
7.510000000000001, 18.980868502975127`}}, {{8.34,
18.92890357141047}}, {{9.17, 18.980868502975127`}}, {{10.,
18.92890357141047}}}]}, {}}}, {}, {}, {{}, {}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{False, False},
AxesLabel->{None, None},
AxesOrigin->{1.5703125, 18.505},
DisplayFunction->Identity,
Frame->{{True, True}, {True, True}},
FrameLabel->{{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
TemplateBox[{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {0, 0,
0, 1, 1}, {1, 1, 0, 1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {1, 0, 1, 1, 1}, {1, 0,
0, 1, 1}, {0, 1, 0, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {0, 1,
0, 1, 1}, {1, 1, 0, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {1, 1,
0, 0, 1}, {1, 0, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {1, 0, 0, 0, 1}, {1, 1,
1, 0, 1}, {1, 1, 0, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 0, 1, 1}, {1, 1, 0, 0, 1}, {1, 0,
1, 0, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 0, 0, 1}, {1, 0, 1, 0, 1}, {1, 1,
1, 0, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 0, 0, 1}, {1, 1, 1, 0, 0}, {1, 1,
0, 1, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 0, 0, 0}, {1, 1, 1, 1, 0}, {1, 1,
1, 0, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"",
GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1}, {1, 1, 1, 0, 0}, {1, 1, 0, 1, 0}, {1, 1,
1, 1, 1}, {1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 30,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}, "RowDefault"], TraditionalForm], None}},
FrameStyle->{{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks->FrontEndValueCache[{{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}}, {{{{18.6,
FormBox[
TagBox[
InterpretationBox["\"18.6\"", 18.6, AutoDelete -> True],
NumberForm[#, {
DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {18.8,
FormBox[
TagBox[
InterpretationBox["\"18.8\"", 18.8, AutoDelete -> True],
NumberForm[#, {
DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {19.,
FormBox[
TagBox[
InterpretationBox["\"19.0\"", 19., AutoDelete -> True],
NumberForm[#, {
DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {19.2,
FormBox[
TagBox[
InterpretationBox["\"19.2\"", 19.2, AutoDelete -> True],
NumberForm[#, {
DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {19.4,
FormBox[
TagBox[
InterpretationBox["\"19.4\"", 19.4, AutoDelete -> True],
NumberForm[#, {
DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}}, None}, {{{2.,
FormBox["2", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {4.,
FormBox["4", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {6.,
FormBox["6", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {8.,
FormBox["8", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {10.,
FormBox["10", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}}, None}}],
GridLines->{None, {18.6, 18.8, 19., 19.2, 19.4}},
GridLinesStyle->Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
ImagePadding->All,
ImageSize->Medium,
Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotLabel->FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange->{{1.7, 10.}, {18.5, 19.5}},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
Scaled[0.02]}, {0, 0}},
Ticks->{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }]], "Output",
CellChangeTimes->{{3.706340979003392*^9, 3.706341053664742*^9}, {
3.706341100292548*^9, 3.7063411353224907`*^9}, {3.706341394616934*^9,
3.706341401984701*^9}, 3.706343078977813*^9, {3.706343114887124*^9,
3.706343155797333*^9}, {3.7063476955677967`*^9, 3.706347701901297*^9}, {
3.7063508221510983`*^9, 3.706350825762409*^9}, 3.7063511940681057`*^9,
3.70635135901433*^9, {3.706380467287833*^9, 3.7063805780125313`*^9}, {
3.706380617178789*^9, 3.70638064148246*^9}, 3.720813820726964*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">",
"2"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "<",
"5"}], ")"}]}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{"BDM", ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "9"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "9", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.70634625584094*^9, 3.706346314754644*^9}, {
3.706346411884715*^9, 3.706346436282641*^9}, {3.706346499400115*^9,
3.706346550719141*^9}, {3.706346588749531*^9, 3.706346790577525*^9}, {
3.706347077936832*^9, 3.7063470782650414`*^9}, 3.7063476766721687`*^9, {
3.706350767661248*^9, 3.70635076985332*^9}, {3.7063510349207163`*^9,
3.706351038354062*^9}, 3.706351205145174*^9, 3.7063513769228086`*^9,
3.7253893335372047`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 4.019982816742189}, {2., 4.019982816742189}, {3.,
4.019982816742189}, {4., 4.019982816742189}, {5.,
4.019982816742189}, {6., 4.019982816742189}, {7.,
4.019982816742189}, {8., 4.019982816742189}, {9.,
4.019982816742189}, {10., 4.019982816742189}}]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.8640633296328675`}, {2., 6.8074028377264035`}, {3.,
6.8074028377264035`}, {4., 6.8074028377264035`}, {5.,
6.8074028377264035`}, {6., 6.8074028377264035`}, {7.,
6.8074028377264035`}, {8., 6.8074028377264035`}, {9.,
6.8074028377264035`}, {10., 6.8074028377264035`}}]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.87411071139347}, {2., 6.8640633296328675`}, {3.,
6.8074028377264035`}, {4., 18.59627095161859}, {5.,
18.59627095161859}, {6., 18.59627095161859}, {7.,
18.59627095161859}, {8., 18.59627095161859}, {9.,
18.59627095161859}, {10., 18.59627095161859}}]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.8640633296328675`}, {2., 6.8074028377264035`}, {3.,
6.8074028377264035`}, {4., 6.8074028377264035`}, {5.,
6.8074028377264035`}, {6., 6.8074028377264035`}, {7.,
6.8074028377264035`}, {8., 6.8074028377264035`}, {9.,
6.8074028377264035`}, {10., 6.8074028377264035`}}]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.8074028377264035`}, {2., 6.8074028377264035`}, {3.,
6.8074028377264035`}, {4., 6.8074028377264035`}, {5.,
6.8074028377264035`}, {6., 6.8074028377264035`}, {7.,
6.8074028377264035`}, {8., 6.8074028377264035`}, {9.,
6.8074028377264035`}, {10., 6.8074028377264035`}}]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 4.019982816742189}, {2., 4.019982816742189}, {3.,
4.019982816742189}, {4., 4.019982816742189}, {5.,
4.019982816742189}, {6., 4.019982816742189}, {7.,
4.019982816742189}, {8., 4.019982816742189}, {9.,
4.019982816742189}, {10., 4.019982816742189}}]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.87411071139347}, {2., 6.8640633296328675`}, {3.,
6.8074028377264035`}, {4., 18.59627095161859}, {5.,
18.59627095161859}, {6., 18.59627095161859}, {7.,
18.59627095161859}, {8., 18.59627095161859}, {9.,
18.59627095161859}, {10., 18.59627095161859}}]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.8640633296328675`}, {2., 16.900030404099436`}, {3.,
16.73365644982906}, {4., 18.59627095161859}, {5.,
14.366394383270709`}, {6., 30.442644781116382`}, {7.,
30.468201413862126`}, {8., 29.563358646902465`}, {9.,
29.06163000740312}, {10., 28.50378311770636}}]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 6.8640633296328675`}, {2., 6.8640633296328675`}, {3.,
6.8074028377264035`}, {4., 18.59627095161859}, {5.,
18.59627095161859}, {6., 18.59627095161859}, {7.,
18.59627095161859}, {8., 18.59627095161859}, {9.,
18.59627095161859}, {10., 18.59627095161859}}]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 4.019982816742189}}, {{2.,
4.019982816742189}}, {{3., 4.019982816742189}}, {{4.,
4.019982816742189}}, {{5., 4.019982816742189}}, {{6.,
4.019982816742189}}, {{7., 4.019982816742189}}, {{8.,
4.019982816742189}}, {{9., 4.019982816742189}}, {{10.,
4.019982816742189}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 6.8640633296328675`}}, {{2.,
6.8074028377264035`}}, {{3., 6.8074028377264035`}}, {{4.,
6.8074028377264035`}}, {{5., 6.8074028377264035`}}, {{6.,
6.8074028377264035`}}, {{7., 6.8074028377264035`}}, {{8.,
6.8074028377264035`}}, {{9., 6.8074028377264035`}}, {{10.,
6.8074028377264035`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 6.87411071139347}}, {{2.,
6.8640633296328675`}}, {{3., 6.8074028377264035`}}, {{4.,
18.59627095161859}}, {{5., 18.59627095161859}}, {{6.,
18.59627095161859}}, {{7., 18.59627095161859}}, {{8.,
18.59627095161859}}, {{9., 18.59627095161859}}, {{10.,
18.59627095161859}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1.,
6.8640633296328675`}}, {{2., 6.8074028377264035`}}, {{3.,
6.8074028377264035`}}, {{4., 6.8074028377264035`}}, {{5.,
6.8074028377264035`}}, {{6., 6.8074028377264035`}}, {{7.,
6.8074028377264035`}}, {{8., 6.8074028377264035`}}, {{9.,
6.8074028377264035`}}, {{10., 6.8074028377264035`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1.,
6.8074028377264035`}}, {{2., 6.8074028377264035`}}, {{3.,
6.8074028377264035`}}, {{4., 6.8074028377264035`}}, {{5.,
6.8074028377264035`}}, {{6., 6.8074028377264035`}}, {{7.,
6.8074028377264035`}}, {{8., 6.8074028377264035`}}, {{9.,
6.8074028377264035`}}, {{10., 6.8074028377264035`}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 4.019982816742189}}, {{2.,
4.019982816742189}}, {{3., 4.019982816742189}}, {{4.,
4.019982816742189}}, {{5., 4.019982816742189}}, {{6.,
4.019982816742189}}, {{7., 4.019982816742189}}, {{8.,
4.019982816742189}}, {{9., 4.019982816742189}}, {{10.,
4.019982816742189}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 6.87411071139347}}, {{2.,
6.8640633296328675`}}, {{3., 6.8074028377264035`}}, {{4.,
18.59627095161859}}, {{5., 18.59627095161859}}, {{6.,
18.59627095161859}}, {{7., 18.59627095161859}}, {{8.,
18.59627095161859}}, {{9., 18.59627095161859}}, {{10.,
18.59627095161859}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 6.8640633296328675`}}, {{2.,
16.900030404099436`}}, {{3., 16.73365644982906}}, {{4.,
18.59627095161859}}, {{5., 14.366394383270709`}}, {{6.,
30.442644781116382`}}, {{7., 30.468201413862126`}}, {{8.,
29.563358646902465`}}, {{9., 29.06163000740312}}, {{10.,
28.50378311770636}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1.,
6.8640633296328675`}}, {{2., 6.8640633296328675`}}, {{3.,
6.8074028377264035`}}, {{4., 18.59627095161859}}, {{5.,
18.59627095161859}}, {{6., 18.59627095161859}}, {{7.,
18.59627095161859}}, {{8., 18.59627095161859}}, {{9.,
18.59627095161859}}, {{10.,
18.59627095161859}}}]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0., 0},
PlotRange -> {{0., 10.}, {0, 30.468201413862126`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0., 0}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 10., 20., 30.}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0., 10.}, {0, 30.468201413862126`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{
3, 0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{
0, 0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "8"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "9"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #8}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #9}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.94, 0.462, 0.162],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6266666666666667, 0.30800000000000005`,
0.10800000000000001`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.94, 0.462, 0.162]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.94, 0.462, 0.162];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.94, 0.462, 0.162], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0., 0.7, 0.7],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0., 0.4666666666666667, 0.4666666666666667],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0., 0.7, 0.7]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0., 0.7, 0.7];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0., 0.7, 0.7], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6, ",", #7,
",", #8, ",", #9}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706346268512588*^9, 3.706346291032373*^9}, {
3.706346414293704*^9, 3.706346437394537*^9}, {3.706346501326597*^9,
3.706346551939465*^9}, {3.7063465906840353`*^9, 3.706346609115367*^9}, {
3.706346645309815*^9, 3.706346791215843*^9}, 3.706347079045807*^9,
3.706347677421661*^9, 3.706350770443315*^9, 3.7063510392016907`*^9,
3.706351207655464*^9, 3.706351377687765*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">",
"2"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "<",
"5"}], ")"}]}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ByteCount", "[",
RowBox[{"Compress", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "9"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "9", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706346822570051*^9, 3.70634684369173*^9}, {
3.706347067949869*^9, 3.70634706828113*^9}, 3.706347670438767*^9, {
3.706350759837925*^9, 3.706350762513212*^9}, {3.706351048124126*^9,
3.70635105317295*^9}, {3.706351214608707*^9, 3.706351217566394*^9},
3.7063513822151527`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 88.}, {2., 88.}, {3., 88.}, {4., 88.}, {5., 88.}, {6.,
88.}, {7., 88.}, {8., 88.}, {9., 88.}, {10., 88.}}]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 88.}, {2., 88.}, {3., 88.}, {4., 88.}, {5., 88.}, {6.,
88.}, {7., 88.}, {8., 88.}, {9., 88.}, {10., 88.}}]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 96.}, {2., 96.}, {3., 88.}, {4., 104.}, {5., 104.}, {6.,
104.}, {7., 104.}, {8., 104.}, {9., 104.}, {10., 104.}}]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 88.}, {2., 88.}, {3., 88.}, {4., 88.}, {5., 88.}, {6.,
88.}, {7., 88.}, {8., 88.}, {9., 88.}, {10., 88.}}]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 88.}, {2., 88.}, {3., 88.}, {4., 88.}, {5., 88.}, {6.,
88.}, {7., 88.}, {8., 88.}, {9., 88.}, {10., 88.}}]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 88.}, {2., 88.}, {3., 88.}, {4., 88.}, {5., 88.}, {6.,
88.}, {7., 88.}, {8., 88.}, {9., 88.}, {10., 88.}}]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 96.}, {2., 96.}, {3., 88.}, {4., 104.}, {5., 104.}, {6.,
104.}, {7., 104.}, {8., 104.}, {9., 104.}, {10., 104.}}]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 96.}, {2., 88.}, {3., 104.}, {4., 104.}, {5., 96.}, {6.,
112.}, {7., 112.}, {8., 104.}, {9., 120.}, {10., 112.}}]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 96.}, {2., 96.}, {3., 88.}, {4., 104.}, {5., 104.}, {6.,
104.}, {7., 104.}, {8., 104.}, {9., 104.}, {10., 104.}}]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 88.}}, {{2., 88.}}, {{3.,
88.}}, {{4., 88.}}, {{5., 88.}}, {{6., 88.}}, {{7., 88.}}, {{8.,
88.}}, {{9., 88.}}, {{10., 88.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 88.}}, {{2., 88.}}, {{3.,
88.}}, {{4., 88.}}, {{5., 88.}}, {{6., 88.}}, {{7., 88.}}, {{8.,
88.}}, {{9., 88.}}, {{10., 88.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 96.}}, {{2., 96.}}, {{3.,
88.}}, {{4., 104.}}, {{5., 104.}}, {{6., 104.}}, {{7., 104.}}, {{8.,
104.}}, {{9., 104.}}, {{10., 104.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1., 88.}}, {{2.,
88.}}, {{3., 88.}}, {{4., 88.}}, {{5., 88.}}, {{6., 88.}}, {{7.,
88.}}, {{8., 88.}}, {{9., 88.}}, {{10., 88.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1., 88.}}, {{2.,
88.}}, {{3., 88.}}, {{4., 88.}}, {{5., 88.}}, {{6., 88.}}, {{7.,
88.}}, {{8., 88.}}, {{9., 88.}}, {{10., 88.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 88.}}, {{2., 88.}}, {{3.,
88.}}, {{4., 88.}}, {{5., 88.}}, {{6., 88.}}, {{7., 88.}}, {{8.,
88.}}, {{9., 88.}}, {{10., 88.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 96.}}, {{2., 96.}}, {{3.,
88.}}, {{4., 104.}}, {{5., 104.}}, {{6., 104.}}, {{7., 104.}}, {{8.,
104.}}, {{9., 104.}}, {{10., 104.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 96.}}, {{2., 88.}}, {{3.,
104.}}, {{4., 104.}}, {{5., 96.}}, {{6., 112.}}, {{7., 112.}}, {{8.,
104.}}, {{9., 120.}}, {{10., 112.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1., 96.}}, {{2.,
96.}}, {{3., 88.}}, {{4., 104.}}, {{5., 104.}}, {{6., 104.}}, {{7.,
104.}}, {{8., 104.}}, {{9., 104.}}, {{10.,
104.}}}]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}}, AxesOrigin -> {0., 86.39999999999999},
PlotRange -> {{0., 10.}, {88., 120.}}, PlotRangeClipping -> True,
ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0., 86.39999999999999},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {90., 100., 110., 120.}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compress\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0., 10.}, {88., 120.}}, PlotRangeClipping -> True,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{
3, 0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{
0, 0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "8"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "9"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #8}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #9}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.94, 0.462, 0.162],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6266666666666667, 0.30800000000000005`,
0.10800000000000001`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.94, 0.462, 0.162]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.94, 0.462, 0.162];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.94, 0.462, 0.162], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0., 0.7, 0.7],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0., 0.4666666666666667, 0.4666666666666667],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0., 0.7, 0.7]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0., 0.7, 0.7];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0., 0.7, 0.7], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6, ",", #7,
",", #8, ",", #9}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706346827525077*^9, 3.706346844397978*^9},
3.706347068967946*^9, 3.7063476712062597`*^9, 3.7063507630766687`*^9,
3.706351053752795*^9, 3.70635121837792*^9, 3.706351382867811*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">",
"2"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "<",
"5"}], ")"}]}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"Entropy", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "9"}], "]"}]}], "&"}],
"/@", "cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "9", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706346869350584*^9, 3.7063468716723843`*^9}, {
3.706347056282382*^9, 3.706347056649324*^9}, 3.706347665911482*^9, {
3.70635074918443*^9, 3.7063507527465563`*^9}, {3.706351061322267*^9,
3.7063510615118017`*^9}, {3.706351224958603*^9, 3.706351227207695*^9},
3.7063513876734657`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.}, {2., 0.}, {3., 0.}, {4., 0.}, {5., 0.}, {6., 0.}, {
7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}}]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6931471805599453}, {2., 0.}, {3., 0.}, {4., 0.}, {5.,
0.}, {6., 0.}, {7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}}]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6931471805599453}, {2., 1.0986122886681098`}, {3.,
0.}, {4., 0.6365141682948128}, {5., 0.6365141682948128}, {6.,
0.6365141682948128}, {7., 0.6365141682948128}, {8.,
0.6365141682948128}, {9., 0.6365141682948128}, {10.,
0.6365141682948128}}]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6931471805599453}, {2., 0.}, {3., 0.}, {4., 0.}, {5.,
0.}, {6., 0.}, {7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}}]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.}, {2., 0.}, {3., 0.}, {4., 0.}, {5., 0.}, {6., 0.}, {
7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}}]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.}, {2., 0.}, {3., 0.}, {4., 0.}, {5., 0.}, {6., 0.}, {
7., 0.}, {8., 0.}, {9., 0.}, {10., 0.}}]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6365141682948128}, {2., 0.6931471805599453}, {3.,
0.}, {4., 0.6931471805599453}, {5., 0.6931471805599453}, {6.,
0.6931471805599453}, {7., 0.6931471805599453}, {8.,
0.6931471805599453}, {9., 0.6931471805599453}, {10.,
0.6931471805599453}}]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6365141682948128}, {2., 0.6365141682948128}, {3.,
0.6365141682948128}, {4., 0.6365141682948128}, {5.,
0.6365141682948128}, {6., 1.0549201679861442`}, {7.,
1.0549201679861442`}, {8., 0.6730116670092565}, {9.,
1.351783994289646}, {10., 0.6730116670092565}}]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[{{1., 0.6365141682948128}, {2., 0.6931471805599453}, {3.,
0.}, {4., 0.6931471805599453}, {5., 0.6931471805599453}, {6.,
0.6931471805599453}, {7., 0.6931471805599453}, {8.,
0.6931471805599453}, {9., 0.6931471805599453}, {10.,
0.6931471805599453}}]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.}}, {{2., 0.}}, {{3.,
0.}}, {{4., 0.}}, {{5., 0.}}, {{6., 0.}}, {{7., 0.}}, {{8., 0.}}, {{
9., 0.}}, {{10., 0.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.6931471805599453}}, {{2.,
0.}}, {{3., 0.}}, {{4., 0.}}, {{5., 0.}}, {{6., 0.}}, {{7., 0.}}, {{
8., 0.}}, {{9., 0.}}, {{10., 0.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.6931471805599453}}, {{2.,
1.0986122886681098`}}, {{3., 0.}}, {{4., 0.6365141682948128}}, {{5.,
0.6365141682948128}}, {{6., 0.6365141682948128}}, {{7.,
0.6365141682948128}}, {{8., 0.6365141682948128}}, {{9.,
0.6365141682948128}}, {{10., 0.6365141682948128}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1.,
0.6931471805599453}}, {{2., 0.}}, {{3., 0.}}, {{4., 0.}}, {{5.,
0.}}, {{6., 0.}}, {{7., 0.}}, {{8., 0.}}, {{9., 0.}}, {{10.,
0.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1., 0.}}, {{2., 0.}}, {{
3., 0.}}, {{4., 0.}}, {{5., 0.}}, {{6., 0.}}, {{7., 0.}}, {{8.,
0.}}, {{9., 0.}}, {{10., 0.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.}}, {{2., 0.}}, {{3.,
0.}}, {{4., 0.}}, {{5., 0.}}, {{6., 0.}}, {{7., 0.}}, {{8., 0.}}, {{
9., 0.}}, {{10., 0.}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.6365141682948128}}, {{2.,
0.6931471805599453}}, {{3., 0.}}, {{4., 0.6931471805599453}}, {{5.,
0.6931471805599453}}, {{6., 0.6931471805599453}}, {{7.,
0.6931471805599453}}, {{8., 0.6931471805599453}}, {{9.,
0.6931471805599453}}, {{10., 0.6931471805599453}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], {{{1., 0.6365141682948128}}, {{2.,
0.6365141682948128}}, {{3., 0.6365141682948128}}, {{4.,
0.6365141682948128}}, {{5., 0.6365141682948128}}, {{6.,
1.0549201679861442`}}, {{7., 1.0549201679861442`}}, {{8.,
0.6730116670092565}}, {{9., 1.351783994289646}}, {{10.,
0.6730116670092565}}}]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], {{{1.,
0.6365141682948128}}, {{2., 0.6931471805599453}}, {{3., 0.}}, {{4.,
0.6931471805599453}}, {{5., 0.6931471805599453}}, {{6.,
0.6931471805599453}}, {{7., 0.6931471805599453}}, {{8.,
0.6931471805599453}}, {{9., 0.6931471805599453}}, {{10.,
0.6931471805599453}}}]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0., 0},
PlotRange -> {{0., 10.}, {0, 1.351783994289646}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0., 0}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 0.25, 0.5, 0.75, 1., 1.25}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0., 10.}, {0, 1.351783994289646}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{
3, 0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2,
2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{
0, 0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "8"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "9"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #8}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #9}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.94, 0.462, 0.162],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6266666666666667, 0.30800000000000005`,
0.10800000000000001`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.94, 0.462, 0.162]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.94, 0.462, 0.162];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.94, 0.462, 0.162], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0., 0.7, 0.7],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0., 0.4666666666666667, 0.4666666666666667],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0., 0.7, 0.7]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0., 0.7, 0.7];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0., 0.7, 0.7], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6, ",", #7,
",", #8, ",", #9}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706346872583075*^9, 3.706347057364575*^9,
3.7063476666466*^9, 3.706350753312153*^9, 3.706351064929659*^9,
3.706351227761508*^9, 3.706351388323793*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "9", "]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"30", ",", "30"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], ",",
RowBox[{"Map", "[",
RowBox[{"ArrayTrim", ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "9"}], "]"}], "&"}],
"/@",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.",
" ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
">", "2"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"<", "5"}], ")"}]}], "&"}]}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ",", "1", ",", "1", ",", "1", ",", "\"\<\>\""}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706346916612973*^9, 3.7063469963052397`*^9},
3.70635072223147*^9}],
Cell[BoxData[
TagBox[GridBox[{
{
TemplateBox[{"1","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"2","\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"3","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"4","\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"5","\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}}, {{0, 0}, {2, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"6","\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}}, {{0, 0}, {1, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0,
0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}}, {{0, 0}, {3, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}, {{3,
0}, {3, 1}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"7","\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {1, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {1, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"8","\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 0}, {0, 0, 1}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0}, {0, 1, 1, 0}, {1, 0, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {1, 1, 0, 1, 1}}, {{0,
0}, {5, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0,
0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 1, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 0,
1, 0, 1}, {0, 0, 0, 1, 0, 0, 0}, {1, 0, 1, 0, 1, 0, 1}, {1, 1, 0,
0, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {7, 7}}, {{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0,
4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7,
1}}, {{0, 0}, {7, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"9","\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 1}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.7063469194307003`*^9, 3.706346997841922*^9},
3.706350723613173*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]], "Input",
CellChangeTimes->{3.720813776130151*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.720813764429096*^9, 3.720813776426079*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "\[Equal]",
"6"}], ")"}], "&"}]}], "]"}]}]], "Input",
CellChangeTimes->{3.720813841276223*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "1"}], "}"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.720813734431532*^9, 3.720813841548353*^9,
3.725389712353477*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"40", ",", "40"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "28"}], "]"}]}]}], "&"}], "/@",
"cases"}]], "Input",
CellChangeTimes->{{3.7208138699823723`*^9, 3.7208139162973557`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{
0, 0}, {4, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {1, 0, 1, 1, 0}, {1, 1, 0,
0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 0, 1, 0, 0}, {0, 0, 1, 1, 0}, {1, 1, 0,
0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {1, 1, 1, 1, 0}, {0, 1, 1,
1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1, 1}, {1, 0, 0, 0, 0, 1}, {0, 0, 1, 1, 0,
0}, {1, 0, 0, 1, 0, 1}, {1, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{0,
0}, {6, 6}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6, 6}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 0, 0}, {1, 1, 1, 1, 1, 1}, {1, 0,
0, 0, 1, 1}}, {{0, 0}, {6, 7}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 7}, {6, 7}}, {{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0,
4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6,
1}}, {{0, 0}, {6, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6, 7}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 1, 1, 0, 0}, {1, 1, 0, 0, 1}, {0, 0, 0,
1, 1}, {0, 1, 1, 1, 1}, {0, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1,
0}, {1, 0, 1, 0, 0, 1}, {0, 0, 1, 1, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 0}, {1, 1, 1, 1, 1, 0, 1}, {0, 0, 0, 1, 0, 1, 1}, {0, 0, 0, 1,
1, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0,
3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}, {{7, 0}, {7, 6}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1,
1, 1, 0}, {1, 0, 1, 1, 0, 0, 0}, {0, 1, 0, 0, 1, 1, 1}, {0, 1, 0, 0,
1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 7}, {7, 7}}, {{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0,
4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7,
1}}, {{0, 0}, {7, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1}, {1, 1,
1, 1, 0, 1, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 1}, {0, 1, 1, 1, 1, 0, 1,
1}, {0, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {8,
7}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 7}, {8, 7}}, {{0, 6}, {8, 6}}, {{0, 5}, {8, 5}}, {{0,
4}, {8, 4}}, {{0, 3}, {8, 3}}, {{0, 2}, {8, 2}}, {{0, 1}, {8,
1}}, {{0, 0}, {8, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0}, {1, 1,
0, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 0,
1}, {0, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {8,
7}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 7}, {8, 7}}, {{0, 6}, {8, 6}}, {{0, 5}, {8, 5}}, {{0,
4}, {8, 4}}, {{0, 3}, {8, 3}}, {{0, 2}, {8, 2}}, {{0, 1}, {8,
1}}, {{0, 0}, {8, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1}, {
1, 0, 1, 1, 0, 1, 1, 0, 0}, {1, 0, 0, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 0,
1, 1, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {9, 7}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 0, 0, 1}, {
1, 1, 0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1, 0, 0, 1, 1, 0}, {0, 0, 1, 0,
0, 1, 0, 0, 0}, {0, 1, 1, 0, 1, 1, 1, 1, 1}, {0, 1, 0, 0, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0,
5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9,
2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2, 8}}, {{3,
0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6, 0}, {6,
8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 0,
0, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1}, {1, 0, 0, 1, 1, 0, 0, 0,
1, 0, 0}, {1, 0, 0, 1, 0, 1, 1, 0, 0, 0, 1}, {0, 0, 1, 1, 1, 1, 1, 1,
0, 1, 1}, {1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11, 6}}, {{
0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11, 3}}, {{0, 2}, {
11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2, 8}}, {{3,
0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6, 0}, {6,
8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9, 8}}, {{10,
0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
0, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1,
1, 0, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 1, 0, 1, 1,
1, 1, 0}, {0, 1, 1, 0, 1, 1, 1, 0, 0, 0, 1}, {0, 0, 1, 1, 0, 1, 1, 1,
1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {11, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {11, 10}}, {{0, 9}, {11, 9}}, {{0, 8}, {11,
8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11, 6}}, {{0, 5}, {11, 5}}, {{0,
4}, {11, 4}}, {{0, 3}, {11, 3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11,
1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{
3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{
10, 0}, {10, 10}}, {{11, 0}, {11, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1}, {0, 0, 1,
1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {12, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {12, 8}}, {{0, 7}, {12, 7}}, {{0, 6}, {12, 6}}, {{
0, 5}, {12, 5}}, {{0, 4}, {12, 4}}, {{0, 3}, {12, 3}}, {{0, 2}, {
12, 2}}, {{0, 1}, {12, 1}}, {{0, 0}, {12, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2, 8}}, {{3,
0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6, 0}, {6,
8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9, 8}}, {{10,
0}, {10, 8}}, {{11, 0}, {11, 8}}, {{12, 0}, {12, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1,
1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0}, {0, 1, 1,
1, 0, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 1, 1}, {0,
1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {12, 10}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {12, 10}}, {{0, 9}, {12, 9}}, {{0, 8}, {12,
8}}, {{0, 7}, {12, 7}}, {{0, 6}, {12, 6}}, {{0, 5}, {12, 5}}, {{0,
4}, {12, 4}}, {{0, 3}, {12, 3}}, {{0, 2}, {12, 2}}, {{0, 1}, {12,
1}}, {{0, 0}, {12, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{
3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{
10, 0}, {10, 10}}, {{11, 0}, {11, 10}}, {{12, 0}, {12, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 0, 1, 0, 0}, {1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1}, {1, 1, 0,
0, 0, 1, 0, 1, 1, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1}, {0,
1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {12, 10}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {12, 10}}, {{0, 9}, {12, 9}}, {{0, 8}, {12,
8}}, {{0, 7}, {12, 7}}, {{0, 6}, {12, 6}}, {{0, 5}, {12, 5}}, {{0,
4}, {12, 4}}, {{0, 3}, {12, 3}}, {{0, 2}, {12, 2}}, {{0, 1}, {12,
1}}, {{0, 0}, {12, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{
3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{
10, 0}, {10, 10}}, {{11, 0}, {11, 10}}, {{12, 0}, {12, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
0, 0, 1, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 0,
1, 0, 1, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {0,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {12, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {12, 9}}, {{0, 8}, {12, 8}}, {{0, 7}, {12, 7}}, {{
0, 6}, {12, 6}}, {{0, 5}, {12, 5}}, {{0, 4}, {12, 4}}, {{0, 3}, {
12, 3}}, {{0, 2}, {12, 2}}, {{0, 1}, {12, 1}}, {{0, 0}, {12, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2, 9}}, {{3,
0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6, 0}, {6,
9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9, 9}}, {{10,
0}, {10, 9}}, {{11, 0}, {11, 9}}, {{12, 0}, {12, 9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1,
1, 1, 1, 0, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 0, 1, 0, 0,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 0}, {1, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1}, {1,
0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 1, 0, 0,
1, 1, 1, 1}, {0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}}, {{0, 0}, {14, 11}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 11}, {14, 11}}, {{0, 10}, {14, 10}}, {{0, 9}, {14,
9}}, {{0, 8}, {14, 8}}, {{0, 7}, {14, 7}}, {{0, 6}, {14, 6}}, {{0,
5}, {14, 5}}, {{0, 4}, {14, 4}}, {{0, 3}, {14, 3}}, {{0, 2}, {14,
2}}, {{0, 1}, {14, 1}}, {{0, 0}, {14, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 11}}, {{1, 0}, {1, 11}}, {{2, 0}, {2, 11}}, {{
3, 0}, {3, 11}}, {{4, 0}, {4, 11}}, {{5, 0}, {5, 11}}, {{6, 0}, {6,
11}}, {{7, 0}, {7, 11}}, {{8, 0}, {8, 11}}, {{9, 0}, {9, 11}}, {{
10, 0}, {10, 11}}, {{11, 0}, {11, 11}}, {{12, 0}, {12, 11}}, {{13,
0}, {13, 11}}, {{14, 0}, {14, 11}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 0,
1, 1, 1, 0, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1,
0}, {1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0}, {1, 1, 0, 1, 0, 0, 1,
0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 0,
1, 1, 1, 1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1}}, {{0, 0}, {14, 11}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 11}, {14, 11}}, {{0, 10}, {14, 10}}, {{0, 9}, {14,
9}}, {{0, 8}, {14, 8}}, {{0, 7}, {14, 7}}, {{0, 6}, {14, 6}}, {{0,
5}, {14, 5}}, {{0, 4}, {14, 4}}, {{0, 3}, {14, 3}}, {{0, 2}, {14,
2}}, {{0, 1}, {14, 1}}, {{0, 0}, {14, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 11}}, {{1, 0}, {1, 11}}, {{2, 0}, {2, 11}}, {{
3, 0}, {3, 11}}, {{4, 0}, {4, 11}}, {{5, 0}, {5, 11}}, {{6, 0}, {6,
11}}, {{7, 0}, {7, 11}}, {{8, 0}, {8, 11}}, {{9, 0}, {9, 11}}, {{
10, 0}, {10, 11}}, {{11, 0}, {11, 11}}, {{12, 0}, {12, 11}}, {{13,
0}, {13, 11}}, {{14, 0}, {14, 11}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 0,
0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 0, 0,
1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0}, {1, 1, 1, 1,
1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1,
1, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {15, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15, 5}}, {{0,
4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15, 2}}, {{0, 1}, {15,
1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{
3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{
10, 0}, {10, 10}}, {{11, 0}, {11, 10}}, {{12, 0}, {12, 10}}, {{13,
0}, {13, 10}}, {{14, 0}, {14, 10}}, {{15, 0}, {15, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1,
0, 1, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 0,
1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 0, 1, 1, 1,
0, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0,
0, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {13, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13,
8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0,
4}, {13, 4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{
3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{
10, 0}, {10, 10}}, {{11, 0}, {11, 10}}, {{12, 0}, {12, 10}}, {{13,
0}, {13, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{0, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1,
0, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 0, 1, 1, 0, 1,
1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
14, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {14, 9}}, {{0, 8}, {14, 8}}, {{0, 7}, {14, 7}}, {{
0, 6}, {14, 6}}, {{0, 5}, {14, 5}}, {{0, 4}, {14, 4}}, {{0, 3}, {
14, 3}}, {{0, 2}, {14, 2}}, {{0, 1}, {14, 1}}, {{0, 0}, {14, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2, 9}}, {{3,
0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6, 0}, {6,
9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9, 9}}, {{10,
0}, {10, 9}}, {{11, 0}, {11, 9}}, {{12, 0}, {12, 9}}, {{13, 0}, {
13, 9}}, {{14, 0}, {14, 9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 0,
0, 0, 1, 1, 0, 1, 1, 1, 0, 0, 1}, {1, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1,
0, 1, 0}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 0,
1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1}}, {{0, 0}, {15, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {15, 9}}, {{0, 8}, {15, 8}}, {{0, 7}, {15, 7}}, {{
0, 6}, {15, 6}}, {{0, 5}, {15, 5}}, {{0, 4}, {15, 4}}, {{0, 3}, {
15, 3}}, {{0, 2}, {15, 2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2, 9}}, {{3,
0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6, 0}, {6,
9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9, 9}}, {{10,
0}, {10, 9}}, {{11, 0}, {11, 9}}, {{12, 0}, {12, 9}}, {{13, 0}, {
13, 9}}, {{14, 0}, {14, 9}}, {{15, 0}, {15, 9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{40, 40},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.720813911408864*^9, 3.7208139174359903`*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"BDM", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "28"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}], "]"}]}],
"}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.72081384779148*^9, 3.720813853947661*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7EXeWZ0/biXtABVw2Hywx2zpDCMonwONL4DG
F0HjS6DxZdD4Cmh8JTS+ChpfDY2vgcbXQuProPH10PgGaHxDNL4RGt8YjW+C
xjdF45uh8c3R+BZofEs0vhUa3xqNb4PGt4XzARR/fwA=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7B86W15eM9/QASrgoNa0YI5GgjWUz4HGF0Dj
i6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+MxjdB
45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AOADY70=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7H99PL3qQJ2BA1TAwTP79jHuzzZQPoeD1LG+
TTzXbKF8AQcVzoOm0sccoHwRBw/1r5/aku2gfAmHbhdFnSpJmLyMw30e1bs2
QfZQvoLD4t72Nb48VlC+ksOxy+Hb2p9aQ/kqDrWvGj+6RsH4ag5X7mxa9ZgL
xtdw+MeVeOTrYph7tBxYz8a5tf6D8XUcvmyqclAJ9YPy9RwyEyds1xWF8Q0c
HHaEaiSm+UD5hg5aHGFHRY/EQPlGDiZrVPt/iML4xg6M+QsF/R5HQ/kmDtcN
Xm1/EJgK5Zs6PAneI+cXmwLlmzn8n3vcINYNJm/uYPniSlzGEZi8hcOCsFkz
sxbD+JYOLgsv3pyTBVNv5eA3sUFBtBgmb+2we0s059U5ML6NQ1OfhrL8k2Qo
39ZhZkdP5tw3yQ4AH4N1+A==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7EXeWZ0/biXtABVw2Hywx2zpDCMonwONL4DG
F0HjS6DxZdD4Cmh8JTS+ChpfDY2vgcbXQuProPH10PgGaHxDNL4RGt8YjW+C
xjdF45uh8c3R+BZofEs0vhUa3xqNb4PGt4XzARR/fwA=
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9iLvrM4ft5J2gAo4bD7YY7Z0hhGUz4HG
F0Dji6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+M
xjdB45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AB9bfwI=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9g+dLS+vmW/oABVwUGtaMEcjwRrK50Dj
C6DxRdD4Emh8GTS+AhpfCY2vgsZXQ+NroPG10Pg6aHw9NL4BGt8QjW+ExjdG
45ug8U3R+GZofHM0vgUa3xKNb4XGt0bj26DxbeF8AOrfY78=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9r8+nl51oM7AASrg4Jl9+xj3Zxson8NB
6ljfJp5rtlC+gIMK50FT6WMOUL6Ig4f6109tyXZQvoRDt4uiTpUkTF7G4T6P
6l2bIHsoX8FhcW/7Gl8eKyhfyeHY5fBt7U+toXwVh9pXjR9do2B8NYcrdzat
eswF42s4/ONKPPJ1Mcw9Wg6sZ+PcWv/B+DoOXzZVOaiE+kH5eg6ZiRO264rC
+AYODjtCNRLTfKB8QwctjrCjokdioHwjB5M1qv0/RGF8YwfG/IWCfo+joXwT
h+sGr7Y/CEyF8k0dngTvkfOLTYHyzRz+zz1uEOsGkzd3sHxxJS7jCEzewmFB
2KyZWYthfEsHl4UXb87Jgqm3cvCb2KAgWgyTt3bYvSWa8+ocGN/GoalPQ1n+
STKUb+sws6Mnc+6bZAcAKl91+g==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9iLvrM4ft5J2gAo4bD7YY7Z0hhGUz4HG
F0Dji6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+M
xjdB45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AB9bfwI=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.5625000000000001, 0},
PlotRange -> {{1., 29.}, {0, 171.33164683287953`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.5625000000000001, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 50., 100., 150.}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 29.}, {0, 171.33164683287953`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 1}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.97, 0.606, 0.081]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.91, 0.318, 0.243]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.448, 0.69232, 0.1538]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.720813678757544*^9, {3.7208138278122377`*^9, 3.720813854328464*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "\[Equal]",
"6"}], ")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"BDM", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "28"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347164339534*^9, 3.706347184844146*^9}, {
3.706347232102116*^9, 3.706347235399654*^9}, {3.706347268221066*^9,
3.706347280226459*^9}, 3.706347659669405*^9, {3.7063477254623404`*^9,
3.706347732233123*^9}, 3.706350742553295*^9, {3.7063510179654713`*^9,
3.7063510202009773`*^9}, 3.706351234592885*^9, 3.706351396133909*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7EXeWZ0/biXtABVw2Hywx2zpDCMonwONL4DG
F0HjS6DxZdD4Cmh8JTS+ChpfDY2vgcbXQuProPH10PgGaHxDNL4RGt8YjW+C
xjdF45uh8c3R+BZofEs0vhUa3xqNb4PGt4XzARR/fwA=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7B86W15eM9/QASrgoNa0YI5GgjWUz4HGF0Dj
i6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+MxjdB
45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AOADY70=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7H99PL3qQJ2BA1TAwTP79jHuzzZQPoeD1LG+
TTzXbKF8AQcVzoOm0sccoHwRBw/1r5/aku2gfAmHbhdFnSpJmLyMw30e1bs2
QfZQvoLD4t72Nb48VlC+koPS9HqPSAsYX8Wh9lXjR9coayhfzeHKnU2rHnPB
+BoO/7gSj3xdDHOPlgPr2Ti31n8wvo7Dl01VDiqhflC+nkNm4oTtuqIwvoGD
w45QjcQ0Hyjf0EGLI+yo6JEYKN/IwWSNav8PURjf2IExf6Gg3+NoKN/E4brB
q+0PAlOhfFOHJ8F75PxiU6B8M4f/c48bxLrB5M0dLF9cics4ApO3cFgQNmtm
1mIY39LBZeHFm3OyYOqB4TB54bSWe8lQvrXD7i3RnFfnwNTbODT1aSjLP4HJ
2zo80Pq2UVwuxQEAy5J0Yg==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7EXeWZ0/biXtABVw2Hywx2zpDCMonwONL4DG
F0HjS6DxZdD4Cmh8JTS+ChpfDY2vgcbXQuProPH10PgGaHxDNL4RGt8YjW+C
xjdF45uh8c3R+BZofEs0vhUa3xqNb4PGt4XzARR/fwA=
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9iLvrM4ft5J2gAo4bD7YY7Z0hhGUz4HG
F0Dji6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+M
xjdB45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AB9bfwI=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9g+dLS+vmW/oABVwUGtaMEcjwRrK50Dj
C6DxRdD4Emh8GTS+AhpfCY2vgsZXQ+NroPG10Pg6aHw9NL4BGt8QjW+ExjdG
45ug8U3R+GZofHM0vgUa3xKNb4XGt0bj26DxbeF8AOrfY78=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9r8+nl51oM7AASrg4Jl9+xj3Zxson8NB
6ljfJp5rtlC+gIMK50FT6WMOUL6Ig4f6109tyXZQvoRDt4uiTpUkTF7G4T6P
6l2bIHsoX8FhcW/7Gl8eKyhfyUFper1HpAWMr+JQ+6rxo2uUNZSv5nDlzqZV
j7lgfA2Hf1yJR74uhrlHy4H1bJxb6z8YX8fhy6YqB5VQPyhfzyEzccJ2XVEY
38DBYUeoRmKaD5Rv6KDFEXZU9EgMlG/kYLJGtf+HKIxv7MCYv1DQ73E0lG/i
cN3g1fYHgalQvqnDk+A9cn6xKVC+mcP/uccNYt1g8uYOli+uxGUcgclbOCwI
mzUzazGMb+ngsvDizTlZMPXAcJi8cFrLvWQo39ph95ZozqtzYOptHJr6NJTl
n8DkbR0eaH3bKC6X4gAA1m50ZA==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9iLvrM4ft5J2gAo4bD7YY7Z0hhGUz4HG
F0Dji6DxJdD4Mmh8BTS+EhpfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8IjW+M
xjdB45ui8c3Q+OZofAs0viUa3wqNb43Gt0Hj28L5AB9bfwI=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.5625000000000001, 0},
PlotRange -> {{1., 29.}, {0, 171.33164683287953`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.5625000000000001, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 50., 100., 150.}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 29.}, {0, 171.33164683287953`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.7063471885747538`*^9, {3.7063472330447483`*^9, 3.706347235899871*^9}, {
3.7063472711204367`*^9, 3.706347280741514*^9}, 3.7063476603263607`*^9, {
3.7063477260687428`*^9, 3.706347732749756*^9}, 3.706350743250288*^9,
3.7063510208208723`*^9, 3.706351236729658*^9, 3.706351397490971*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "\[Equal]",
"6"}], ")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"Entropy", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "28"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347164339534*^9, 3.706347184844146*^9}, {
3.706347232102116*^9, 3.706347235399654*^9}, {3.7063472961443453`*^9,
3.7063472985035143`*^9}, 3.706347650909421*^9, 3.706347755641548*^9,
3.706350572440419*^9, {3.7063510042195597`*^9, 3.706351004488605*^9}, {
3.706351262158578*^9, 3.70635126536101*^9}, 3.706351410031754*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdyDsKg1AARNGHlaVFCgsFIyIS5OE3/lGyBJcgpHbXabW2EBVFyB0YhjPP
Yey/ihDC3HvsmbkV/+mmYlk/8nf9KqzBD1iHDdiCbdiBXdiDX7APSziAQziC
YziBU/gNZ3AOF3AJV3ANN7c3nVWSWQ==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7LmZ11a9mvzRHirg8N7y1z8nvW9QPgcaXwCN
L4LGl0Djy6DxFdD4Smh8FTS+GhpfA42vhcbXQeProfEN0PiGaHwjNL4xGt8E
jW+KxjdD45uj8S3Q+JZofCs0vjUa3waNbwvnAwD1LJf7
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7LmZ11a9mvzRHirgULza2n7Tog9QPgcaXwCN
L+Lw3vLXPye9b1C+BBpfxsG49+13xwM/oXwFB5aDoVWrf/yA8pUcmBS0fnGv
/gPlqzhwJDX+8nL7CuWrOTC/UPwxKwDG10BTr+WwuOxop8v331C+jkN4lNG6
IqX/UL4eGt8AjW8I9Q+DA4RvhMY3djiVfej3cX9GKN8ETd4UTd7MQSx06+6N
2UxQvrkDJHxh8hYOPub12x/rMUP5lg6+B8TSTurA1FuhqbdGM88GTd7WYQX/
DLk59f/sAayHecY=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGCQBWIQDQEf7BlQgYNCF8e3oLgnUHEONL4AGl8EjS+BxpdB
4yug8ZXQ+CpofDU0vgYaXwuNr4PG10PjG6DxDdH4Rmh8YzS+CRrfFI1vhsY3
R+NboPEt0fhWaHxrNL4NGt8WzgcAnVdwAQ==
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxdyL0KgmAYhuE3XRodHBoMUiQk4iN/85ekQ/AQhObO2lVnh/AbVOi+4Rmu
x+2/3ccUkbPeQc+Qrekl/7VjMf/ealj/I2zBNnyCHfgCe7APX+EAvsF3WMEP
OIQjOIYTOIUz+AnncAGXcAXXcLN7Aagxkls=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9tzMa6teTf5oDxVweG/565+T3jconwON
L4DGF0HjS6DxZdD4Cmh8JTS+ChpfDY2vgcbXQuProPH10PgGaHxDNL4RGt8Y
jW+CxjdF45uh8c3R+BZofEs0vhUa3xqNb4PGt4XzAQAXl/0=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9tzMa6teTf5oDxVwKF5tbb9p0QconwON
L4DGF3F4b/nrn5PeNyhfAo0v42Dc+/a744GfUL6CA8vB0KrVP35A+UoOTApa
v7hX/4HyVRw4khp/ebl9hfLVHJhfKP6YFQDja6Cp13JYXHa00+X7byhfxyE8
ymhdkdJ/KF8PjW+AxjeE+ofBAcI3QuMbO5zKPvT7uD8jlG+CJm+KJm/mIBa6
dffGbCYo39wBEr4weQsHH/P67Y/1mKF8SwffA2JpJ3Vg6q3Q1FujmWeDJm/r
sIJ/htyc+n/2ALdjecg=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGCQBWJGIGZigIEP9gyowEGhi+NbUNwTqDgHGl8AjS+CxpdA
48ug8RXQ+EpofBU0vhoaXwONr4XG10Hj66HxDdD4hmh8IzS+MRrfBI1visY3
Q+Obo/Et0PiWaHwrNL41Gt8GjW8L5wMAqDNwAw==
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.5625000000000001, 0},
PlotRange -> {{1., 29.}, {0, 2.3978952727983707`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.5625000000000001, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 0.5, 1., 1.5, 2., 2.5}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 29.}, {0, 2.3978952727983707`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.7063471885747538`*^9, {3.7063472330447483`*^9, 3.706347235899871*^9},
3.7063473025344877`*^9, 3.706347651479806*^9, 3.706347756230708*^9,
3.706350576323539*^9, 3.706351005912952*^9, 3.7063512658408203`*^9,
3.7063514106049957`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "\[Equal]",
"6"}], ")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ByteCount", "[",
RowBox[{"Compress", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "28"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347305092827*^9, 3.706347308243699*^9},
3.7063476536238747`*^9, 3.706347744542691*^9, 3.706350586903344*^9, {
3.706351009327491*^9, 3.706351013860721*^9}, {3.706351242550303*^9,
3.7063512453792057`*^9}, 3.7063514068468723`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdyL0KQGAYhuEvk9FgMFBIkiT//+IYDAajMjt1h4B8Ge63nu6u19nP5VCE
ENazt99d09d1lg/ZTVaFNViHDdiEbdiFPdiHAziEIziGEziFMziHC7iEK7iG
G7iFO7iHB3j8fQMq6x/7
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdyL0KQGAYhuEvk9FgMFBIkiT//+IYTDIqs1N3CMiX4X7r6e56nf1cDkUI
YT17+901fV1n+ZDdZFVYg3XYgE3Yhl3Yg304gEM4gmM4gVM4g3O4gEu4gmu4
gVu4g3t4gMffNy5vH/0=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzLsKwjAYQOHg5Ojg4KCgIiIiYlvvF9pncJJSROtl9dV9BJUeHE4gfJz8
SXrl6/iohRA63/2zWu+08pRxgDnW1Q11Ewtsqdt4xq66rx7o/VA90v0xXnCC
V5yqZ1hipI7xhgneca5eqJf4xJXma8036q16p97rv8O/P5jJILo=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdyL0KQGAYhuEvk9FgMFBIkiT//+IYDAajMjt1h4B8Ge63nu6u19nP5VCE
ENazt99d09d1lg/ZTVaFNViHDdiEbdiFPdiHAziEIziGEziFMziHC7iEK7iG
G7iFO7iHB3j8fQMq6x/7
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxdyDsKg2AQReHRNJYWFhYRVCSIhOAjvhVdg4VFSsHarbsEBX9TnIHL4Rtv
2ab1ISLOOe2cLvftw9V5VA/Vn6oBm7AF2/ATdmEfDuAXHMIR/IY/cAwncApn
8BfO4QIu4Qqu4QZu4Q7u/z4ANccf/Q==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxdyDsKg2AQReHRNJYWFhYRVCSIhOAjvhVdg5WkFKzduktQ8DfFGbgcvvGW
bVofIuKc087pct8+XJ1H9VD9qRqwCVuwDT9hF/bhAH7BIRzBb/gDx3ACp3AG
f+EcLuASruAabuAW7uD+7wM5Sx//
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxdzMsKAVEcgPGDzSwtLCyoIUmSmHE34hmsJIlx2Xp1j2DKx+I79e/Xd26t
/LV/VEIIzWJKxZTDb723Xw87NvCIkbqqruEJ6+oGnjFWt9Udve+qe7rfxwsO
8IpD9QhzHKsTvGGKd5yop+oZPnGu84XOl+qVeq3O9N/m3x+jpSC8
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxdyDsKg2AQReHRNJYWFhYRVCSIhOAjvhVdg4VFSsHarbsEBX9TnIHL4Rtv
2ab1ISLOOe2cLvftw9V5VA/Vn6oBm7AF2/ATdmEfDuAXHMIR/IY/cAwncApn
8BfO4QIu4Qqu4QZu4Q7u/z4ANccf/Q==
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.5625000000000001, 0},
PlotRange -> {{1., 29.}, {0, 176.}}, PlotRangeClipping -> True,
ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.5625000000000001, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 50., 100., 150.}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compress\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 29.}, {0, 176.}}, PlotRangeClipping -> True,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{
3, 0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{
0, 0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706347308853529*^9, 3.706347654115067*^9,
3.706347745162105*^9, 3.706350588509931*^9, 3.7063510143642*^9,
3.706351245933474*^9, 3.7063514074327593`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "4", "]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"40", ",", "40"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], ",",
RowBox[{"Map", "[",
RowBox[{"ArrayTrim", ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "15"}], "]"}], "&"}],
"/@",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.",
" ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"\[Equal]", "6"}], ")"}], "&"}]}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ",", "1", ",", "1", ",", "1", ",", "\"\<\>\""}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347217618145*^9, 3.706347245922827*^9},
3.706350645858823*^9, {3.7063808627749662`*^9, 3.7063808638323393`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TemplateBox[{"1","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"2","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"3","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {1, 0, 1, 1, 0}, {1, 1,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 0, 1, 0, 0}, {0, 0, 1, 1, 0}, {1, 1,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {1, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1, 1}, {1, 0, 0, 0, 0, 1}, {0, 0, 1, 1, 0,
0}, {1, 0, 0, 1, 0, 1}, {1, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 0, 0}, {1, 0, 0, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 1, 1, 0, 0}, {1, 1, 0, 0, 1}, {0, 0,
0, 1, 1}, {0, 1, 1, 1, 1}, {0, 1, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1,
0}, {1, 0, 1, 0, 0, 1}, {0, 0, 1, 1, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 0}, {1, 1, 1, 1, 1, 0, 1}, {0, 0, 0, 1, 0, 1, 1}, {0, 0, 0,
1, 1, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0,
3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}, {{7, 0}, {7, 6}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1,
1, 1, 0}, {1, 0, 1, 1, 0, 0, 0}, {0, 1, 0, 0, 1, 1, 1}, {0, 1, 0,
0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {7, 7}}, {{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0,
4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7,
1}}, {{0, 0}, {7, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1}, {1, 1,
1, 1, 0, 1, 0, 0}, {1, 0, 0, 0, 0, 0, 0, 1}, {0, 1, 1, 1, 1, 0, 1,
1}, {0, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {
8, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {8, 7}}, {{0, 6}, {8, 6}}, {{0, 5}, {8, 5}}, {{0,
4}, {8, 4}}, {{0, 3}, {8, 3}}, {{0, 2}, {8, 2}}, {{0, 1}, {8,
1}}, {{0, 0}, {8, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0}, {1, 1,
0, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 0,
1}, {0, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {
8, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {8, 7}}, {{0, 6}, {8, 6}}, {{0, 5}, {8, 5}}, {{0,
4}, {8, 4}}, {{0, 3}, {8, 3}}, {{0, 2}, {8, 2}}, {{0, 1}, {8,
1}}, {{0, 0}, {8, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0,
1}, {1, 0, 1, 1, 0, 1, 1, 0, 0}, {1, 0, 0, 0, 1, 1, 1, 0, 1}, {0, 1,
1, 0, 1, 1, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"4","\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {0, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 0, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.706347218710971*^9, 3.706347247033413*^9},
3.706350646962942*^9, 3.706380864956582*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">", "6"}],
")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"BDM", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7063473516333733`*^9, 3.706347355280126*^9},
3.7063475671888447`*^9, 3.7063476476050453`*^9, {3.706350470134933*^9,
3.70635047409094*^9}, {3.706350997009844*^9, 3.706350999023036*^9},
3.706351269388842*^9, 3.706351413267544*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4VMfNstNrtYbyORxsrv/6
vz/FEMoXcPg0KWgml7MBlC+CJi/hsLeqY9mn2dJQvoxDsH3xu9dV3FC+ApTP
DOUrofFV0PhqaHwNNL4WGl8Hja+HxjdA4xui8Y3Q+MZofBM0vimcDwDMAFdL
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4VMfNstNrtYbyORxsrv/6
vz/FEMoXcPg0KWgml7MBlC+CJi/hsLeqY9mn2dJQvoxDsH3xu9dV3FC+ApTP
DOUrofFV0PhqaHwNNL4WGl8Hja+HxjdA4xui8Y3Q+MZofBM0vimcDwDMAFdL
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7LnVVppZXNF1gAo4XF4spR1YaAflczg09kg4
C18wgPIFHD5+3PL7w0U9KF/EQa1pwRyNBGsoXwKNL4PGV0DjK6HxVdD4amh8
DTS+FhpfB42vh8Y3QOMbovGN0PjGaHwTNL4pnA8ANQZKDw==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7FO7pinY5mo7QAUcLi+W0g4stIPyORwmVTnw
3CmH8QUcsmK3uFpMsIXyRRyW23/6fYwfxpdwSL6s9+57gw2UL+Mw/0Tj/qBH
3lC+Apq8Epq8Cpq8Gpq8Bpq8Fpq8Dpq8Hpq8AZq8IZq8EZq8MZq8CZq8KVwe
AG07YBk=
"]]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUcquNm2em1WkP5HA42
13/9359iCOULOHyaFDSTy9kAyhdBk5dw2FvVsezTbGkoX8Yh2L743esqbihf
AcpnhvKV0PgqaHw1NL4GGl8Lja+DxtdD4xug8Q3R+EZofGM0vgka3xTOBwDV
vFdN
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUcquNm2em1WkP5HA42
13/9359iCOULOHyaFDSTy9kAyhdBk5dw2FvVsezTbGkoX8Yh2L743esqbihf
AcpnhvKV0PgqaHw1NL4GGl8Lja+DxtdD4xug8Q3R+EZofGM0vgka3xTOBwDV
vFdN
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9txqK80srug6QAUcLi+W0g4stIPyORwa
eySchS8YQPkCDh8/bvn94aIelC/ioNa0YI5GgjWUL4HGl0HjK6DxldD4Kmh8
NTS+BhpfC42vg8bXQ+MboPEN0fhGaHxjNL4JGt8UzgcAPsJKEQ==
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9qld0xRsc7UdoAIOlxdLaQcW2kH5HA6T
qhx47pTD+AIOWbFbXC0m2EL5Ig7L7T/9PsYP40s4JF/We/e9wQbKl3GYf6Jx
f9AjbyhfAU1eCU1eBU1eDU1eA01eC01eB01eD03eAE3eEE3eCE3eGE3eBE3e
FC4PAHb3YBs=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 0},
PlotRange -> {{1., 21.}, {0, 55.76815027081579}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.6875000000000002, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 10., 20., 30., 40., 50.}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {0, 55.76815027081579}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706347352342601*^9, 3.7063473558766603`*^9},
3.706347567796411*^9, 3.7063476482052927`*^9, 3.7063504746588087`*^9,
3.706350999610457*^9, 3.70635127243358*^9, 3.7063514137934027`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">", "6"}],
")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ByteCount", "[",
RowBox[{"Compress", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347397315277*^9, 3.706347400985115*^9},
3.7063475593333817`*^9, 3.706347639516254*^9, {3.706350453104949*^9,
3.706350457553495*^9}, {3.706350988973366*^9, 3.706350991548123*^9}, {
3.706351276001402*^9, 3.706351279433666*^9}, 3.7063514159754333`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7CF0hANUAEpHQWkONL6AA6p6ETR5CTR5GSgd
BqUVoHQIlFZC46ug8dXQ+BpofC00vg4aXw+Nb4DGN0TjG6HxjdH4Jmh8Uzgf
ADztFv0=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7CF0hANUAEpHQWkONL6AA6p6ETR5CTR5GSgd
BqUVoHQIlFZC46ug8dXQ+BpofC00vg4aXw+Nb4DGN0TjG6HxjdH4Jmh8Uzgf
ADztFv0=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7CF0hANUAEpHQWkONL6AA6p6ETR5CTS+DBpf
AY2vhMZXQeOrofE10PhaaHwdNL4eGt8AjW+IxjdC4xuj8U3Q+KZwPgBlIRdX
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7CF0mANUAErHQGkONL4AlI6C0iJQOg5KS6Cp
l0HjK6DxldD4Kmh8NTS+BhpfC42vg8bXQ+MboPEN0fhGaHxjNL4JGt8UzgcA
fLEXfw==
"]]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9hA6wgEqAKWjoDQHGl/AAVW9CJq8BJq8
DJQOg9IKUDoESiuh8VXQ+GpofA00vhYaXweNr4fGN0DjG6LxjdD4xmh8EzS+
KZwPAEapFv8=
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9hA6wgEqAKWjoDQHGl/AAVW9CJq8BJq8
DJQOg9IKUDoESiuh8VXQ+GpofA00vhYaXweNr4fGN0DjG6LxjdD4xmh8EzS+
KZwPAEapFv8=
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9hA6wgEqAKWjoDQHGl/AAVW9CJq8BBpf
Bo2vgMZXQuOroPHV0PgaaHwtNL4OGl8PjW+AxjdE4xuh8Y3R+CZofFM4HwBu
3RdZ
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9hA6zAEqAKVjoDQHGl8ASkdBaREoHQel
JdDUy6DxFdD4Smh8FTS+GhpfA42vhcbXQeProfEN0PiGaHwjNL4xGt8EjW8K
5wMAhm0XgQ==
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 78.00000000000001},
PlotRange -> {{1., 21.}, {80., 120.}}, PlotRangeClipping -> True,
ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {0.6875000000000002, 78.00000000000001}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {80., 90., 100., 110., 120.}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compress\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {80., 120.}}, PlotRangeClipping -> True,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.05],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706347401429246*^9, 3.706347559949911*^9,
3.70634764012818*^9, 3.706350458128323*^9, 3.7063509919897842`*^9,
3.7063512799991093`*^9, 3.7063514164906588`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">", "6"}],
")"}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"Entropy", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "4", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347391073806*^9, 3.706347392048658*^9},
3.706347550965904*^9, {3.7063476311256733`*^9, 3.706347631973596*^9}, {
3.706350443963607*^9, 3.706350447181653*^9}, {3.7063509839900312`*^9,
3.706350984178338*^9}, {3.7063512881855583`*^9, 3.706351291186222*^9},
3.70635141870253*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7BW6OL4FxT2xhwo4vLf89c9J7xuUz+HAzby2
6tXkj1C+ABpfxKF4tbX9pkUfoHwJB1TzZBwYUIACGl8Jja+CxldD42ug8bXQ
+DpofD00vgEa3xCNb4TGN0bjm6DxTeF8ALRQIlM=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7BW6OL4FxT2xhwo4vLf89c9J7xuUz4HGF3BA
VS/iwM28turV5I9QvgRU/TMoX8aBAQUooPGV0PgqaHw1NL4GGl8Lja+DxtdD
4xug8Q3R+EZofGM0vgka3xTOBwBCvCPQ
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7BW6OL4FxT2xhwo4FK+2tt+06AOUz+HAzby2
6tXkj1C+ABpfxOG95a9/TnrfoHwJNL4MGl8Bja+ExldB46uh8TXQ+FpofB00
vh4a3wCNb4jGN0LjG6PxTdD4pnA+AIPRayg=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7BlQgcMVp7Afnx/AxDnQ+AIOJ4xKDvt3PoXy
RRys1r92eLHgK5QvgSYv41C1aVlzhP0tKF8BTV4JTV4FTV4NTV4DTV4LTV4H
TV4PTd4ATd4QTd4ITd4YTd4ETd4ULg8AfcpgEg==
"]]}}, {{
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9gpdHN+C4p7YQwUc3lv++uek9w3K53Dg
Zl5b9WryRyhfAI0v4lC82tp+06IPUL6EA6p5Mg4MKEABja+ExldB46uh8TXQ
+FpofB00vh4a3wCNb4jGN0LjG6PxTdD4pnA+AL4MIlU=
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9gpdHN+C4p7YQwUc3lv++uek9w3K50Dj
Czigqhdx4GZeW/Vq8kcoXwKq/hmUL+PAgAIU0PhKaHwVNL4aGl8Dja+FxtdB
4+uh8Q3Q+IZofCM0vjEa3wSNbwrnAwBMeCPS
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9gpdHN+C4p7YQwUcildb229a9AHK53Dg
Zl5b9WryRyhfAI0v4vDe8tc/J71vUL4EGl8Gja+AxldC46ug8dXQ+BpofC00
vg4aXw+Nb4DGN0TjG6HxjdH4Jmh8UzgfAI2Nayo=
"]]}, {
Directive[
PointSize[0.011000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9gyowOGKU9iPzw9g4hxofAGHE0Ylh/07
n0L5Ig5W6187vFjwFcqXQJOXcajatKw5wv4WlK+AJq+EJq+CJq+GJq+BJq+F
Jq+DJq+HJm+AJm+IJm+EJm+MJm+CJm8KlwcAh4ZgFA==
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 0},
PlotRange -> {{1., 21.}, {0, 1.3862943611198906`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.6875000000000002, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 0.25, 0.5, 0.75, 1., 1.25}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {0, 1.3862943611198906`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706347404179138*^9, 3.7063475516175632`*^9,
3.706347632528432*^9, 3.7063504476960573`*^9, 3.706350985870075*^9,
3.706351292891183*^9, 3.7063514191784782`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "4", "]"}], ",",
RowBox[{"(",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"40", ",", "40"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], ",",
RowBox[{"Map", "[",
RowBox[{"ArrayTrim", ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "15"}], "]"}], "&"}],
"/@",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.",
" ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
">", "6"}], ")"}], "&"}]}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ")"}]}], "}"}], "]"}]}],
")"}]}], ")"}]}], ")"}], ",", "1", ",", "1", ",", "1", ",",
"\"\<\>\""}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347375813176*^9, 3.706347377211369*^9}, {
3.7063475747690372`*^9, 3.7063475748505707`*^9}, 3.7063505443925123`*^9, {
3.706380940915601*^9, 3.7063809419831123`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TemplateBox[{"1","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {1, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {1, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 1}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}}, {{0, 0}, {2, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}]},
"RowDefault"]},
{
TemplateBox[{"2","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 1}, {1, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 1}, {0, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 1, 1}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}}, {{0, 0}, {1, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0, 0}, {1, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}],"\" \"",
GraphicsBox[{}, ImageSize -> {40, 40}]},
"RowDefault"]},
{
TemplateBox[{"3","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {0, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 1}, {1, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 1, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"4","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 0,
1, 0, 1}, {0, 0, 0, 1, 0, 0, 0}, {1, 0, 1, 0, 1, 0, 1}, {1, 1, 0,
0, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {7, 7}}, {{0, 6}, {7, 6}}, {{0, 5}, {7, 5}}, {{0,
4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0, 2}, {7, 2}}, {{0, 1}, {7,
1}}, {{0, 0}, {7, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0,
1, 1, 1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 7}, {9, 7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0,
4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9,
1}}, {{0, 0}, {9, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 7}}, {{1, 0}, {1, 7}}, {{2, 0}, {2, 7}}, {{3,
0}, {3, 7}}, {{4, 0}, {4, 7}}, {{5, 0}, {5, 7}}, {{6, 0}, {6,
7}}, {{7, 0}, {7, 7}}, {{8, 0}, {8, 7}}, {{9, 0}, {9, 7}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {
7, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {7, 5}}, {{0, 4}, {7, 4}}, {{0, 3}, {7, 3}}, {{0,
2}, {7, 2}}, {{0, 1}, {7, 1}}, {{0, 0}, {7, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}, {{7, 0}, {7, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{3.706347378019621*^9, 3.706347575968664*^9,
3.706350545374814*^9, 3.706380942807713*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], ">",
"8"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}], "<",
"10"}], ")"}]}], "&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"BDM", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "23", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{
3.706348140949829*^9, {3.7063504040878067`*^9, 3.706350422411648*^9}, {
3.706350965728807*^9, 3.706350970383514*^9}, 3.706351301554679*^9,
3.706351422199316*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7EvLp35f/MXAASrgYCodMfGomwOUz+Hw8eOW
3x8u6kH5Ag63HNIPXm+GyYs4bNaU9L5wwRbKl0CTl3F4nKrWsXmKE5SvAOUb
QflKDs7M9SkZz2D2q0D5MP1qDpsP9pgtnQFTr+Gwar7l99K9glC+lkOwffG7
11XMUL4OGl8PjW+AxjdE4xuh8Y3R+CZofFM4HwAkE1jx
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7B86W15eM9/QASrgYCodMfGomwOUz+Hw8eOW
3x8u6kH5Ag63HNIPXm+GyYs4bNaU9L5wwRbKl0CTl3F4nKrWsXmKE5SvAOUb
QflKDs7M9SkZzwygfBUoH6ZfzWHzwR6zpTNg6jUcVs23/F66VxDK13IIti9+
97qKGcrXQeProfEN0PiGaHwjNL4xGt8EjW8K5wMAaoNYXg==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H99PL3qQJ2BA1TA4fJiKe3AQjson8Mhi9F+
IUuMPZQv4PAp/PblI/McoHwRh9LXnD+fzbaF8iUc/obrFfDzwvTLOERdu8t3
0MUGyldw4FM6KPerxQrKV3L4lf3lxNQsmHoVh9/Wd1/eeAhTr+ZQdsFTPTfB
G8rXcJD4wtpz5lk0lK/lkNL7QHziVRhfx0FI/vlHRg0YX89BZZfpv39i/lC+
gUPqa9aHonN9oXxDh2mJX151PfGC8o0cLleyxAZMhPnP2CGQ94BHWyLMfyYO
5U8dp1y7C+ObOpRfTPmdpuntAAD4jljB
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7FO7pinY5mo7QAUcLi+W0g4stIPyORwmVTnw
3CmH8QUcsmK3uFpMsIXyRRyW23/6fYwfxpdwSL6s9+57gw2UL+Mw/0Tj/qBH
3lC+Apq8Epq8Cpq8Gpq8Bpq8Fpq8Dpq8Hpq8AZq8IZq8EZq8MZq8CZq8KVwe
AG07YBk=
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7K/mthVxXrV1gAo43HJIP3i92QHK53BY9L3+
lW2eHZQv4OBxW4pJ86k1lC/iMOHieYvkAzD9Eg7HJu81X5xjA+XLOKR9/9Jj
qQeTV3C4Oe+L4zFdmHlKDguDi0WF5GDmqTh0PduVxP/JHspXc+DoLHEWPBkL
5Ws4hP2c6ZP+LgrK13JwXq7/82RJDJSv4/BEMnja/hofKF/PwXmm+6QvWr5Q
voHDuq4bq7afD4byDR28VP8lfJIOg/KNHFK+qtXqVadA+cYOH041TF56Hmaf
icMfJpdVeh0w+0wdFB4amG32jHEAAEgSV8w=
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7K/mthVxXrV1gAo43HJIP3i92QHK53BY9L3+
lW2eHZQv4OBxW4pJ86k1lC/iMOHieYvkAzD9Eg7HJu81X5xjA+XLOKR9/9Jj
qQeTV3C4Oe+L4zFdmHlKDguDi0WF5GDmqTh0PduVxP/JHspXc+DoLHEWPBkL
5Ws4hP2c6ZP+LgrK13KYy9Z5OtMmBsrXcXBhvbWmLCUAytdzcJ7pPumLli+U
b+CwruvGqu3ng6F8Q4czkeoTzobB+EYO3K3i0wJNYOYZO5x/PGEVt2Q0lG/i
0GSss0a0H8Y3dRDKXML+61CMAwBZ21S5
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7B86W15eM9/QASrgYCodMfGomwOUz+Hw8eOW
3x8u6kH5Ag63HNIPXm+GyYs4bNaU9L5wwRbKl3BIvqz37nuDDZQv47Dm3d39
q484QvkKDo9T1To2TzGC8pUcVFdWaJjvgJmn4uDMXJ+S8QzGV3OQOclamV9k
B+VrOKyab/m9dK8ilK/lEGxf/O51FTOUr4PG10PjG6DxDdH4Rmh8YzS+CRrf
FM4HABiEWNE=
"]]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7CeZdPmc2mzvABVw2F7o/zy8zwHK53BY/7uQ
f128HZQv4LCK3/3KxziYehGHyboHUx+ehPElHOLnCmRy+8DUyzg8yw5bIXHS
GspXcPhUd9PvR4QNlK/k8ONd1qGc5VFQvorDlclhff+zvKB8NQf9bV9slzBG
Q/kaDrotB7LfLYfxtRzcjS73zPD2hvJ1HNyWZX/8vhbG13M4k+1tWuDvA+Ub
OKT8eem80ASm39CBwYs/ctUxGN/I4fKWvkPP+WKhfGMHS/+lAlpWMHkTB/HZ
9XpGPDC+qUPYdIVr/zqiHQCZ1FaK
"]]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7Fe4MHQev2XoABVw+GEd9Pz5Dzson8Ph/LKA
NzK/9aB8AQeb67/+70+BqRdx2HuikuVsiTSUL+Gw+WCP2dIZRlC+jMPeqo5l
n2bD5BUcgu2L372u4obylaB8ZihfBY2vhsbXQONrofF10Ph6aHwDNL4hGt8I
jW+MxjdB45vC+QBBRFox
"]]}, {
Hue[0.7946117974981064, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.827051, 0.418034, 0.0243459],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4/LAOev78hx2Uz+Gw90Ql
y9kSaShfwGHzwR6zpTOMoHwRh71VHcs+zYbJSzgE2xe/e13FDeXLQPnMUL4C
Gl8Jja+CxldD42ug8bXQ+DpofD00vgEa3xCNb4TGN0bjm6DxTeF8ALt0V+c=
"]]}, {
Hue[0.030679774997896203`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.5511749434976025, 0.32014794962639853`, 0.8720626412559938],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7OPLV8papds4QAUcbjmkH7ze7ADlczgs+l7/
yjbPDsoXcPC4LcWk+dQayhdxmHDxvEXyAVsoX8Lh2OS95otzYObJOKR9/9Jj
qQeTV3C4Oe+L4zFdmHlKDguDi0WF5GDmqTh0PduVxP/JHspXc+DoLHEWPBkL
5Ws4hP2c6ZP+LgrK13KYy9Z5OtMmBsrXcXBhvbWmLCUAytdzcJ7pPumLli+U
b+CwruvGqu3ng6F8Q4czkeoTzobB+EYO3K3i0wJNYOYZO5x/PGEVt2Q0lG/i
0GSss0a0H8Y3dRDKXML+61CMAwBCA1Pd
"]]}, {
Hue[0.266747752497686, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H99PL3qQJ2BA1TAQYXzoKn0MQcon8NBOOhO
Q/NNeyhfwOGZz+67BRutoXwRh3UeZ8R99KygfAkH+/XmJ7VVYXwZB2PZ1ca3
OGF8BQepJK2lzl5RUL6Sw5y5y4x6e2OgfBWHfY/M99mnwuTVHKoiPy1inxAN
5Ws4hKWKr75gnwvlazmo/eHgPSqRCuXrOCxVvBqTPzMfytdzuLDN6clqWZh5
Bg6/NsnscjP3gfINHX6wnVs0pS8ByjdC4xuj8U3Q+KZwPgBAglYr
"]]}, {
Hue[0.5028157299974758, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.8680706456216862, 0.2563858708756628, 0.30321559063052295`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7GdGOEkcCLB1gAo4LP9eyX//jAOUz+Hwp0vI
cu0emLyAA5/H3QDbMCMoXwSNL+FgOtOr+fRDOyhfxmF5iHB51wMYX8HBJ/38
y6MsjlC+EhpfxWH5O/frrUdsoHw1h09/9bwziq2gfA2HF9n8C4VtzaF8LYcH
JayvMlItoXwdB06WY8s6xWD69Rz4PlpXLV8fDeUbOPifr2lZJgHjGzpc2nxq
7+LHML6Rw4SVJ+8/54iD8o0dZj3urlupGgXlmzhs4/m8pkgjBso3dXj7q3XL
w13RDgCFFVfz
"]]}, {
Hue[0.7388837074972656, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.2418693812442152, 0.5065044950046278, 0.9902432574930582],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7EvLp35f/MXAASrgYCodMfGomwOUz+Hw8eOW
3x8u6kH5Ag63HNIPXm+GyYs4bNaU9L5wwRbKl3BIvqz37nuDDZQv47Dm3d39
q484QvkKDo9T1To2TzGC8pUcVFdWaJjvgJmn4uDMXJ+S8QzGV3OQOclamV9k
B+VrOKyab/m9dK8ilK/lEGxf/O51FTOUr4PG10PjG6DxDdH4Rmh8YzS+CRrf
FM4HANIFWWQ=
"]]}, {
Hue[0.9749516849970554, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.9573908706237908, 0.5369543531189542, 0.11504464931576472`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4HCm87HTM3QHK53Dg87gb
YBtmBOULOPC0prBsOGMN5Ys4HNpwOv9orD2UL+Hw1qzOSdzNDsqXcXjobHl5
zXxDKF/B4ZZD+sHrzTDzlRw2a0p6X7hgC+WrOCRf1nv3vcEGyldzWPPu7v7V
RxyhfA2Hx6lqHZunwNyj5aC6skLDfAfMPB0HZ+b6lIxnML6eg8xJ1sr8Iph7
DBxWzbf8XrpXEco3dAi2L373uooZyjdC4xuj8U3Q+KZwPgCg3lUY
"]]}, {
Hue[0.21101966249684523`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7Fe4MHQev2XoABVwOFJ42emYuwOUz+HwxlRM
/KwUTF7AQZ/jVbHffJi8iIMaQ+almyutoXwJB7noQ4o/I2DyMg66vJdeqzLD
+AoOXDuO/zzYDFOv5MD9n03z1meYvIrDhxxOVo8ZNlC+moNqwa51V6/YQfka
Dr9j18rdPA3Tr+XgGfD8oKaTI5Sv4yAcdKeh+aY9lK/nYPN1T9D/fCso38Ch
In7DvTM7YfoNHQTSqxxu/beE8o0ctr1d+eljpTaUb+wQbF/87nUVM5RvgsY3
hfMBOKpWlw==
"]]}, {
Hue[0.44708763999663503`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7J2Z61Mynhk4QAUcjhRedjrm7gDlczi8MRUT
PytlCOULOPC0prBsOGMN5Ys4HNpwOv9orD2UL+HwrWmxecx0KyhfxuGhs+Xl
NfNh+hUcbjmkH7zeDDNfyWGzpqT3hQu2UL6KQ/JlvXffG2ygfDWHNe/u7l99
xBHK13B4nKrWsXmKEZSv5aC6skLDfAfMPB0HiH9gfD0HmZOslflFdlC+gcOq
+ZbfS/cqQvmGDsH2xe9eVzFD+UZofGM0vgka3xTOBwDGzVZB
"]]}, {
Hue[0.6831556174964248, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7LnVVppZXNF1gAo4/LAOev78hx2Uz+Gw90Ql
y9kSaShfwGHzwR6zpTOMoHwRh71VHcs+zYbJSzgE2xe/e13FDeXLQPnMUL4C
Gl8Jja+CxldD42ug8bXQ+DpofD00vgEa3xCNb4TGN0bjm6DxTeF8AFBDV5M=
"]]}, {
Hue[0.9192235949962146, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7GMKO+8cELJzgAo4TNx/yeznP3son8Ph1LQC
ib8XLKB8AQe5rpLmPXMNoXwRBxnP9XdybxlA+RIOD+WSfLr4baB8GYegVe+f
X891hPIVHMoj7sw/89YIyldy8E0///JoC0xexSEwQOCo2CN9KF/NoTpulp1e
qzWUr+Fgc/3X//0pMPu1HD5NCprJ5QyzXwdNXs9hb1XHsk+zpaF8A4dg++J3
r6u4oXxDKJ8ZyjdC4xuj8U3Q+KZwPgBh2Fpp
"]]}, {
Hue[0.15529157249600445`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H99PL3qQJ2BA1TAYXYcY7NjgD2Uz+HweVrm
Q3s/GyhfwOFS6gfH/ToweRGH3HNSdT2rrKB8CYdXIodVmQrtoHwZB4VNsfKv
FnhD+QoOW5Y92r9sPYyv5JBzLVqIpzkKyldxkNtbwtO/LxrKV3NYFVTttSoQ
xtdwWDCzsk5ROwbK13IwbxOZv+N0CpSv4/DC8sImJX8YX89B4oR7s0U8jG/g
oMJdl3deMBnKN3Qo8zh4rsMGxjdy6HFqbYkwi4XyjR32LW3yvrsept/EwcpK
cFqvayqUb+pQdWmvT//5OAcAan1T7w==
"]]}, {
Hue[0.39135954999579425`, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7FX5/77eskTPASrg8Fz848xrjg5QPofDp0lB
M7mcDaB8AYd/Jrcn13vD5EUc2lOEnAP+20L5Eg5Bf3ofP1K1h/JlHD6vrFuc
dR7GV3AwT/SqkmezgfKVHA5btC6o32QN5as4eF0MLb+yEma+msPc11suWSXb
QfkaDr9j18rdPA1Tr+XgGfD8oKaTI5Sv4yAcdKeh+SbMPj0Hm697gv7nW0H5
Bg6zf25cO/GdOZRv6ODf8Xb3Q1uYvJHDtrcrP32s1IbyjR2C7Yvfva5ihvJN
0PimcD4Ae11bgA==
"]]}, {
Hue[0.6274275274955841, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4vDWrcxJ3s4PyORweOlte
XjPfEMoXcLjlkH7werMDlC/isFlT0vvCBVsoX8Ih+bLeu+8NNlC+jMOad3f3
rz7iCOUrODxOVevYPMUIyldyUF1ZoWG+A2aeioMzc31KxjMYX81B5iRrZX4R
zD0aDqvmW34v3asI5Ws5BNsXv3tdxQzl66Dx9dD4Bmh8QzS+ERrfGI1vgsY3
hfMBoYJV6A==
"]]}, {
Hue[0.8634955049953739, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7AMDBI6KPdJ3gAo4RNfrJBXpOUD5HA48rSks
G85YQ/kCDvnT9kyxuGwH5Ys4rPM4I+6jZwXlSzjYrzc/qa0K48s4GMuuNr7F
CeMrOEglaS119oqC8pUc5sxdZtTbGwPlqzjse2S+zz4VJq/mUBX5aRH7hGgo
X8MhLFV89QX7XChfy0HtDwfvUYlUKF/HYani1Zj8mflQvp7DhW1OT1bLwswz
cPi1SWaXm7kPlG/o8IPt3KIpfQlQvhEa3xiNb4LGN4XzASGQUso=
"]]}}, {{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9qXlU78v/mLgABVwMJWOmHjUzQHK53D4
+HHL7w8X9aB8AYdbDukHrzfD5EUcNmtKel+4YAvlS6DJyzg8TlXr2DzFCcpX
gPKNoHwlB2fm+pSMZzD7VaB8mH41h80He8yWzoCp13BYNd/ye+leQShfyyHY
vvjd6ypmKF8Hja+HxjdA4xui8Y3Q+MZofBM0vimcDwAtz1jz
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9g+dLS+vmW/oABVwMJWOmHjUzQHK53D4
+HHL7w8X9aB8AYdbDukHrzfD5EUcNmtKel+4YAvlS6DJyzg8TlXr2DzFCcpX
gPKNoHwlB2fm+pSMZwZQvgqUD9Ov5rD5YI/Z0hkw9RoOq+Zbfi/dKwjlazkE
2xe/e13FDOXroPH10PgGaHxDNL4RGt8YjW+CxjeF8wF0P1hg
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9r8+nl51oM7AASrgcHmxlHZgoR2Uz+GQ
xWi/kCXGHsoXcPgUfvvykXkOUL6IQ+lrzp/PZttC+RIOf8P1Cvh5YfplHKKu
3eU76GID5Ss48CkdlPvVYgXlKzn8yv5yYmoWTL2Kw2/ruy9vPISpV3Mou+Cp
npvgDeVrOEh8Ye058ywaytdySOl9ID7xKoyv4yAk//wjowaMr+egssv03z8x
fyjfwCH1NetD0bm+UL6hw7TEL6+6nnhB+UYOlytZYgMmwvxn7BDIe8CjLRHm
PxOH8qeOU67dhfFNHcovpvxO0/R2AAACWVjD
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9qld0xRsc7UdoAIOlxdLaQcW2kH5HA6T
qhx47pTD+AIOWbFbXC0m2EL5Ig7L7T/9PsYP40s4JF/We/e9wQbKl3GYf6Jx
f9AjbyhfAU1eCU1eBU1eDU1eA01eC01eB01eD03eAE3eEE3eCE3eGE3eBE3e
FC4PAHb3YBs=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9ldz24o4r9o6QAUcbjmkH7ze7ADlczgs
+l7/yjbPDsoXcPC4LcWk+dQayhdxmHDxvEXyAZh+CYdjk/eaL86xgfJlHNK+
f+mx1IPJKzjcnPfF8ZguzDwlh4XBxaJCcjDzVBy6nu1K4v9kD+WrOXB0ljgL
noyF8jUcwn7O9El/FwXlazk4L9f/ebIkBsrXcXgiGTxtf40PlK/n4DzTfdIX
LV8o38BhXdeNVdvPB0P5hg5eqv8SPkmHQflGDilf1Wr1qlOgfGOHD6caJi89
D7PPxOEPk8sqvQ6YfaYOCg8NzDZ7xjgAAFHOV84=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9ldz24o4r9o6QAUcbjmkH7ze7ADlczgs
+l7/yjbPDsoXcPC4LcWk+dQayhdxmHDxvEXyAZh+CYdjk/eaL86xgfJlHNK+
f+mx1IPJKzjcnPfF8ZguzDwlh4XBxaJCcjDzVBy6nu1K4v9kD+WrOXB0ljgL
noyF8jUcwn7O9El/FwXlaznMZes8nWkTA+XrOLiw3lpTlhIA5es5OM90n/RF
yxfKN3BY13Vj1fbzwVC+ocOZSPUJZ8NgfCMH7lbxaYEmMPOMHc4/nrCKWzIa
yjdxaDLWWSPaD+ObOghlLmH/dSjGAQBjl1S7
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9g+dLS+vmW/oABVwMJWOmHjUzQHK53D4
+HHL7w8X9aB8AYdbDukHrzfD5EUcNmtKel+4YAvlSzgkX9Z7973BBsqXcVjz
7u7+1UccoXwFh8epah2bpxhB+UoOqisrNMx3wMxTcXBmrk/JeAbjqznInGSt
zC+yg/I1HFbNt/xeulcRytdyCLYvfve6ihnK10Hj66HxDdD4hmh8IzS+MRrf
BI1vCucDACJAWNM=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9pNMunxObbZ3gAo4bC/0fx7e5wDlczis
/13Ivy7eDsoXcFjF737lYxxMvYjDZN2DqQ9PwvgSDvFzBTK5fWDqZRyeZYet
kDhpDeUrOHyqu+n3I8IGyldy+PEu61DO8igoX8XhyuSwvv9ZXlC+moP+ti+2
SxijoXwNB92WA9nvlsP4Wg7uRpd7Znh7Q/k6Dm7Lsj9+Xwvj6zmcyfY2LfD3
gfINHFL+vHReaALTb+jA4MUfueoYjG/kcHlL36HnfLFQvrGDpf9SAS0rmLyJ
g/jsej0jHhjf1CFsusK1fx3RDgCjkFaM
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9itcGDqP3zJ0gAo4/LAOev78hx2Uz+Fw
flnAG5nfelC+gIPN9V//96fA1Is47D1RyXK2RBrKl3DYfLDHbOkMIyhfxmFv
VceyT7Nh8goOwfbF715XcUP5SlA+M5SvgsZXQ+NroPG10Pg6aHw9NL4BGt8Q
jW+ExjdG45ug8U3hfABLAFoz
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.827051, 0.418034, 0.0243459],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUcflgHPX/+ww7K53DY
e6KS5WyJNJQv4LD5YI/Z0hlGUL6Iw96qjmWfZsPkJRyC7Yvfva7ihvJloHxm
KF8Bja+ExldB46uh8TXQ+FpofB00vh4a3wCNb4jGN0LjG6PxTdD4pnA+AMUw
V+k=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.5511749434976025, 0.32014794962639853`, 0.8720626412559938],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9vHlK2Wt0m0coAIOtxzSD15vdoDyORwW
fa9/ZZtnB+ULOHjclmLSfGoN5Ys4TLh43iL5gC2UL+FwbPJe88U5MPNkHNK+
f+mx1IPJKzjcnPfF8ZguzDwlh4XBxaJCcjDzVBy6nu1K4v9kD+WrOXB0ljgL
noyF8jUcwn7O9El/FwXlaznMZes8nWkTA+XrOLiw3lpTlhIA5es5OM90n/RF
yxfKN3BY13Vj1fbzwVC+ocOZSPUJZ8NgfCMH7lbxaYEmMPOMHc4/nrCKWzIa
yjdxaDLWWSPaD+ObOghlLmH/dSjGAQBLv1Pf
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9r8+nl51oM7AASrgoMJ50FT6mAOUz+Eg
HHSnofmmPZQv4PDMZ/fdgo3WUL6IwzqPM+I+elZQvoSD/Xrzk9qqML6Mg7Hs
auNbnDC+goNUktZSZ68oKF/JYc7cZUa9vTFQvorDvkfm++xTYfJqDlWRnxax
T4iG8jUcwlLFV1+wz4XytRzU/nDwHpVIhfJ1HJYqXo3Jn5kP5es5XNjm9GS1
LMw8A4dfm2R2uZn7QPmGDj/Yzi2a0pcA5Ruh8Y3R+CZofFM4HwBKPlYt
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.8680706456216862, 0.2563858708756628, 0.30321559063052295`],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9jMjnCQOBNg6QAUcln+v5L9/xgHK53D4
0yVkuXYPTF7Agc/jboBtmBGUL4LGl3AwnenVfPqhHZQv47A8RLi86wGMr+Dg
k37+5VEWRyhfCY2v4rD8nfv11iM2UL6aw6e/et4ZxVZQvobDi2z+hcK25lC+
lsODEtZXGamWUL6OAyfLsWWdYjD9eg58H62rlq+PhvINHPzP17Qsk4DxDR0u
bT61d/FjGN/IYcLKk/efc8RB+cYOsx53161UjYLyTRy28XxeU6QRA+WbOrz9
1brl4a5oBwCO0Vf1
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.2418693812442152, 0.5065044950046278, 0.9902432574930582],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9qXlU78v/mLgABVwMJWOmHjUzQHK53D4
+HHL7w8X9aB8AYdbDukHrzfD5EUcNmtKel+4YAvlSzgkX9Z7973BBsqXcVjz
7u7+1UccoXwFh8epah2bpxhB+UoOqisrNMx3wMxTcXBmrk/JeAbjqznInGSt
zC+yg/I1HFbNt/xeulcRytdyCLYvfve6ihnK10Hj66HxDdD4hmh8IzS+MRrf
BI1vCucDANvBWWY=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[
0.9573908706237908, 0.5369543531189542, 0.11504464931576472`],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUcjhRedjrm7gDlczjw
edwNsA0zgvIFHHhaU1g2nLGG8kUcDm04nX801h7Kl3B4a1bnJO5mB+XLODx0
try8Zr4hlK/gcMsh/eD1Zpj5Sg6bNSW9L1ywhfJVHJIv67373mAD5as5rHl3
d//qI45QvobD41S1js1TYO7RclBdWaFhvgNmno6DM3N9SsYzGF/PQeYka2V+
Ecw9Bg6r5lt+L92rCOUbOgTbF797XcUM5Ruh8Y3R+CZofFM4HwCqmlUa
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9itcGDqP3zJ0gAo4HCm87HTM3QHK53B4
YyomflYKJi/goM/xqthvPkxexEGNIfPSzZXWUL6Eg1z0IcWfETB5GQdd3kuv
VZlhfAUHrh3Hfx5shqlXcuD+z6Z56zNMXsXhQw4nq8cMGyhfzUG1YNe6q1fs
oHwNh9+xa+Vunobp13LwDHh+UNPJEcrXcRAOutPQfNMeytdzsPm6J+h/vhWU
b+BQEb/h3pmdMP2GDgLpVQ63/ltC+UYO296u/PSxUhvKN3YIti9+97qKGco3
QeObwvkAQmZWmQ==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9s7M9SkZzwwcoAIORwovOx1zd4DyORze
mIqJn5UyhPIFHHhaU1g2nLGG8kUcDm04nX801h7Kl3D41rTYPGa6FZQv4/DQ
2fLymvkw/QoOtxzSD15vhpmv5LBZU9L7wgVbKF/FIfmy3rvvDTZQvprDmnd3
968+4gjlazg8TlXr2DzFCMrXclBdWaFhvgNmno4DxD8wvp6DzEnWyvwiOyjf
wGHVfMvvpXsVoXxDh2D74nevq5ihfCM0vjEa3wSNbwrnAwDQiVZD
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9txqK80srug6QAUcflgHPX/+ww7K53DY
e6KS5WyJNJQv4LD5YI/Z0hlGUL6Iw96qjmWfZsPkJRyC7Yvfva7ihvJloHxm
KF8Bja+ExldB46uh8TXQ+FpofB00vh4a3wCNb4jGN0LjG6PxTdD4pnA+AFn/
V5U=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9jGFnXcOCNk5QAUcJu6/ZPbznz2Uz+Fw
alqBxN8LFlC+gINcV0nznrmGUL6Ig4zn+ju5twygfAmHh3JJPl38NlC+jEPQ
qvfPr+c6QvkKDuURd+afeWsE5Ss5+Kaff3m0BSav4hAYIHBU7JE+lK/mUB03
y06v1RrK13Cwuf7r//4UmP1aDp8mBc3kcobZr4Mmr+ewt6pj2afZ0lC+gUOw
ffG711XcUL4hlM8M5Ruh8Y3R+CZofFM4HwBrlFpr
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9r8+nl51oM7AASrgMDuOsdkxwB7K53D4
PC3zob2fDZQv4HAp9YPjfh2YvIhD7jmpup5VVlC+hMMrkcOqTIV2UL6Mg8Km
WPlXC7yhfAWHLcse7V+2HsZXcsi5Fi3E0xwF5as4yO0t4enfFw3lqzmsCqr2
WhUI42s4LJhZWaeoHQPlazmYt4nM33E6BcrXcXhheWGTkj+Mr+cgccK92SIe
xjdwUOGuyzsvmAzlGzqUeRw812ED4xs59Di1tkSYxUL5xg77ljZ5310P02/i
YGUlOK3XNRXKN3WourTXp/98nAMAdDlT8Q==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9qr8f19vWaLnABVweC7+ceY1Rwcon8Ph
06SgmVzOBlC+gMM/k9uT671h8iIO7SlCzgH/baF8CYegP72PH6naQ/kyDp9X
1i3OOg/jKziYJ3pVybPZQPlKDoctWhfUb7KG8lUcvC6Gll9ZCTNfzWHu6y2X
rJLtoHwNh9+xa+Vunoap13LwDHh+UNPJEcrXcRAOutPQfBNmn56Dzdc9Qf/z
raB8A4fZPzeunfjOHMo3dPDveLv7oS1M3shh29uVnz5WakP5xg7B9sXvXlcx
Q/kmaHxTOB8AhRlbgg==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUc3prVOYm72UH5HA4P
nS0vr5lvCOULONxySD94vdkByhdx2Kwp6X3hgi2UL+GQfFnv3fcGGyhfxmHN
u7v7Vx9xhPIVHB6nqnVsnmIE5Ss5qK6s0DDfATNPxcGZuT4l4xmMr+Ygc5K1
Mr8I5h4Nh1XzLb+X7lWE8rUcgu2L372uYobyddD4emh8AzS+IRrfCI1vjMY3
QeObwvkAqz5V6g==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9oEBAkfFHuk7QAUcout1kor0HKB8Dgee
1hSWDWesoXwBh/xpe6ZYXLaD8kUc1nmcEffRs4LyJRzs15uf1FaF8WUcjGVX
G9/ihPEVHKSStJY6e0VB+UoOc+YuM+rtjYHyVRz2PTLfZ58Kk1dzqIr8tIh9
QjSUr+EQliq++oJ9LpSv5aD2h4P3qEQqlK/jsFTxakz+zHwoX8/hwjanJ6tl
YeYZOPzaJLPLzdwHyjd0+MF2btGUvgQo3wiNb4zGN0Hjm8L5ACtMUsw=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 0},
PlotRange -> {{1., 21.}, {0, 252.79484407069427`}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.6875000000000002, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 50., 100., 150., 200., 250.}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {0, 252.79484407069427`}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {0, 0, 0, 0}, {1, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{
0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 0, 0, 0}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{
0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 0, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{
0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{
0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{
3, 0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "8"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "9"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "10"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "11"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "12"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "13"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "14"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "15"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "16"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "17"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 1, 0}, {0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "18"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "19"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "20"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {1, 1, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "21"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 0, 0}, {1, 0, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "22"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "23"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #8}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"],
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0., 0.7, 0.7],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #9}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.827051, 0.418034, 0.0243459],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.827051, 0.418034, 0.0243459],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.827051, 0.418034, 0.0243459],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #10}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #11}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #12}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #13}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #14}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #15}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #16}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"],
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #17}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #18}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #19}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #20}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #21}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #22}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.08800000000000001],
RGBColor[0.94, 0.462, 0.162],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #23}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.94, 0.462, 0.162],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6266666666666667, 0.30800000000000005`,
0.10800000000000001`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.94, 0.462, 0.162]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.94, 0.462, 0.162];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.94, 0.462, 0.162], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0., 0.7, 0.7],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0., 0.4666666666666667, 0.4666666666666667],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0., 0.7, 0.7]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0., 0.7, 0.7];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0., 0.7, 0.7], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.827051, 0.418034, 0.0243459],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.5513673333333333, 0.27868933333333334`, 0.0162306],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.827051, 0.418034, 0.0243459]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.827051, 0.418034, 0.0243459];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.827051, 0.418034, 0.0243459], Editable ->
False, Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.36744996233173505`, 0.21343196641759904`,
0.5813750941706626], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.5511749434976025, 0.32014794962639853, \
0.8720626412559938]"], Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[
0.5511749434976025, 0.32014794962639853`,
0.8720626412559938], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.48462734167298, 0.4797734083340348, 0.],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.72694101250947, 0.7196601125010522, 0.]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.72694101250947, 0.7196601125010522, 0.];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.72694101250947, 0.7196601125010522, 0.],
Editable -> False, Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.5787137637477908, 0.17092391391710854`,
0.2021437270870153], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.8680706456216862, 0.2563858708756628, \
0.30321559063052295]"], Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[
0.8680706456216862, 0.2563858708756628,
0.30321559063052295`], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.16124625416281013`, 0.33766966333641857`,
0.6601621716620388], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.2418693812442152, 0.5065044950046278, \
0.9902432574930582]"], Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[
0.2418693812442152, 0.5065044950046278,
0.9902432574930582], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6382605804158605, 0.3579695687459695,
0.07669643287717648], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.9573908706237908, 0.5369543531189542, \
0.11504464931576472]"], Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[
0.9573908706237908, 0.5369543531189542,
0.11504464931576472`], Editable -> False, Selectable ->
False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.94, 0.462, 0.162],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6266666666666667, 0.30800000000000005`,
0.10800000000000001`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.94, 0.462, 0.162]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.94, 0.462, 0.162];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.94, 0.462, 0.162], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6, ",", #7,
",", #8, ",", #9, ",", #10, ",", #11, ",", #12, ",", #13,
",", #14, ",", #15, ",", #16, ",", #17, ",", #18, ",", #19,
",", #20, ",", #21, ",", #22, ",", #23}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptyUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True", ",", "True", ",", "True", ",",
"True", ",", "True", ",", "True", ",", "True", ",", "True"}],
"}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706348143588853*^9, 3.706350423963722*^9,
3.7063509773199463`*^9, 3.706351303031879*^9, 3.706351424738821*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "23", "]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"30", ",", "30"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], ">", "6"}], ")"}], "||",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "6"}],
")"}]}], ",", "None", ",", "All"}], "]"}]}]}], "]"}],
"&"}], ",",
RowBox[{"Map", "[",
RowBox[{"ArrayTrim", ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "15"}], "]"}], "&"}],
"/@",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.",
" ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
">", "8"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"<", "10"}], ")"}]}], "&"}]}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ",", "1", ",", "1", ",", "1", ",", "\"\<\>\""}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706348437678556*^9, 3.706348445306387*^9}, {
3.706348497277845*^9, 3.706348567952999*^9}, 3.706348668530814*^9}],
Cell[BoxData[
TagBox[GridBox[{
{
TemplateBox[{"1","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {0, 0, 0, 0}, {1, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 0, 0, 1}, {0, 0, 0, 0, 0}}, {{0,
0}, {5, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0,
0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {1, 0,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 0, 1, 0}, {0, 1,
0, 1, 0}, {1, 0, 0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {1, 0,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {1, 0, 1}, {0, 0, 0}, {0, 0, 0}, {1, 0, 1}, {1,
0, 1}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 1}, {1, 0, 1}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 0, 0}, {0, 0, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 1}, {1, 0, 1}, {0, 0, 0}, {0,
0, 0}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}, {0}}, {{0, 0}, {1, 4}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {1, 4}}, {{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0,
1}, {1, 1}}, {{0, 0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"2","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 0, 0, 0}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 0, 0, 1}, {0, 0, 0, 0, 0}}, {{0,
0}, {5, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0,
0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {1, 0,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 0, 1, 0}, {0, 1,
0, 1, 0}, {1, 0, 0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {1, 0,
0, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {1, 0, 1}, {0, 0, 0}, {0, 0, 0}, {1, 0, 1}, {1,
0, 1}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 1}, {1, 0, 1}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 0, 0}, {0, 0, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 1}, {1, 0, 1}, {0, 0, 0}, {0,
0, 0}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}, {0}, {0}}, {{0, 0}, {1, 4}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {1, 4}}, {{0, 3}, {1, 3}}, {{0, 2}, {1, 2}}, {{0,
1}, {1, 1}}, {{0, 0}, {1, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"3","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 0, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 0, 1, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {1, 1, 1, 0, 0}, {1, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 1, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 0, 0, 0, 1}, {1, 1,
1, 0, 0}, {0, 0, 1, 0, 1}, {0, 0, 0, 1, 1}, {1, 0, 1, 1, 1}}, {{0,
0}, {5, 7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1, 1}, {0, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1,
0}, {1, 1, 1, 1, 1, 0}, {1, 0, 1, 1, 0, 0}, {1, 0, 0, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 0}, {1, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 0, 0, 1, 1}, {1, 1, 0, 1,
1, 1, 1}, {1, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1,
0}, {1, 0, 0, 0, 0, 1}, {0, 0, 1, 1, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 0,
1, 0, 0}, {1, 0, 0, 1, 1, 0, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 0}, {1, 1, 0, 0,
1, 1, 0}, {1, 0, 0, 1, 1, 0, 0}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 0, 0,
0, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 0, 1}, {1, 0,
1, 0, 0, 1, 0, 0}, {1, 0, 1, 1, 1, 0, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {8,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 0}, {1, 0,
1, 0, 0, 1, 1, 0}, {0, 0, 0, 1, 0, 0, 0, 0}, {0, 1, 0, 1, 1, 0, 1,
1}, {0, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 0, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 1, 1, 0, 1, 1, 1,
0}, {1, 0, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 0, 1, 0, 0, 0, 0, 1, 1, 1}, {
0, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {10, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 1, 1, 1, 1, 0, 1,
0}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {
0, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {10, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 1, 0}, {1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {0, 1, 1, 0,
1, 1, 1}, {0, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {7,
8}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 0, 1}, {1, 0, 1, 1, 0,
0}, {1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1}, {1, 1, 0, 1, 1, 1}, {1,
1, 1, 0, 1, 1}, {0, 1, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1}}, {{0, 0}, {6,
9}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"4","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
0, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {0, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {1, 0, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 0,
1, 0, 1}, {0, 0, 0, 1, 0, 0, 0}, {1, 0, 1, 0, 1, 0, 1}, {1, 1, 0, 0,
0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {
1, 1, 1, 1, 0, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"5","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 1,
1, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 1, 0, 0, 1}, {1, 1, 1, 1, 0}, {1, 1,
1, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {1, 0, 0, 1}, {1, 0, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 0, 1, 0}, {
1, 1, 0, 0}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 1}, {0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {0, 0, 1, 1, 1}, {1, 0, 1, 0, 0}, {1, 1,
1, 1, 0}, {1, 1, 0, 0, 0}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1, 1}, {0, 1, 1, 0, 1, 1}, {0, 0, 0, 0, 0,
1}, {1, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {1, 0, 0, 0, 0, 0, 1}, {1, 1, 0, 1, 1, 1, 0}, {1, 1, 1, 1,
0, 0, 1}, {1, 1, 1, 1, 0, 0, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {1, 0, 0, 0, 0, 0, 0}, {1, 0, 0, 1, 1, 1, 0}, {1, 1, 1, 0,
0, 1, 0}, {1, 1, 1, 1, 0, 0, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1}, {0, 1,
1, 0, 0, 1, 1, 1}, {0, 1, 1, 1, 1, 0, 0, 1}, {0, 1, 1, 0, 0, 1, 0,
1}, {1, 0, 1, 1, 1, 1, 0, 0}, {1, 1, 0, 0, 0, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 0, 1, 1, 1}, {
1, 0, 0, 0, 0, 0, 0, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 0, 1}, {1, 0, 0, 1,
1, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 0, 0}, {1, 1, 1, 0, 1, 1, 1,
0, 0}, {1, 1, 1, 0, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 0, 1, 1}, {
0, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 0,
1, 1, 0, 0, 0}, {1, 0, 0, 0, 1, 1, 0, 0, 0}, {1, 1, 0, 0, 1, 1, 0,
1, 0}, {1, 1, 1, 1, 0, 1, 0, 0, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 1,
0, 1, 0, 1}, {1, 1, 0, 1, 1, 0, 0, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 0, 1,
1, 1, 0, 1}, {1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {11,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 0, 1, 1, 1, 1,
0, 1, 1}, {0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1}, {1, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0}, {1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 0, 0,
0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {11,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 0, 1,
1, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 0, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1,
1, 1, 1, 0, 0, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1,
1}}, {{0, 0}, {12, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"6","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 1,
0, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {0, 1, 1, 1, 0}, {1, 1,
0, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 0,
1}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0,
1, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 0, 1, 0, 0}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 0, 0,
1, 0, 0}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 0, 1, 1, 1}, {0, 1,
1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 1, 0, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 1}, {
1, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1, 0, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 0, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0, 0,
0, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 1, 1, 1, 1}, {0, 0,
0, 0, 1, 0, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1,
0}, {1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 0}, {1, 0, 0, 1,
1, 1, 1}, {0, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 0,
0, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 10}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 0,
0, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 0,
1, 1, 0}, {1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {7,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {0, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 1,
0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1}}, {{0, 0}, {7, 12}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"7","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 1}, {0, 0, 0}, {0, 1, 0}, {0, 0, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 0, 0, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 0, 0, 0}, {1, 1,
0, 1, 1, 0, 1, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 0}, {0, 0, 0, 0}, {0, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0, 0}, {1, 0, 1, 1, 0,
1}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 0,
0}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0,
1, 1, 1, 1, 0, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 0, 0}}, {{0, 0}, {8, 1}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"8","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {1, 1,
1, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 0}, {1, 1, 1, 0, 0}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1}, {1, 1, 0, 1, 0,
1}, {1, 1, 0, 1, 1, 0}, {1, 1, 1, 0, 0, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 0, 0}, {1, 0,
1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 0}, {0, 0,
1, 0, 0}, {1, 0, 1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {1, 0, 1, 0, 0, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {1, 0, 0, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
0, 1, 1}, {0, 1, 1, 0, 0, 0, 1}, {0, 1, 0, 1, 1, 0, 0}, {1, 0, 1, 1,
0, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 1, 1, 0, 1, 1}, {1, 0,
0, 1, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 0, 1, 1, 1,
0}, {1, 1, 0, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 1,
0, 1, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 1, 1, 1}, {
0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1,
1, 0, 1, 0, 1}, {1, 1, 1, 0, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 1}, {
1, 1, 0, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 0, 1}, {0, 0, 1, 1,
1, 1, 0, 0, 0}, {1, 0, 0, 0, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1}, {
1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 1,
1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 0, 1, 0}, {0, 1, 1, 0, 1, 1, 0,
1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 0, 1, 1, 1, 1, 0, 1, 0, 1}, {
0, 0, 1, 1, 1, 0, 0, 1, 0, 0}}, {{0, 0}, {10, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0}, {1, 0, 0, 1, 1, 1, 0,
0, 1, 0, 0}}, {{0, 0}, {11, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 0,
1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 0, 1, 0,
0}}, {{0, 0}, {10, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1}, {0, 1,
1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 0}, {1, 1, 1, 0,
0, 1, 0, 0}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"9","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 1}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 0, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}, {0, 0}, {1, 0}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {1, 1, 0}, {0, 0, 1}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1}, {1, 0}, {0, 1}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}}, {{0, 0}, {2, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"10","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}}, {{0, 0}, {1, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0, 0}, {1, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"11","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 1,
0, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {0, 1, 1, 1, 0}, {1, 1,
0, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 0,
1}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0,
1, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 0, 1, 0, 0}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 0, 0,
1, 0, 0}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 0, 1, 1, 1}, {0, 1,
1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 1, 0, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 1}, {
1, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1, 0, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 0, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0, 0,
0, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 1, 1, 1, 1}, {0, 0,
0, 0, 1, 0, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1,
0}, {1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 0}, {1, 0, 0, 1,
1, 1, 1}, {0, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 0,
0, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 10}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 0,
0, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 0,
1, 1, 0}, {1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {7,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {0, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 1,
0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1}}, {{0, 0}, {7, 12}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"12","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {0, 0, 1, 0, 0}, {0, 0,
1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 1, 0, 0}, {1, 0, 0, 0, 0, 0, 1}, {1, 1, 0, 0,
0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1,
1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {
1, 1, 0, 0, 0, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {0, 0, 0, 1,
1, 1, 0, 0, 0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 0, 0, 0,
1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {
1, 0, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 1, 0,
1, 0, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1,
0, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {0, 0, 0, 1, 0, 1, 0,
1, 0, 0, 0}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1,
1, 0, 0, 1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 0,
1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0,
0, 1, 1}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {0, 0, 0, 1, 1, 0,
1, 0, 1, 1, 0, 0, 0}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {13, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1,
0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {0, 1, 1, 0, 1, 1, 0, 1, 1, 0,
1, 1, 0}, {0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0}, {0, 1, 1, 0, 1, 1,
0, 1, 1, 0, 1, 1, 0}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {13,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 1, 0,
0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0}, {1, 1,
1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {15, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 0, 1, 0,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
9}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1,
1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"13","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 0, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 0, 1}, {1, 0, 1, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 0}, {1, 0, 1, 0}, {1, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {0, 1, 0, 0}, {1, 0, 1, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 0, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 1, 0, 0}, {0, 1,
1, 0, 1}, {1, 0, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {1, 0, 1, 1, 0}, {0, 1, 1, 1, 0}, {0, 1,
1, 0, 0}, {1, 0, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1}, {0, 0, 1, 1, 0,
1}, {0, 0, 1, 1, 0, 0}, {0, 1, 0, 0, 0, 1}, {1, 0, 0, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1, 1}, {1, 1, 1, 1,
1, 0, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 0}, {1, 1, 0, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1}, {1, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1,
0, 0, 1}, {1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1, 1}, {0, 1, 0, 1, 1, 1}, {0, 1, 0, 1, 1,
1}, {1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1}, {0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 1}, {0, 0,
1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 0, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"14","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 1}, {0, 0, 0}, {0, 1, 0}, {0, 0, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 0, 0, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 0, 0, 0}, {1, 1,
0, 1, 1, 0, 1, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 0}, {0, 0, 0, 0}, {0, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0, 0}, {1, 0, 1, 1, 0,
1}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 0,
0}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0,
1, 1, 1, 1, 0, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 0, 0}}, {{0, 0}, {8, 1}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"15","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 0, 1, 0}, {1, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {0, 0, 1, 1}, {0, 0, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1}, {1, 0, 1, 0}, {0, 1, 1, 1}, {1, 0, 1, 1}, {
1, 1, 0, 0}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0}, {1, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 0, 0, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 0, 0, 0}, {1, 1,
0, 1, 1, 0, 1, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 0}, {0, 0, 0, 0}, {0, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0, 0}, {1, 0, 1, 1, 0,
1}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 0,
0}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0,
1, 1, 1, 1, 0, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 0, 0}}, {{0, 0}, {8, 1}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"16","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {1, 0, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {
0, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 1}, {0, 1, 0}, {0, 0, 0}, {0, 1, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 0, 1, 0}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0,
0}, {1, 0, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 0, 1, 1, 0, 0}, {0, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 0, 1}, {0, 0, 1, 1, 1, 0}, {0, 0, 1, 0, 1,
1}, {1, 1, 0, 1, 1, 0}, {1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {0, 0, 0, 0, 0}, {0, 1, 1, 1, 0}, {1, 1,
1, 1, 0}, {1, 0, 0, 0, 1}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0}, {1, 0, 1, 1, 0}, {0, 1, 0, 1, 0}, {1, 0,
0, 1, 0}, {1, 0, 1, 1, 0}, {1, 0, 1, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 0}, {1, 0, 1, 0, 1, 1}, {1, 1, 0, 1, 1,
1}, {1, 0, 0, 0, 1, 1}, {0, 0, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 0}, {1, 0, 1, 0, 0}, {0, 1, 1, 0, 1}, {0, 1,
1, 1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 0}, {1, 1, 0, 0, 0}, {1, 1, 0, 0, 0}, {0, 0,
1, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0, 1, 0, 1}, {0, 0,
0, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 0, 0}, {1, 1, 1, 0, 1}, {0, 0, 0, 1, 1}, {1, 0,
1, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0}, {1, 1, 1, 0, 0}, {0, 0, 0, 1, 1}, {0, 0,
0, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1}, {1, 1, 0, 1, 0}, {1, 1, 1, 1, 0}, {0, 1,
1, 1, 1}, {0, 1, 0, 1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"17","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {0, 1, 0}, {0, 0, 0}, {0, 1, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1}, {1, 0, 1, 0}, {0, 0, 1, 0}, {1, 0, 1,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1}, {0, 0, 1, 0}, {0, 0, 1, 1}, {0, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0}, {1, 0, 1, 1}, {0, 1, 1, 1}, {1, 0, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0}, {1, 0, 0}, {0, 0, 0}, {1, 0, 0}, {1, 1, 0}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 0, 0, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 0, 0, 0}, {1, 1,
0, 1, 1, 0, 1, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 0}, {0, 0, 0, 0}, {0, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0, 0}, {1, 0, 1, 1, 0,
1}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 0,
0}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0,
1, 1, 1, 1, 0, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 0, 0}}, {{0, 0}, {8, 1}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"18","\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0}, {0, 0, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 1, 0}, {0, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}, {{2, 0}, {2, 2}}, {{3,
0}, {3, 2}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0}, {0}}, {{0, 0}, {1, 2}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 2}, {1, 2}}, {{0, 1}, {1, 1}}, {{0, 0}, {1, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 2}}, {{1, 0}, {1, 2}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"19","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 0, 0, 1}, {0, 1, 0, 0}, {1, 1, 0, 0}, {
1, 0, 0, 1}, {1, 0, 1, 1}}, {{0, 0}, {4, 6}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {4, 6}}, {{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0,
3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0, 1, 1, 1}, {1, 1,
0, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {1, 1, 0, 1}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 1, 1}, {0, 1, 1}, {1, 0, 0}, {1, 0, 0}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {1, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 1, 1}, {1, 0, 1}, {1, 0, 0}, {0, 1, 1}, {1,
0, 0}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 0}, {0, 0, 0}, {0, 1, 1}, {1, 0, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0}, {0, 1, 1, 1}, {0, 1, 1, 0}, {1, 0, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {1, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {1, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 1}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}}, {{0, 0}, {2, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"20","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 0, 0}, {1, 1, 0}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}, {1, 0, 1, 1}}, {{0, 0}, {4, 6}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {4, 6}}, {{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0,
3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 0, 1, 0, 0}, {1, 0,
1, 1, 0}, {1, 0, 0, 0, 1}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {0, 0, 1, 0, 0}, {0, 0, 1, 0, 0}, {1, 1,
1, 1, 0}, {1, 0, 1, 1, 0}, {1, 0, 1, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1, 1}, {0, 1, 1, 1, 0, 1}, {0, 0, 1, 1, 1,
0}, {0, 0, 0, 1, 0, 0}, {1, 1, 0, 0, 0, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1,
0, 0, 1}, {0, 1, 1, 0, 0, 1, 0}, {1, 0, 1, 1, 1, 1, 0}, {1, 1, 1, 1,
1, 0, 0}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1}, {1, 0,
1, 1, 1, 1, 1, 1}, {0, 0, 0, 0, 0, 1, 0, 1}, {1, 1, 1, 1, 0, 1, 0,
0}, {1, 1, 1, 1, 1, 0, 0, 1}}, {{0, 0}, {8, 6}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1}, {1, 0,
0, 1, 0, 1, 1, 1}, {0, 1, 1, 1, 0, 0, 1, 1}, {0, 0, 0, 0, 0, 1, 0,
0}, {1, 0, 0, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {8,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 1, 1, 1}, {
1, 0, 0, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1,
1, 1, 0, 0, 1}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0,
0, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 1, 1, 1, 1, 0, 0, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0, 1}, {
1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 0, 0, 0, 1}, {1, 1,
1, 1, 1, 1, 0, 0, 0, 1}}, {{0, 0}, {10, 9}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 0, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 0, 1, 0, 1}, {0, 0, 0, 1, 1, 1, 0, 1, 1, 0}, {
1, 0, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 0}, {1, 1,
1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {
10, 10}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1,
1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1, 1, 1}, {0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1,
0, 0, 0, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1,
1, 0, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1}}, {{0, 0}, {11, 10}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1,
0, 0, 0, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1}, {0, 1,
1, 1, 0, 1, 1, 1, 0, 1, 1, 0}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1,
0}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 0, 1,
1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {12,
10}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}}, {{0,
0}, {13, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1,
1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1}, {0,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1,
0, 1, 0}}, {{0, 0}, {13, 10}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1,
1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 0, 1, 1, 1, 1,
1, 1, 1}, {0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 0, 0, 1,
1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {13, 9}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"21","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {0, 0, 0}, {1, 1, 0}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0, 1}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 0, 0}, {0, 1, 0}, {0, 0, 1}, {0, 0, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 0, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1}, {0, 0, 1, 1, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 0,
1}, {0, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 0, 0}, {1, 1, 0, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1,
0}, {0, 0, 1, 0, 1, 1}, {0, 0, 1, 1, 1, 0}, {1, 0, 0, 0, 0, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 0, 0, 0, 1}, {1, 1, 1, 1, 0}, {0, 1,
1, 1, 0}, {0, 0, 0, 0, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 0, 0, 1, 0}, {0, 1,
0, 1, 0}, {1, 0, 1, 1, 0}, {1, 1, 1, 1, 0}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {0, 0, 1, 1, 0, 1}, {1, 0, 0, 0, 1,
1}, {1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {1, 0, 1, 1, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 1, 1, 1, 1}, {0, 1, 1, 0, 1}, {1, 0,
1, 0, 0}, {1, 1, 0, 1, 0}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 1}, {1, 1, 0, 0, 0}, {1, 1, 0, 0, 0}, {1, 1,
0, 1, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {1, 1, 1, 0, 1}, {0, 0,
1, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 0, 0, 1, 1}, {1, 1, 1, 0, 0}, {1, 1,
0, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 1, 0, 1, 1}, {0, 1, 1, 1, 1}, {1, 1,
1, 1, 0}, {1, 1, 0, 1, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"22","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 0, 0}, {1, 0, 0}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {1, 1, 1, 0}, {0, 1, 0, 1}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 1, 0}, {0, 0, 0}, {0, 0, 1}, {0, 1, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 0, 0, 0,
0}, {1, 0, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0}, {1, 1, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 0, 0, 0}, {1, 1,
0, 1, 1, 0, 1, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1, 0}, {0, 0, 0, 0}, {0, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0, 0}, {1, 0, 1, 1, 0,
1}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 1, 1, 0,
0}}, {{0, 0}, {6, 3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0,
0}, {6, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}, {{5, 0}, {5, 3}}, {{6, 0}, {6,
3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0,
1, 1, 1, 1, 0, 1}}, {{0, 0}, {8, 3}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{0, 0, 1, 1, 1, 1, 0, 0}}, {{0, 0}, {8, 1}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}],"\" \"",
GraphicsBox[{}, ImageSize -> {30, 30}]},
"RowDefault"]},
{
TemplateBox[{"23","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 0, 1}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 0, 1, 1, 0}, {0, 0, 1, 0, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {0, 0, 1, 1, 0}, {0, 0, 1, 0, 0}, {0, 0,
1, 0, 0}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 1, 0, 0}, {1, 0, 0, 0, 0, 0, 1}, {1, 1, 0, 0,
0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1,
1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {
1, 1, 0, 0, 0, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {0, 0, 0, 1,
1, 1, 0, 0, 0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 0, 0, 0,
1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {
1, 0, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 1, 0,
1, 0, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1,
0, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {0, 0, 0, 1, 0, 1, 0,
1, 0, 0, 0}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1,
1, 0, 0, 1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 0,
1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0,
0, 1, 1}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {0, 0, 0, 1, 1, 0,
1, 0, 1, 1, 0, 0, 0}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {13, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1,
0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {0, 1, 1, 0, 1, 1, 0, 1, 1, 0,
1, 1, 0}, {0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0}, {0, 1, 1, 0, 1, 1,
0, 1, 1, 0, 1, 1, 0}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {13,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 1, 0,
0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0}, {1, 1,
1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {15, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 0, 1, 0,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
9}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1,
1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {30, 30},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.706348112706543*^9, 3.7063484505765533`*^9, {3.7063485144993057`*^9,
3.7063485737983503`*^9}, 3.7063486806940613`*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], ",", "0"}], "]"}], ">", "1"}],
")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"\[Equal]", "9"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], "\[Equal]", "4"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "2"}], ")"}]}],
"&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"BDM", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "7", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347522978153*^9, 3.706347539880904*^9}, {
3.706347591651909*^9, 3.7063476189915533`*^9}, {3.7063479487614927`*^9,
3.706348020962656*^9}, 3.706348811113661*^9, {3.706348850220913*^9,
3.70634885426597*^9}, {3.706348963852653*^9, 3.706349053078001*^9}, {
3.706349101626422*^9, 3.706349108975068*^9}, {3.706349171688693*^9,
3.7063491750403433`*^9}, {3.706349329048071*^9, 3.7063493764711533`*^9}, {
3.706349415527505*^9, 3.706349469590496*^9}, {3.706349547182315*^9,
3.706349556572278*^9}, {3.7063508835266047`*^9, 3.7063508838746843`*^9}, {
3.706350949084787*^9, 3.70635095273308*^9}, 3.70635131457586*^9,
3.7063514281950397`*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7B9aNJ/S1OJ2gAo4FK6237b1F4zP4WAokBhw
PQjGF3BQ/BLDvGYBF5Qv4jC99pH7PBWYvIRDnmiDp+ZxmLyMg8PCBKn3f2B8
BQc+9YcTLjnC1Cs5ZEUUrD+cBpNXcQh4cOdK2DaYvJrDb1Hvci55YShfw8He
+3vKk+1CUL6WA68qj3/YCxhfx4HDZnNI024BKF/P4fOtau2zzjC+gUP4nVmG
dbWCUL6hw7I5ErtPpMD4Rg68GuunGTyHmWfs4KOz6IjJPhjfxOG2aual6vMw
vqnD1/rXNZa/hRwATBFPKA==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7GflLK9dv4zbASrg0OD+xPHUfxifw0HWc3kc
kz+ML+Bw48HTds2JML6Ig+QE11kOa2B8CYfvbnf2X/GE8WUcone6TJw9gwvK
V3B4cOO4z7yDML6Sg6BS1yzvtUJQvoqDY9Cl8+f28EP5ag7zdN7e3rcLJq/h
kM3+Nlv0Moyv5XCJ3TN3+3+Yeh2HlsVba3T4BKB8PQfNDQV/7FRhfAOHddI2
Yq6HYPoNHd5M4HzXch3GN3IIS45/t4tVGMo3dtiqUBwgehgmb+IQEMy5328P
jG/qkHRTrmLmOSEHAJVYUcc=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7OsYZvotPsrlABVwKFxtv23rL24on8PBUCAx
4HoQjC/goPglhnnNAph6EYfptY/c56nA5CUc8kQbPDWPw+RlHBwWJki9/wPj
KzjwqT+ccMkRpl7JISuiYP3hNJi8ikPAgztXwrbB5NUcfot6l3PJC0P5Gg72
3t9TnmwXgvK1HHhVefzDXsD4Og4cNptDmnYLQPl6Dp9vVWufdYbxDRzC78wy
rKsVhPINHZbNkdh9IgXGN3Lg1Vg/zeA5zDxjBx+dRUdM9sH4Jg63VTMvVZ+H
8U0dvta/rrH8LeQAAGEATzs=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7OW7GJYnsHE7QAUclLV3dp6Q5YHyORySPrEd
nacMkxdwkLfQW1fiyg7li6DxJRzufXj1718BTL2MQ/GPkEur4XwFh7iFa0yt
LWDmK6HxVRxE1zb177/PBeWrOWTMkes/aQzjazgY/DEtXaDFCeVrOZQcXx9S
8gDG13GIkQneeWIdTL2eQ8lmM3PjK0JQvoGDMof5NdV9ML6hw/1ZUe/W3Ybx
jRx0NB9zTVEXhvKNHb5WVIUumgmTN3EI/fHIvvEpjG/qsFXbR/XSVSEHAOEw
Tek=
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7B0DN2jc52N3gAo4ZE0q8k+/yw3lczhwG1yZ
9W8bG5Qv4PAuSCvnBzsPlC/iIMvPUDm9nwvKl3BYovYi8dpTmH4Zh025TL1p
u2F8BYem0307u1tg6pUcvNOWMTobwMxTcQiU/F6WcRkmr+aw/q/guUW5MP0a
Dg1+wdFpM2HyWg7xzd+tH4fA9Os47DkgelFvA0y9nsPVu1fLDhrB1Bs47P56
/7XRFBjf0MGhttm3UwDGN3I49najqMI3Fijf2OFavJhcc9UbewjfBI1vCucD
AHokUZU=
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7K1vxixZasXtABVwUNkUzz1pJ4zP4fDm5L6p
Ghs5oXwBB9bLzqJhn9mgfBGH9dY736ycAeNLOKyfuNP51BouKF/GITblryZn
Jg+Ur+DwWy6hoaONHcpXclizfOvcjmKYvIpDWk6y/lE1mHlqDjmvCxZ8bYGZ
p+HgEvzvnNdNmLyWQ3KczeUmfxhfB01ez0Heuyz+/ot/9hC+gUOQ3Kndffs+
Q/mGDtfixeSaq95A+UZofGM0vgka3xTOBwB60FVw
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7NNykvWPqrE5QAUcJHa6VL++wA3lcziERZw2
XjKTC8oXcJiVvmKWeS5MXsThWr6v+HE5mLyEw9u2+1v+SMP4Mg5/BD6mzxGG
8RUcThnoPzSfLwTlKzkcmjCr9MhnGF/FwVT86tWAxTC+mkMGU/qHeedhfA2H
+1+OWlpeEoXytRz4OLJLlzaLQPk6DmV5lUYximJQvp7D5s3LTDNnwPQbOAj2
O026rCgA5Rs6dEe+7mnpFobyjdD4xmh8EzS+KZwPALqKUj4=
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9g8tmk9panE7QAUcClfbb9v6C8bncDAU
SAy4HgTjCzgofolhXrOAC8oXcZhe+8h9ngpMXsIhT7TBU/M4TF7GwWFhgtT7
PzC+ggOf+sMJlxxh6pUcsiIK1h9Og8mrOAQ8uHMlbBtMXs3ht6h3OZe8MJSv
4WDv/T3lyXYhKF/LgVeVxz/sBYyv48BhszmkabcAlK/n8PlWtfZZZxjfwCH8
zizDulpBKN/QYdkcid0nUmB8IwdejfXTDJ7DzDN28NFZdMRkH4xv4nBbNfNS
9XkY39Tha/3rGsvfQg4AVc1PKg==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9rNylteuX8btABVwaHB/4njqP4zP4SDr
uTyOyR/GF3C48eBpu+ZEGF/EQXKC6yyHNTC+hMN3tzv7r3jC+DIO0TtdJs6e
wQXlKzg8uHHcZ95BGF/JQVCpa5b3WiEoX8XBMejS+XN7+KF8NYd5Om9v79sF
k9dwyGZ/my16GcbXcrjE7pm7/T9MvY5Dy+KtNTp8AlC+noPmhoI/dqowvoHD
OmkbMddDMP2GDm8mcL5ruQ7jGzmEJce/28UqDOUbO2xVKA4QPQyTN3EICObc
77cHxjd1SLopVzHznJADAJ8UUck=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9nUMM/0WH+VygAo4FK6237b1FzeUz+Fg
KJAYcD0IxhdwUPwSw7xmAUy9iMP02kfu81Rg8hIOeaINnprHYfIyDg4LE6Te
/4HxFRz41B9OuOQIU6/kkBVRsP5wGkxexSHgwZ0rYdtg8moOv0W9y7nkhaF8
DQd77+8pT7YLQflaDryqPP5hL2B8HQcOm80hTbsFoHw9h8+3qrXPOsP4Bg7h
d2YZ1tUKQvmGDsvmSOw+kQLjGznwaqyfZvAcZp6xg4/OoiMm+2B8E4fbqpmX
qs/D+KYOX+tf11j+FnIAAGq8Tz0=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9vJdDMsT2LgdoAIOyto7O0/I8kD5HA5J
n9iOzlOGyQs4yFvorStxZYfyRdD4Eg73Prz6968Apl7GofhHyKXVcL6CQ9zC
NabWFjDzldD4Kg6ia5v699/ngvLVHDLmyPWfNIbxNRwM/piWLtDihPK1HEqO
rw8peQDj6zjEyATvPLEOpl7PoWSzmbnxFSEo38BBmcP8muo+GN/Q4f6sqHfr
bsP4Rg46mo+5pqgLQ/nGDl8rqkIXzYTJmziE/nhk3/gUxjd12Krto3rpqpAD
AOrsTes=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9o6BGzTu87E7QAUcsiYV+aff5YbyORy4
Da7M+reNDcoXcHgXpJXzg50HyhdxkOVnqJzezwXlSzgsUXuReO0pTL+Mw6Zc
pt603TC+gkPT6b6d3S0w9UoO3mnLGJ0NYOapOARKfi/LuAyTV3NY/1fw3KJc
mH4Nhwa/4Oi0mTB5LYf45u/Wj0Ng+nUc9hwQvai3AaZez+Hq3atlB41g6g0c
dn+9/9poCoxv6OBQ2+zbKQDjGzkce7tRVOEbC5Rv7HAtXkyuueqNPYRvgsY3
hfMBg+BRlw==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9tY3Y5YsteJ2gAo4qGyK5560E8bncHhz
ct9UjY2cUL6AA+tlZ9Gwz2xQvojDeuudb1bOgPElHNZP3Ol8ag0XlC/jEJvy
V5MzkwfKV3D4LZfQ0NHGDuUrOaxZvnVuRzFMXsUhLSdZ/6gazDw1h5zXBQu+
tsDM03BwCf53zusmTF7LITnO5nKTP4yvgyav5yDvXRZ//8U/ewjfwCFI7tTu
vn2foXxDh2vxYnLNVW+gfCM0vjEa3wSNbwrnAwCEjFVy
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9mk5yfpH1dgcoAIOEjtdql9f4IbyORzC
Ik4bL5nJBeULOMxKXzHLPBcmL+JwLd9X/LgcTF7C4W3b/S1/pGF8GYc/Ah/T
5wjD+AoOpwz0H5rPF4LylRwOTZhVeuQzjK/iYCp+9WrAYhhfzSGDKf3DvPMw
vobD/S9HLS0viUL5Wg58HNmlS5tFoHwdh7K8SqMYRTEoX89h8+ZlppkzYPoN
HAT7nSZdVhSA8g0duiNf97R0C0P5Rmh8YzS+CRrfFM4HAMRGUkA=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {0.6875000000000002, 0.5529905151376258},
PlotRange -> {{1., 21.}, {0.632031590560437, 5.53257826677474}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0.6875000000000002, 0.5529905151376258}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {1.6094379124341003`, 2.302585092994046, 3.912023005428146,
4.605170185988092}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {0.632031590560437, 5.53257826677474}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6,
",", #7}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706347596911862*^9, 3.706347620686816*^9}, {
3.706347954605566*^9, 3.706347978221334*^9}, {3.7063480093377523`*^9,
3.706348022541574*^9}, 3.7063488122165203`*^9, 3.7063488561103783`*^9, {
3.706349020875803*^9, 3.7063490576076508`*^9}, 3.7063491120880127`*^9,
3.706349176855036*^9, {3.706349447389086*^9, 3.706349470616679*^9},
3.7063495576181917`*^9, 3.7063508847353163`*^9, 3.706350953782709*^9,
3.706351315486702*^9, 3.706351429784171*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "7", "]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"40", ",", "40"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]",
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], ">", "6"}], ")"}], "||",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "6"}],
")"}]}], ",", "None", ",", "All"}], "]"}]}]}], "]"}],
"&"}], ",",
RowBox[{"Map", "[",
RowBox[{"ArrayTrim", ",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "15"}], "]"}], "&"}],
"/@",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.",
" ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], ",", "0"}], "]"}], ">",
"1"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"\[Equal]", "9"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], "\[Equal]", "4"}],
")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "2"}],
")"}]}], "&"}]}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ",", "1", ",", "1", ",", "1", ",", "\"\<\>\""}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706347375813176*^9, 3.706347377211369*^9}, {
3.7063475747690372`*^9, 3.7063475748505707`*^9}, {3.706347840586893*^9,
3.706347859712302*^9}, 3.706348094193984*^9, {3.706348313645671*^9,
3.706348407037006*^9}, {3.7063487422528257`*^9, 3.706348765543229*^9},
3.706348869933325*^9, 3.706349191350424*^9, {3.70634928285226*^9,
3.7063492920084677`*^9}, {3.706381055996964*^9, 3.706381063480754*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TemplateBox[{"1","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 1,
0, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {0, 1, 1, 1, 0}, {1, 1,
0, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 0,
1}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0,
1, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 0, 1, 0, 0}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 0, 0,
1, 0, 0}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 0, 1, 1, 1}, {0, 1,
1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 1, 0, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 1}, {
1, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1, 0, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 0, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0, 0,
0, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 1, 1, 1, 1}, {0, 0,
0, 0, 1, 0, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1,
0}, {1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 0}, {1, 0, 0, 1,
1, 1, 1}, {0, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 0,
0, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 10}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 0,
0, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 0,
1, 1, 0}, {1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {7,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {0, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 1,
0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1}}, {{0, 0}, {7, 12}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"2","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 1, 1, 0}, {1, 1,
1, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 0}, {1, 1, 1, 0, 0}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 0, 1}, {1, 1, 0, 1, 0,
1}, {1, 1, 0, 1, 1, 0}, {1, 1, 1, 0, 0, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 0, 0}, {1, 0,
1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 0}, {0, 0,
1, 0, 0}, {1, 0, 1, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {1, 0, 1, 0, 0, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {1, 0, 0, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 1, 1}}, {{0, 0}, {7, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
0, 1, 1}, {0, 1, 1, 0, 0, 0, 1}, {0, 1, 0, 1, 1, 0, 0}, {1, 0, 1, 1,
0, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 1, 1, 0, 1, 1}, {1, 0,
0, 1, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 0, 1, 1, 1,
0}, {1, 1, 0, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 1,
0, 1, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 1, 1, 1}, {
0, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1,
1, 0, 1, 0, 1}, {1, 1, 1, 0, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1,
1, 1}}, {{0, 0}, {9, 7}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 1}, {
1, 1, 0, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 0, 1}, {0, 0, 1, 1,
1, 1, 0, 0, 0}, {1, 0, 0, 0, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1}, {
1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 1,
1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 0, 1, 0}, {0, 1, 1, 0, 1, 1, 0,
1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {0, 1}],
Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 0, 1, 1, 1, 1, 0, 1, 0, 1}, {
0, 0, 1, 1, 1, 0, 0, 1, 0, 0}}, {{0, 0}, {10, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1}, {0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0}, {1, 0, 0, 1, 1, 1, 0,
0, 1, 0, 0}}, {{0, 0}, {11, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 0,
1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 0, 1, 0,
0}}, {{0, 0}, {10, 6}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1}, {0, 1,
1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 0}, {1, 1, 1, 0,
0, 1, 0, 0}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"3","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 1, 0, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 0, 1, 1, 0}, {1, 1,
1, 0, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1}, {0, 0, 0, 1, 1}, {0, 1, 1, 0, 1}, {1, 1,
0, 0, 0}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {0, 1, 1, 1, 0}, {1, 1,
0, 0, 0}, {1, 1, 1, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 0,
1}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 0,
1, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 0, 1, 0, 0}, {1, 1, 0, 0, 1, 0, 0}, {1, 1, 0, 0,
1, 0, 0}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 0, 1, 1, 1}, {0, 1,
1, 1, 0, 1, 1, 1}, {0, 0, 1, 0, 1, 0, 1, 1}, {0, 0, 1, 0, 1, 0, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 0}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 1}, {
1, 0, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 1, 1, 0, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 0, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 0, 0, 0, 0,
0, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 0, 0, 0, 1, 1, 1, 1}, {0, 1, 0, 0, 1, 1, 1, 1}, {0, 0,
0, 0, 1, 0, 0, 1}, {0, 1, 1, 1, 1, 1, 1, 0}, {1, 0, 0, 0, 1, 1, 1,
0}, {1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {0, 1, 1, 1,
1, 1, 1}, {0, 1, 1, 0, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 0}, {1, 0, 0, 1,
1, 1, 1}, {0, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 0,
0, 0, 1}, {1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {7, 10}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 0,
0, 1, 1}, {1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 0, 1}, {1, 1, 1, 0,
1, 1, 0}, {1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0}}, {{0, 0}, {7,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1}, {0, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1}, {1, 0, 1, 1,
0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1}}, {{0, 0}, {7, 12}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"4","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 0, 0, 1}, {1, 1, 1, 0}, {1, 1, 1, 0}, {
1, 0, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 1}, {0, 1, 0, 1}, {1, 0, 1, 0}, {1, 1, 1, 0}, {
1, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 0, 0}, {1, 0, 1, 0}, {1, 1, 1, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {0, 1, 0, 0}, {1, 0, 1, 1}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 0, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0}, {0, 1, 1, 0}, {0, 1, 1, 0}, {1, 0, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 0, 0, 0, 1}, {0, 1, 1, 0, 0}, {0, 1,
1, 0, 1}, {1, 0, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 1}, {1, 0, 1, 1, 0}, {0, 1, 1, 1, 0}, {0, 1,
1, 0, 0}, {1, 0, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1}, {0, 0, 1, 1, 0,
1}, {0, 0, 1, 1, 0, 0}, {0, 1, 0, 0, 0, 1}, {1, 0, 0, 0, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1, 1}, {1, 1, 1, 1,
1, 0, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 0}, {1, 1, 0, 1,
1, 0, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1}, {1, 0, 1, 0,
1, 1, 1}, {1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1,
0, 0, 1}, {1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1, 1, 1}, {0, 1, 0, 1, 1, 1}, {0, 1, 0, 1, 1,
1}, {1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 0}, {1, 1, 1, 0, 0, 0}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1}, {0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 1, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 1, 1, 1}, {0, 0,
1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 1, 0, 1, 1, 0}, {1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1,
1, 0, 0, 1}}, {{0, 0}, {8, 8}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"5","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {1, 0, 0, 1}, {1, 1, 1, 0}, {0, 1, 1, 0}, {
0, 1, 0, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 1}, {0, 1, 0}, {0, 0, 0}, {0, 1, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 0, 1, 0}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 0, 1}, {0, 0, 1, 1, 0,
0}, {1, 0, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1}}, {{0, 0}, {6, 5}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0, 3}, {6, 3}}, {{0,
2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}, {{6, 0}, {6,
5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1, 1}, {0, 0, 1, 1, 0, 0}, {0, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 0, 1}, {1, 0, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 0, 0, 1}, {0, 0, 1, 1, 1, 0}, {0, 0, 1, 0, 1,
1}, {1, 1, 0, 1, 1, 0}, {1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {0, 0, 0, 0, 0}, {0, 1, 1, 1, 0}, {1, 1,
1, 1, 0}, {1, 0, 0, 0, 1}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0}, {1, 0, 1, 1, 0}, {0, 1, 0, 1, 0}, {1, 0,
0, 1, 0}, {1, 0, 1, 1, 0}, {1, 0, 1, 0, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 0, 0}, {1, 0, 1, 0, 1, 1}, {1, 1, 0, 1, 1,
1}, {1, 0, 0, 0, 1, 1}, {0, 0, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1}}, {{
0, 0}, {6, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {6, 6}}, {{0, 5}, {6, 5}}, {{0, 4}, {6, 4}}, {{0,
3}, {6, 3}}, {{0, 2}, {6, 2}}, {{0, 1}, {6, 1}}, {{0, 0}, {6,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}, {{6, 0}, {6,
6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 0}, {1, 0, 1, 0, 0}, {0, 1, 1, 0, 1}, {0, 1,
1, 1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 0}, {1, 1, 0, 0, 0}, {1, 1, 0, 0, 0}, {0, 0,
1, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0, 1, 0, 1}, {0, 0,
0, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 0, 0}, {1, 1, 1, 0, 1}, {0, 0, 0, 1, 1}, {1, 0,
1, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0}, {1, 1, 1, 0, 0}, {0, 0, 0, 1, 1}, {0, 0,
0, 1, 1}}, {{0, 0}, {5, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0,
1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}, {{5, 0}, {5, 4}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1}, {1, 1, 0, 1, 0}, {1, 1, 1, 1, 0}, {0, 1,
1, 1, 1}, {0, 1, 0, 1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 6}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {5, 6}}, {{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0,
3}, {5, 3}}, {{0, 2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}, {{5, 0}, {5, 6}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"6","\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1, 1}, {0, 0, 0, 1}, {0, 1, 0, 0}, {1, 1, 0, 0}, {
1, 0, 0, 1}, {1, 0, 1, 1}}, {{0, 0}, {4, 6}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {4, 6}}, {{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0,
3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}, {{4, 0}, {4, 6}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0, 1}, {0, 1, 1, 1, 0}, {1, 0, 1, 1, 1}, {1, 1,
0, 1, 0}, {1, 1, 0, 0, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {1, 1, 0, 1}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 1, 1}, {0, 1, 1}, {1, 0, 0}, {1, 0, 0}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0, 1}, {1, 1, 0, 1}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {0, 1, 1}, {1, 0, 1}, {1, 0, 0}, {0, 1, 1}, {1,
0, 0}}, {{0, 0}, {3, 6}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 6}, {3, 6}}, {{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0,
3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3,
0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 6}}, {{1, 0}, {1, 6}}, {{2, 0}, {2, 6}}, {{3,
0}, {3, 6}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 1}, {0, 0, 0}, {0, 0, 0}, {0, 1, 1}, {1, 0, 1}}, {{
0, 0}, {3, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {3, 5}}, {{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0,
2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 0}, {0, 1, 1, 1}, {0, 1, 1, 0}, {1, 0, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0, 0}, {0, 0, 0}, {1, 1, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {0, 1, 1, 0}, {1, 1, 0,
1}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0,
1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1, 1}, {0, 1, 0, 1}, {1, 1, 0, 0}}, {{0, 0}, {4,
3}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0,
0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}, {{4, 0}, {4, 3}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 1, 1}, {1, 0, 0}, {0, 0, 0}}, {{0, 0}, {3, 3}}, {0,
1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0, 1}, {3, 1}}, {{0,
0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}, {{3,
0}, {3, 3}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 1}, {1, 1, 0}, {0, 1, 0}, {1, 0, 1}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0}, {1, 0}, {0, 1}}, {{0, 0}, {2, 3}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 3}, {2, 3}}, {{0, 2}, {2, 2}}, {{0, 1}, {2, 1}}, {{0,
0}, {2, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 3}}, {{1, 0}, {1, 3}}, {{2, 0}, {2, 3}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{0, 0}}, {{0, 0}, {2, 1}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 1}, {2, 1}}, {{0, 0}, {2, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 1}}, {{1, 0}, {1, 1}}, {{2, 0}, {2, 1}}}]}}},
Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]},
{
TemplateBox[{"7","\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {3,
4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{0,
1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{3,
0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 0, 0, 1}, {0, 1, 1, 0}, {0, 1, 1, 0}, {0, 1, 0, 1}, {
1, 0, 1, 1}}, {{0, 0}, {4, 5}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {4, 5}}, {{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0,
2}, {4, 2}}, {{0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 0, 1, 1, 0}, {0, 0, 1, 0, 0}, {1, 0,
1, 0, 1}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {0, 0, 1, 1, 0}, {0, 0, 1, 0, 0}, {0, 0,
1, 0, 0}, {1, 1, 0, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {{
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}]}, {
Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}]}}}, Frame ->
False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7,
5}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1}, {1, 0, 0, 0,
0, 0, 1}, {0, 0, 1, 1, 1, 0, 0}, {1, 0, 0, 0, 0, 0, 1}, {1, 1, 0, 0,
0, 1, 1}, {1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1}, {0, 1, 1, 1,
1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 1, 0}, {1, 0, 1, 1,
1, 0, 1}, {1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {7, 7}}, {0, 1}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {
1, 1, 0, 0, 0, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {0, 0, 0, 1,
1, 1, 0, 0, 0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 0, 0, 0,
1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {
1, 0, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 1, 0,
1, 0, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1,
0, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1}}, {{
0, 0}, {9, 9}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {0, 0, 0, 1, 0, 1, 0,
1, 0, 0, 0}, {1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1}, {1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0,
1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1,
1, 0, 0, 1}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 0,
1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 1,
1, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0,
0, 1, 1}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {0, 0, 0, 1, 1, 0,
1, 0, 1, 1, 0, 0, 0}, {1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {13, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1,
0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {0, 1, 1, 0, 1, 1, 0, 1, 1, 0,
1, 1, 0}, {0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0}, {0, 1, 1, 0, 1, 1,
0, 1, 1, 0, 1, 1, 0}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {13,
11}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 0, 1, 0,
0, 1, 1, 1, 1}, {0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0}, {1, 1,
1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {15, 13}}, {0, 1}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 0,
1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 0, 1, 0,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
9}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}],"\" \"",GraphicsBox[
RasterBox[{{1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1,
1, 1, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}}, {{0, 0}, {11,
7}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {40, 40},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]},
"RowDefault"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.7063478676899242`*^9, 3.7063480961535797`*^9, {3.706348329290551*^9,
3.706348373081984*^9}, 3.706348408809082*^9, 3.706348768119501*^9,
3.706348874577875*^9, 3.70634919359022*^9, 3.706349294356319*^9, {
3.706381059095991*^9, 3.706381065270055*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], ",", "0"}], "]"}], ">", "1"}],
")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"\[Equal]", "9"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], "\[Equal]", "4"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "2"}], ")"}]}],
"&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ByteCount", "[",
RowBox[{"Compress", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "7", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.70635085252002*^9, 3.706350876937011*^9}, {
3.706350935769311*^9, 3.706350939487114*^9}, {3.7063513198336678`*^9,
3.706351326091608*^9}, 3.706351431094404*^9}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozPgcYXcHg0
28z09mQYXwRNXgKNL4PGV3A4Welik6ImDOUrOWz8JDW/KgPGV0HjqznUzru8
R+whjK/hEKC/QKlEQgTK13IoF53N0L8MJq+Dpl4PTd4ATb8hmnojNHljNP0m
aOpN4e4FACmBTno=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozP4fBotpnp
7ckwvgCavAgaX8LhZKWLTYqaMJQvg8ZXcNj4SWp+VQaMr+RQLjqboX8ZjK/i
UDvv8h6xhzC+GhpfA029Fpq8Dpq8HhrfAE29IZq8EZq8MZq8CZq8qUOA/gKl
EgkRBwAmF07k
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozPgcYXcHg0
28z09mQYXwRNXgKNL4PGV3A4Welik6ImDOUrOWz8JDW/KgPGV0HjqznUzru8
R+whjK/hEKC/QKlEQgTK13IoF53N0L8MJq+Dpl4PTd4ATb8hmnojNHljNP0m
aOpN4e4FACmBTno=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozPgcYXcEBV
L+LwaLaZ6e3JML4EGl8Gja+AxldCM1/F4WSli02KmjCUr4bG13DY+ElqflUG
jK+FxtdBM0/PoVx0NkP/Mpi8AZp6QzR5I4em4+Gxv3xEoHxjhwD9BUolEjC+
CZp6UzgfAFqDTno=
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7B/NNjO9PVnIASrg0LuZU3vffRifwwFVXgBN
XsThZKWLTYqaMJQv4bDxk9T8qgwYXwZNXgFNvxIaXwVNvRqavAaae7TQ5HXQ
+Hpo6g3QzDdE4xs5/FjCXvfEEabe2MGloeKvYbsglG+CxjeF8wH0208Y
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozPgcYXcHg0
28z09mQYXwSNL+GAap4Mmn4FNPVKaOpV0PhqaOo10PhaaOp10OT10OQNHBIK
Y3+feiEI5Rs6uDRU/DVsh/GN0PjGaHwTNL4pnA8AsqRU2A==
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7H8sYa974ijkABVw6N3Mqb3vPozPgcYXQOOL
OJysdLFJUROG8iXQ+DJofAWHctHZDP3LYHwlh9p5l/eIPYTxVRwC9BcolUiI
QPlqaPIaDnN32ERPXgeT10JTr+PQdDw89pcPjK/nsPGT1PyqDJh+AzT3G6K5
xwiNb4zGN0Hjm8L5AMHZSqc=
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bnQOML
ODyabWZ6ezKML4ImL4HGl0HjKzicrHSxSVEThvKVHDZ+kppflQHjq6Dx1Rxq
513eI/YQxtdwCNBfoFQiIQLlazmUi85m6F8Gk9dBU6+HJm+Apt8QTb0Rmrwx
mn4TNPWmcPcCADM9Tnw=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bncHg0
28z09mQYXwBNXgSNL+FwstLFJkVNGMqXQeMrOGz8JDW/KgPGV3IoF53N0L8M
xldxqJ13eY/YQxhfDY2vgaZeC01eB01eD41vgKbeEE3eCE3eGE3eBE3e1CFA
f4FSiYSIAwAv007m
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bnQOML
ODyabWZ6ezKML4ImL4HGl0HjKzicrHSxSVEThvKVHDZ+kppflQHjq6Dx1Rxq
513eI/YQxtdwCNBfoFQiIQLlazmUi85m6F8Gk9dBU6+HJm+Apt8QTb0Rmrwx
mn4TNPWmcPcCADM9Tnw=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bnQOML
OKCqF3F4NNvM9PZkGF8CjS+DxldA4yuhma/icLLSxSZFTRjKV0Pjazhs/CQ1
vyoDxtdC4+ugmafnUC46m6F/GUzeAE29IZq8kUPT8fDYXz4iUL6xQ4D+AqUS
CRjfBE29KZwPAGQ/Tnw=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9o9mm5nenizkABVw6N3Mqb3vPozP4YAq
L4AmL+JwstLFJkVNGMqXcNj4SWp+VQaML4Mmr4CmXwmNr4KmXg1NXgPNPVpo
8jpofD009QZo5hui8Y0cfixhr3viCFNv7ODSUPHXsF0QyjdB45vC+QD+l08a
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bnQOML
ODyabWZ6ezKML4LGl3BANU8GTb8CmnolNPUqaHw1NPUaaHwtNPU6aPJ6aPIG
DgmFsb9PvRCE8g0dXBoq/hq2w/hGaHxjNL4JGt8UzgcAvGBU2g==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9j+WsNc9cRRygAo49G7m1N53H8bnQOML
oPFFHE5WutikqAlD+RJofBk0voJDuehshv5lML6SQ+28y3vEHsL4Kg4B+guU
SiREoHw1NHkNh7k7bKInr4PJa6Gp13FoOh4e+8sHxtdz2PhJan5VBky/AZr7
DdHcY4TGN0bjm6DxTeF8AMuVSqk=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 4.324799890776475},
PlotRange -> {{1., 21.}, {4.3382234479869775`, 5.170483995038151}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {0.6875000000000002, 4.324799890776475}, DisplayFunction :>
Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {4.382026634673881, 4.605170185988092, 4.787491742782046,
4.941642422609304, 5.075173815233827, 5.19295685089021}},
GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compress\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {4.3382234479869775`, 5.170483995038151}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6,
",", #7}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{{3.706350856996657*^9, 3.706350877913741*^9},
3.7063509404861507`*^9, {3.70635132215623*^9, 3.7063513275626907`*^9},
3.706351432545842*^9}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"cases", "=",
RowBox[{"Select", "[",
RowBox[{
RowBox[{"Rest", "[",
RowBox[{
RowBox[{"(",
RowBox[{"ArrayTrim", "/@",
RowBox[{"Union", "[",
RowBox[{"Map", "[",
RowBox[{"Sort", ",",
RowBox[{"Sort", "[",
RowBox[{"Sort", "/@",
RowBox[{"(",
RowBox[{"Tuples", "[",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ")"}]}], "]"}],
",",
RowBox[{"{", "2", "}"}]}], "]"}], "]"}]}], ")"}], "/.", " ",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], ",", "0"}], "]"}], ">", "1"}],
")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"Flatten", "[", "#", "]"}], ",", "1"}], "]"}],
"\[Equal]", "9"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[", "#", "]"}], "\[Equal]", "4"}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{"Length", "[",
RowBox[{"Transpose", "[", "#", "]"}], "]"}], ">", "2"}], ")"}]}],
"&"}]}], "]"}]}], "}"}], ",",
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[",
RowBox[{"Entropy", "[", "#", "]"}], "]"}], "&"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayTrim", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{"GameOfLife", ",",
RowBox[{"{",
RowBox[{"#", ",", "0"}], "}"}], ",", "20"}], "]"}]}], "&"}], "/@",
"cases"}], ")"}], "/.",
RowBox[{
RowBox[{"{", "}"}], "\[Rule]",
RowBox[{"{",
RowBox[{"{", "0", "}"}], "}"}]}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], ",",
RowBox[{"PlotMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{"Automatic", ",", "Large"}], "}"}]}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotTheme", "->", "\"\<Business\>\""}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"(",
RowBox[{"Row", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Riffle", "[",
RowBox[{"#", ",", "\"\< \>\""}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"Flatten", "/@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}], "&"}], "/@",
"cases"}], ")"}], ",",
RowBox[{"Range", "[", "7", "]"}]}], "}"}], "]"}]}], ")"}]}],
")"}]}], ")"}]}], ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy\>\"", ",", "16", ",", "Black"}], "]"}]}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Style", "[",
RowBox[{"\"\<runtime\>\"", ",", "14", ",", "Black"}], "]"}], ",",
RowBox[{"Style", "[",
RowBox[{"\"\<order parameter\>\"", ",", "14", ",", "Black"}],
"]"}]}], "}"}]}]}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706350863670603*^9, 3.706350865737523*^9}, {
3.7063509086379757`*^9, 3.70635092559029*^9}, {3.7063513338060513`*^9,
3.706351342896412*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgwPxC8cesgK9QPoeDce/b
744HfkL5Ag7vLX/9c9L7BuWLoPEl0PgyaPoVHFgOhlat/vEDyldyWFx2tNPl
+28oXwWNr+YAcR+DA4Sv4cDNvLbq1WRGKF8LTV7HQSx06+6N2UxQvp6Dn+c6
kfVaMPUGDjHPOnwZD8HUGzpYzVWPvrTqP9Q+IwffA2JpJ3Vg+o0dePp2/yqJ
gKk3cahrOm99zxjGN3VYwT9Dbk79P3sARuFchA==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgYNz79rvjgZ9QPocD8wvF
H7MCvkL5AmjyImh8CQcmBa1f3Kv/QPkyaHwFh/Aoo3VFSv+hfCUHiP0MDhC+
Cpq8msMK/hlyc+r/QfkaDlknduy7vPM3lK+Fpl4HzT49NL4Bmn2GaHwjB56+
3b9KImB8YzT7TNDUm8LVAwCv4VqZ
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgwPxC8cesgK9QPoeDce/b
744HfkL5Ag7vLX/9c9L7BuWLoPEl0PgyaPoVHFgOhlat/vEDyldyWFx2tNPl
+28oXwWNr+YAcR+DA4Sv4cDNvLbq1WRGKF8LTV7HQSx06+6N2UxQvp6Dn+c6
kfVaMPUGDjHPOnwZD8HUGzpYzVWPvrTqP9Q+IwffA2JpJ3Vg+o0dePp2/yqJ
gKk3cahrOm99zxjGN3VYwT9Dbk79P3sARuFchA==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgwPxC8cesgK9QPgcaX8CB
m3lt1avJH6F8ETS+hMN7y1//nPS+QfkyDqjmK6DxlRyMe99+dzzwE8pXQeOr
ObAcDK1a/eMHlK/hEB5ltK5I6T+Ur4XG13HgSGr85eUGc68e1D4GBwjfwGEF
/wy5OfX/oPKGaHwjqH8YoeqN0fgmDlJGU77+s4SpN3XIOrFj3+Wdv+0BZ9Ve
wQ==
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgYNz79rvjgZ9QPocD8wvF
H7MCvkL5Amh8ETT1Eg5MClq/uFf/gfJl0PgKDiwHQ6tW//gB5Suh8VXQ+Gpo
5ms4oLpXC42v4/De8tc/J71vUL4emrwBmnsMHTiSGn95ucH8YwTV/wzKN3Zg
QAEmaHxTOB8AIINWEg==
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgwKSg9Yt79R8on8PBuPft
d8cDP6F8AQdu5rVVryZ/hPJFHE4YlRz273wK5Us4oJon41Bv/99mmx6Mr+DA
/ELxx6yAr1C+Epp6FQeFLo5vQXFPoHw1h/eWv/456X2D8jXQ7NdC4+ugmaeH
Zp6BAwMKMETjG6HxjdH4Jmh8UzgfAJZrRvU=
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQEf7ItXW9tvWvTBHirgwPxC8cesgK9QPoeDce/b
744HfkL5AmjyIg5XnMJ+fH4A0y/hYLX+tcOLBTB5GYeFE8NDe50/QvkKDrJx
575q+MDMU0LjqzjMP/HS4YDHHyhfzWHRG/ffYQ4/oHwNh33tWx54n/0H5Wuh
qddxKAqv2rk9+TeUr+cg4a6kJP0c5h4Dh/wpvyWSbj2F8g0dlgks2/rW/AuU
b4TGN0bjm6DxTeF8AP0JZvU=
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwYH6h+GNWwFcon8PB
uPftd8cDP6F8AYf3lr/+Oel9g/JF0PgSaHwZNP0KDiwHQ6tW//gB5Ss5LC47
2uny/TeUr4LGV3OAuI/BAcLXcOBmXlv1ajIjlK+FJq/jIBa6dffGbCYoX8/B
z3OdyHotmHoDh5hnHb6Mh2DqDR2s5qpHX1r1H2qfkYPvAbG0kzow/cYOPH27
f5VEwNSbONQ1nbe+Zwzjmzqs4J8hN6f+nz0AUJ1chg==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledSquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwMO59+93xwE8on8OB
+YXij1kBX6F8ATR5ETS+hAOTgtYv7tV/oHwZNL6CQ3iU0boipf9QvpIDxH4G
BwhfBU1ezWEF/wy5OfX/oHwNh6wTO/Zd3vkbytdCU6+DZp8eGt8AzT5DNL6R
A0/f7l8lETC+MZp9JmjqTeHqAbmdWps=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDiamond]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwYH6h+GNWwFcon8PB
uPftd8cDP6F8AYf3lr/+Oel9g/JF0PgSaHwZNP0KDiwHQ6tW//gB5Ss5LC47
2uny/TeUr4LGV3OAuI/BAcLXcOBmXlv1ajIjlK+FJq/jIBa6dffGbCYoX8/B
z3OdyHotmHoDh5hnHb6Mh2DqDR2s5qpHX1r1H2qfkYPvAbG0kzow/cYOPH27
f5VEwNSbONQ1nbe+Zwzjmzqs4J8hN6f+nz0AUJ1chg==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledUpTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwYH6h+GNWwFconwON
L+DAzby26tXkj1C+CBpfwuG95a9/TnrfoHwZB1TzFdD4Sg7GvW+/Ox74CeWr
oPHVHFgOhlat/vEDytdwCI8yWlek9B/K10Lj6zhwJDX+8nKDuVcPah+DA4Rv
4LCCf4bcnPp/UHlDNL4R1D+MUPXGaHwTBymjKV//WcLUmzpkndix7/LO3/YA
cZFeww==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[FilledDownTriangle]\"", FontSize -> Large, StripOnInput ->
False], TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwMO59+93xwE8on8OB
+YXij1kBX6F8ATS+CJp6CQcmBa1f3Kv/QPkyaHwFB5aDoVWrf/yA8pXQ+Cpo
fDU08zUcUN2rhcbXcXhv+eufk943KF8PTd4AzT2GDhxJjb+83GD+MYLqfwbl
GzswoAATNL4pnA8AKj9WFA==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptyCircle]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwYFLQ+sW9+g+Uz+Fg
3Pv2u+OBn1C+gAM389qqV5M/QvkiDieMSg77dz6F8iUcUM2Tcai3/2+zTQ/G
V3BgfqH4Y1bAVyhfCU29ioNCF8e3oLgnUL6aw3vLX/+c9L5B+Rpo9muh8XXQ
zNNDM8/AgQEFGKLxjdD4xmh8EzS+KZwPAKAnRvc=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
BoxData[
FormBox[
StyleBox[
"\"\[EmptySquare]\"", FontSize -> Large, StripOnInput -> False],
TraditionalForm]], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZigIEP9sWrre03LfpgDxVwYH6h+GNWwFcon8PB
uPftd8cDP6F8ATR5EYcrTmE/Pj+A6ZdwsFr/2uHFApi8jMPCieGhvc4foXwF
B9m4c181fGDmKaHxVRzmn3jpcMDjD5Sv5rDojfvvMIcfUL6Gw772LQ+8z/6D
8rXQ1Os4FIVX7dye/BvK13OQcFdSkn4Oc4+BQ/6U3xJJt55C+YYOywSWbX1r
/gXKN0LjG6PxTdD4pnA+AAbUZvc=
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0.6875000000000002, 0},
PlotRange -> {{1., 21.}, {0, 2.302585092994046}}, PlotRangeClipping ->
True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0.6875000000000002, 0},
DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}},
FrameLabel -> {{
FormBox[
StyleBox["\"order parameter\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"runtime\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, {0., 0.5, 1., 1.5, 2.}}, GridLinesStyle ->
Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy\"", 16,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{1., 21.}, {0, 2.302585092994046}}, PlotRangeClipping ->
True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }}],FormBox[
FormBox[
TemplateBox[{
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "1"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 0, 0, 0}, {1, 1, 1,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "2"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 0, 0}, {1, 1, 1, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "3"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 0, 0}, {1, 1, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "4"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0}, {1, 1, 0}, {0, 0, 0}, {1, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "5"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{0, 0, 0, 0}, {1, 1, 1, 0}, {1, 1, 1, 0}, {1, 0, 0,
0}}, {{0, 0}, {4, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {4, 4}}, {{0, 3}, {4, 3}}, {{0, 2}, {4, 2}}, {{
0, 1}, {4, 1}}, {{0, 0}, {4, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}, {{4, 0}, {4, 4}}}]}}}, Frame -> False,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "6"}, "RowDefault"],
TemplateBox[{
GraphicsBox[{
RasterBox[{{1, 0, 0}, {1, 1, 0}, {0, 0, 0}, {0, 0, 0}}, {{0, 0}, {
3, 4}}, {0, 1}], {{Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 4}, {3, 4}}, {{0, 3}, {3, 3}}, {{0, 2}, {3, 2}}, {{
0, 1}, {3, 1}}, {{0, 0}, {3, 0}}}]}, {Antialiasing -> False,
GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
LineBox[{{{0, 0}, {0, 4}}, {{1, 0}, {1, 4}}, {{2, 0}, {2, 4}}, {{
3, 0}, {3, 4}}}]}}}, Frame -> False, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> {20, 20},
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}], "\" \"", "7"}, "RowDefault"]}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledSquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDiamond]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #3}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledUpTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #4}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[FilledDownTriangle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #5}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptyCircle]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.09096, 0.6296, 0.85532],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #6}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 15}, {30, 15}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
FormBox[
StyleBox["\"\[EmptySquare]\"",
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.11000000000000001`],
RGBColor[0.46056, 0.40064, 0.81392],
CapForm["Butt"],
AbsoluteThickness[3]], FontSize -> 15, Plain,
StripOnInput -> False], TraditionalForm],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]]]}}}, AspectRatio -> Full,
ImageSize -> {30, 15}, PlotRangePadding -> None,
ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.23333333333333334`] ->
Baseline)], #7}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.97, 0.606, 0.081]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.91, 0.318, 0.243]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.448, 0.69232, 0.1538],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.2986666666666667, 0.4615466666666667,
0.10253333333333334`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.448, 0.69232, 0.1538]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.448, 0.69232, 0.1538];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.448, 0.69232, 0.1538], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.62168, 0.2798, 0.6914],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.41445333333333334`, 0.18653333333333333`,
0.46093333333333336`], FrameTicks -> None,
PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.62168, 0.2798, 0.6914]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.62168, 0.2798, 0.6914];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.62168, 0.2798, 0.6914], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.09096, 0.6296, 0.85532],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.06064, 0.4197333333333334, 0.5702133333333333],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]], "RGBColor[0.09096, 0.6296, 0.85532]"],
Appearance -> None, BaseStyle -> {}, BaselinePosition ->
Baseline, DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.09096, 0.6296, 0.85532];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.09096, 0.6296, 0.85532], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.46056, 0.40064, 0.81392],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.30704000000000004`, 0.26709333333333335`,
0.5426133333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic,
1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[
Magnification])}]],
"RGBColor[0.46056, 0.40064, 0.81392]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.46056, 0.40064, 0.81392];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.46056, 0.40064, 0.81392], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6,
",", #7}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\"\[FilledCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledSquare]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledDiamond]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[FilledUpTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[FilledDownTriangle]\"", ",", "Large"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\"\[EmptyCircle]\"", ",", "Large"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\"\[EmptySquare]\"", ",", "Large"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{
"True", ",", "True", ",", "True", ",", "True", ",", "True",
",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.706350866609632*^9, {3.706350917024803*^9, 3.706350926545638*^9}, {
3.706351336951531*^9, 3.7063513451968822`*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell["Glider-based particle collider ", "Subsection",
CellChangeTimes->{{3.706684105534197*^9, 3.70668412353218*^9}, {
3.706685987533658*^9, 3.706685996206409*^9}, 3.725389846369978*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "->", "40"}], ",",
RowBox[{"Mesh", "->", "True"}]}], "]"}], "&"}], "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], ",", "0"}], "}"}],
",", "8"}], "]"}]}]], "Input",
CellChangeTimes->{{3.7066841265243397`*^9, 3.706684136421773*^9}, {
3.7066841794329453`*^9, 3.706684202924025*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 1, 1, 1, 1}, {0, 0, 0, 1, 1}, {1, 1, 0,
1, 1}, {1, 0, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 1, 1, 1}, {1, 0, 0, 1, 1}, {0, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {0, 1, 0, 1, 1}, {1, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 1, 1}, {1, 1, 0, 0, 1}, {1, 0, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1}, {1, 0, 0, 0, 1}, {1, 1, 1, 0, 1}, {1, 1, 0,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1}, {1, 1, 0, 0, 1}, {1, 0, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 0, 1, 0, 1}, {1, 1, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 1}, {1, 1, 1, 0, 0}, {1, 1, 0, 1, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
",",
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0}, {1, 1, 1, 1, 0}, {1, 1, 1, 0, 1}, {1, 1, 1,
1, 1}, {1, 1, 1, 1, 1}}, {{0, 0}, {5, 5}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 5}, {5, 5}}, {{0, 4}, {5, 4}}, {{0, 3}, {5, 3}}, {{0,
2}, {5, 2}}, {{0, 1}, {5, 1}}, {{0, 0}, {5, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 5}}, {{1, 0}, {1, 5}}, {{2, 0}, {2, 5}}, {{3,
0}, {3, 5}}, {{4, 0}, {4, 5}}, {{5, 0}, {5, 5}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]}],
"}"}]], "Output",
CellChangeTimes->{{3.706684128722991*^9, 3.706684139050644*^9}, {
3.706684181210527*^9, 3.706684203404805*^9}}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"glider", "=",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706687388205884*^9, 3.706687390478047*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"glider2", "=",
RowBox[{"Reverse", "[",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.7066875845083447`*^9, 3.7066875894711227`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"antiglider", "=",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.706687451067985*^9, 3.706687467416767*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"antiglider2", "=",
RowBox[{"Reverse", "/@",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}]}]}], ";"}]], "Input",\
CellChangeTimes->{{3.706687593955291*^9, 3.7066876007919807`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"particle_", ",", "coordinates_", ",", "initspace_"}], "]"}], ":=",
RowBox[{"If", "[",
RowBox[{
RowBox[{"particle", "===", "\"\<glider\>\""}], ",",
RowBox[{"ReplacePart", "[",
RowBox[{"initspace", ",",
RowBox[{"Rule", "@@@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Position", "[",
RowBox[{"glider", ",", "1"}], "]"}], ",", "1"}], "}"}], "]"}]}]}],
"]"}], ",",
RowBox[{"If", "[",
RowBox[{
RowBox[{"particle", "===", "\"\<antiglider\>\""}], ",",
RowBox[{"ReplacePart", "[",
RowBox[{"initspace", ",",
RowBox[{"Rule", "@@@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"-", "1"}],
RowBox[{"Position", "[",
RowBox[{"glider", ",", "1"}], "]"}]}], ",", "1"}], "}"}],
"]"}]}]}], "]"}], ",",
RowBox[{"If", "[",
RowBox[{
RowBox[{"particle", "===", "\"\<glider2\>\""}], ",",
RowBox[{"ReplacePart", "[",
RowBox[{"initspace", ",",
RowBox[{"Rule", "@@@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"-", "1"}],
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}]}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "&"}], "/@",
RowBox[{"Position", "[",
RowBox[{"glider", ",", "1"}], "]"}]}], ",", "1"}], "}"}],
"]"}]}]}], "]"}], ",",
RowBox[{"If", "[",
RowBox[{
RowBox[{"particle", "===", "\"\<antiglider2\>\""}], ",",
RowBox[{"ReplacePart", "[",
RowBox[{"initspace", ",",
RowBox[{"Rule", "@@@",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{
RowBox[{"-", "1"}],
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], "&"}], "/@",
RowBox[{"Position", "[",
RowBox[{"glider", ",", "1"}], "]"}]}], ",", "1"}], "}"}],
"]"}]}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.706684645886422*^9, 3.7066846818129663`*^9}, {
3.70668492342409*^9, 3.706684989675138*^9}, {3.7066850673874063`*^9,
3.7066850896108923`*^9}, {3.706685121251997*^9, 3.706685189110815*^9}, {
3.706685226829702*^9, 3.706685246015807*^9}, {3.7066852842371817`*^9,
3.7066853858938837`*^9}, {3.706685446179775*^9, 3.706685470614482*^9}, {
3.706685517914585*^9, 3.7066855738535624`*^9}, {3.706685645820792*^9,
3.7066857656524*^9}, {3.7066874181199903`*^9, 3.7066874314074173`*^9}, {
3.7066876363117933`*^9, 3.706687636408772*^9}, {3.706687687347095*^9,
3.706687740198094*^9}}],
Cell["Free particle:", "Text",
CellChangeTimes->{{3.706687774424384*^9, 3.7066877770446663`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}]}], "]"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706685582837759*^9, 3.706685629453889*^9}}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1,
1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {10, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {10, 10}}, {{0, 9}, {10, 9}}, {{0, 8}, {10, 8}}, {{0,
7}, {10, 7}}, {{0, 6}, {10, 6}}, {{0, 5}, {10, 5}}, {{0, 4}, {10,
4}}, {{0, 3}, {10, 3}}, {{0, 2}, {10, 2}}, {{0, 1}, {10, 1}}, {{0,
0}, {10, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{3,
0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{10,
0}, {10, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{{3.706685583726804*^9, 3.706685629843254*^9},
3.706685691415205*^9, {3.706687645075738*^9, 3.706687651699901*^9},
3.706687742021456*^9}]
}, Open ]],
Cell["2-particle front collision:", "Text",
CellChangeTimes->{{3.706687770072249*^9, 3.706687778933701*^9}, {
3.706687862187161*^9, 3.706687865829784*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}]}], "]"}]}], "]"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706684977601954*^9, 3.7066850097845793`*^9},
3.7066851381189327`*^9, {3.706685372564913*^9, 3.706685405729534*^9}, {
3.7066854358526783`*^9, 3.7066854371102467`*^9}, {3.7066856106217947`*^9,
3.706685638671286*^9}, 3.706685789710535*^9}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1,
1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {10, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {10, 10}}, {{0, 9}, {10, 9}}, {{0, 8}, {10, 8}}, {{0,
7}, {10, 7}}, {{0, 6}, {10, 6}}, {{0, 5}, {10, 5}}, {{0, 4}, {10,
4}}, {{0, 3}, {10, 3}}, {{0, 2}, {10, 2}}, {{0, 1}, {10, 1}}, {{0,
0}, {10, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{3,
0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{10,
0}, {10, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{{3.706685395957546*^9, 3.706685407077055*^9}, {
3.706685437710787*^9, 3.70668547291222*^9}, {3.706685520281864*^9,
3.706685576034245*^9}, {3.7066856115942698`*^9, 3.70668563902635*^9}, {
3.7066856742261887`*^9, 3.706685790182488*^9}, {3.7066876478280993`*^9,
3.706687653404339*^9}, 3.706687743353232*^9}]
}, Open ]],
Cell["2-particle side collision:", "Text",
CellChangeTimes->{{3.706687780626049*^9, 3.7066877838868923`*^9}, {
3.706687857675436*^9, 3.706687859565815*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}]}], "]"}]}], "]"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{3.70668774994026*^9}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 0,
1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 0, 1}}, {{0, 0}, {10, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {10, 10}}, {{0, 9}, {10, 9}}, {{0, 8}, {10, 8}}, {{0,
7}, {10, 7}}, {{0, 6}, {10, 6}}, {{0, 5}, {10, 5}}, {{0, 4}, {10,
4}}, {{0, 3}, {10, 3}}, {{0, 2}, {10, 2}}, {{0, 1}, {10, 1}}, {{0,
0}, {10, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{3,
0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{10,
0}, {10, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{3.706687750234107*^9}]
}, Open ]],
Cell["3-particle collision:", "Text",
CellChangeTimes->{{3.706687780626049*^9, 3.7066877838868923`*^9}, {
3.706687857675436*^9, 3.706687859565815*^9}, {3.706687947274827*^9,
3.706687953922996*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}]}], "]"}]}], "]"}]}], "]"}]}],
"]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7066878219558563`*^9, 3.7066878325059566`*^9}}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 0,
1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 0, 1}}, {{0, 0}, {10, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {10, 10}}, {{0, 9}, {10, 9}}, {{0, 8}, {10, 8}}, {{0,
7}, {10, 7}}, {{0, 6}, {10, 6}}, {{0, 5}, {10, 5}}, {{0, 4}, {10,
4}}, {{0, 3}, {10, 3}}, {{0, 2}, {10, 2}}, {{0, 1}, {10, 1}}, {{0,
0}, {10, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{3,
0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{10,
0}, {10, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{3.706687833155779*^9}]
}, Open ]],
Cell["Multiple collision:", "Text",
CellChangeTimes->{{3.706687801222371*^9, 3.706687806522807*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}]}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}]}], "]"}]], "Input",
CellChangeTimes->{{3.70668826610106*^9, 3.706688280224883*^9}}],
Cell[BoxData[
GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 1, 0, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 0,
1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 0, 1}}, {{0, 0}, {10, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {10, 10}}, {{0, 9}, {10, 9}}, {{0, 8}, {10, 8}}, {{0,
7}, {10, 7}}, {{0, 6}, {10, 6}}, {{0, 5}, {10, 5}}, {{0, 4}, {10,
4}}, {{0, 3}, {10, 3}}, {{0, 2}, {10, 2}}, {{0, 1}, {10, 1}}, {{0,
0}, {10, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2, 10}}, {{3,
0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5, 10}}, {{6, 0}, {6,
10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8, 10}}, {{9, 0}, {9, 10}}, {{10,
0}, {10, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]], "Output",
CellChangeTimes->{3.706688280961192*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Complexity collider tracker:", "Subsection",
CellChangeTimes->{{3.706684105534197*^9, 3.70668412353218*^9}, {
3.706685987533658*^9, 3.7066860205889597`*^9}, {3.706686239938651*^9,
3.7066862722588243`*^9}, 3.720814290756584*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"ParticleCollider", "[", "gridsize_", "]"}], ":=",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}]], "Input"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"ArrayTrim", "[",
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleCollider", "[",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], "]"}], ",", "0"}], "}"}], ",",
"i"}], "]"}]}], "]"}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.70668428288855*^9, 3.7066843091633463`*^9}, {
3.706684381940167*^9, 3.7066843979859743`*^9}, 3.7066844494182577`*^9, {
3.7066852105180883`*^9, 3.706685210705512*^9}, {3.706685887641629*^9,
3.706685961861024*^9}, 3.706796527792562*^9}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 0, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 20, 1}}, Typeset`size$$ = {150., {71., 79.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$20876$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$20876$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
$CellContext`ArrayTrim[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleCollider[{10, 10}], 0}, $CellContext`i$$]]],
Mesh -> All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 20, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {133., 142.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{3.706796514069778*^9, 3.706796550772519*^9,
3.720814304118725*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "50", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{
3.7066859699059973`*^9, {3.7067968251917143`*^9, 3.706796875275023*^9}, {
3.7067969468246737`*^9, 3.706796980846936*^9}, {3.706797026591943*^9,
3.706797027621769*^9}}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 47, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 50, 1}}, Typeset`size$$ = {150., {47., 55.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$23104$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$23104$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["antiglider2", {1, 1},
$CellContext`ParticleGenerator["glider", {1, 1},
$CellContext`ParticleGenerator["antiglider2", {8 2, 9 2},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {8 2, 9 2}]]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 50, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {109., 118.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{
3.706796552727005*^9, {3.706796831738261*^9, 3.706796875626485*^9}, {
3.706796947217044*^9, 3.706796981289568*^9}, 3.706797027977066*^9,
3.7208143168129873`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "30", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{
3.7067965896594133`*^9, {3.706796810696083*^9, 3.7067968126214314`*^9}}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 30, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 30, 1}}, Typeset`size$$ = {150., {63., 71.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$26072$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$26072$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["antiglider", {1, 1},
$CellContext`ParticleGenerator["glider", {1, 1},
$CellContext`ParticleGenerator["antiglider2", {8 2, 9 2},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {8 2, 9 2}]]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 30, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {125., 134.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{3.706796590024995*^9, 3.706796813000566*^9,
3.720814346073021*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "30", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7067966935680447`*^9, 3.706796693806673*^9}, {
3.706796784265353*^9, 3.706796787644763*^9}}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 30, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 30, 1}}, Typeset`size$$ = {150., {63., 71.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$28864$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$28864$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["antiglider", {1, 1},
$CellContext`ParticleGenerator["glider2", {1, 1},
$CellContext`ParticleGenerator["antiglider2", {8 2, 9 2},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {8 2, 9 2}]]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 30, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {125., 134.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{{3.706796687741602*^9, 3.706796694488761*^9},
3.706796788036977*^9, 3.7208143688602533`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "30", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706796617250182*^9, 3.706796672940157*^9}, {
3.706796712097643*^9, 3.706796759733882*^9}}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 2, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 30, 1}}, Typeset`size$$ = {150., {63., 71.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$6307236$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$6307236$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["antiglider", {1, 1},
$CellContext`ParticleGenerator["glider", {1, 1},
$CellContext`ParticleGenerator["antiglider", {8 2, 9 2},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {8 2, 9 2}]]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 30, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {125., 134.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{{3.706796617782489*^9, 3.706796634771894*^9},
3.706796676522182*^9, {3.706796713244385*^9, 3.7067967604724083`*^9}}]
}, Open ]],
Cell["\<\
Jump at time 5 is because of the collider detection resolution of 4x4 and is \
the moment in which both particles enter the observation sliding window of \
4x4. Before time 5 particles are considered individually showing no \
significant increase in complexity.\
\>", "Text",
CellChangeTimes->{{3.7066865529941874`*^9, 3.7066866663158283`*^9},
3.725662857234515*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListPlot", "[",
RowBox[{
RowBox[{"BDM", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleCollider", "[",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], "]"}], ",", "0"}], "}"}], ",",
"i"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "15", ",", "1"}], "}"}]}], "]"}]}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"Frame", "\[Rule]", "True"}], ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Style", "[",
RowBox[{"#", ",", "14", ",", "Black"}], "]"}], "&"}], "/@",
RowBox[{"{",
RowBox[{"\"\<time\>\"", ",", "\"\<BDM\>\""}], "}"}]}], ")"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "330"}]}], "]"}]], "Input",
CellChangeTimes->{{3.706686298954171*^9, 3.706686366980377*^9},
3.7066864540766497`*^9, {3.7208155586123667`*^9, 3.720815593172349*^9}, {
3.725398839218258*^9, 3.72539883935404*^9}, {3.7253990502052803`*^9,
3.725399091434272*^9}}],
Cell[BoxData[
GraphicsBox[{{}, {{{}, {},
{RGBColor[0.34398, 0.49112, 0.89936], PointSize[0.012833333333333334`],
AbsoluteThickness[3], CapForm["Butt"],
LineBox[{{1., 75.675883458482}, {2., 74.87233554039068}, {3.,
76.41030930407413}, {4., 78.2761951347869}, {5., 78.43501479174988}, {
6., 101.44653361446494`}, {7., 103.00532900233263`}, {8.,
103.13261532101156`}, {9., 101.29183591253614`}, {10.,
101.88894465466379`}, {11., 97.8355424606566}, {12.,
100.76920417383089`}, {13., 99.90145710330056}, {14.,
73.71029586448793}, {15., 50.38304585134876}, {16.,
50.38304585134876}}]}}, {
{RGBColor[0.34398, 0.49112, 0.89936], AbsolutePointSize[6],
AbsoluteThickness[3], CapForm["Butt"],
GeometricTransformationBox[InsetBox[
GraphicsBox[
{RGBColor[0.34398, 0.49112, 0.89936], AbsolutePointSize[6],
AbsoluteThickness[3], CapForm["Butt"],
{GrayLevel[1], DiskBox[{0, 0}, Offset[{3., 3.}, {0., 0.}]]},
{AbsoluteThickness[1.5], Dashing[{}],
CircleBox[{0, 0}, Offset[{3., 3.}, {0., 0.}]]}}], {0., 0.}], {{{1.,
75.675883458482}}, {{2., 74.87233554039068}}, {{3.,
76.41030930407413}}, {{4., 78.2761951347869}}, {{5.,
78.43501479174988}}, {{6., 101.44653361446494`}}, {{7.,
103.00532900233263`}}, {{8., 103.13261532101156`}}, {{9.,
101.29183591253614`}}, {{10., 101.88894465466379`}}, {{11.,
97.8355424606566}}, {{12., 100.76920417383089`}}, {{13.,
99.90145710330056}}, {{14., 73.71029586448793}}, {{15.,
50.38304585134876}}, {{16.,
50.38304585134876}}}]}, {}}}, {}, {}, {{}, {}}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{False, False},
AxesLabel->{None, None},
AxesOrigin->{0., 0},
DisplayFunction->Identity,
Frame->{{True, True}, {True, True}},
FrameLabel->{{
FormBox[
StyleBox["\"BDM\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}, {
FormBox[
StyleBox["\"time\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm], None}},
FrameStyle->{{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks->FrontEndValueCache[{{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}, {
Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}}, {{{{0.,
FormBox["0", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {20.,
FormBox["20", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {40.,
FormBox["40", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {60.,
FormBox["60", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {80.,
FormBox["80", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {100.,
FormBox["100", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}}, None}, {{{0.,
FormBox["0", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {5.,
FormBox["5", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {10.,
FormBox["10", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}, {15.,
FormBox["15", TraditionalForm], {0.01, 0.}, {
AbsoluteThickness[0.1]}}}, None}}],
GridLines->{None, {0., 20., 40., 60., 80., 100.}},
GridLinesStyle->Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
ImagePadding->All,
ImageSize->330,
Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Identity, Identity}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Identity, Identity}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange->{{0., 16.}, {0, 103.13261532101156`}},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
Ticks->{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& }]], "Output",
CellChangeTimes->{{3.706686313822652*^9, 3.706686367730968*^9},
3.7066864544988127`*^9, {3.720815573605939*^9, 3.720815593482092*^9},
3.7253988396610928`*^9, {3.725399054287476*^9, 3.725399091846328*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Column", "[",
RowBox[{"#", ",",
RowBox[{"Alignment", "\[Rule]", "Center"}]}], "]"}], "&"}], "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]", "40"}]}], "]"}], "&"}], "@",
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleCollider", "[",
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], "]"}], ",", "0"}], "}"}],
",", "i"}], "]"}]}]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "15", ",", "1"}], "}"}]}], "]"}]}], ",",
"8"}], "]"}], ",",
RowBox[{"Dividers", "\[Rule]", "Center"}]}], "]"}]], "Input",
CellChangeTimes->{{3.725398710007888*^9, 3.725398810370914*^9}, {
3.725398862144272*^9, 3.7253989388548326`*^9}, {3.725398974573641*^9,
3.725398976536354*^9}, {3.7253991003862762`*^9, 3.725399135008541*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TagBox[GridBox[{
{"0"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"1"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 0}, {1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1,
1}, {0, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"2"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"3"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
0, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"4"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"5"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"6"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 0,
1}, {1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"7"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"8"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"9"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 1, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 1, 1,
1}, {1, 1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"10"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"11"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 0, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"12"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"13"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"14"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"15"},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1}}, {{0, 0}, {10, 10}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->40,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]}
},
AutoDelete->False,
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "Rows" -> {False, {True}, False}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.7253987073828907`*^9, 3.7253987141990833`*^9}, {
3.725398767732965*^9, 3.725398810881357*^9}, {3.7253988683347883`*^9,
3.725398928771165*^9}, 3.725398977019775*^9, {3.725399101307119*^9,
3.725399135525797*^9}}]
}, {2}]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}], "]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "50", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{3.7066888610752983`*^9}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 0, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 50, 1}}, Typeset`size$$ = {150., {63., 71.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$83852$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$83852$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["glider2", {1, 1},
$CellContext`ParticleGenerator["antiglider2", {8, 9},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {8, 9}]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 50, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {125., 134.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{3.725398821710225*^9}]
}, Open ]],
Cell["\[AliasDelimiter]:", "Text",
CellChangeTimes->{{3.706688839805163*^9, 3.706688842040996*^9},
3.725476094554214*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Manipulate", "[",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "50", ",", "1"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7066885420507298`*^9, 3.7066885444327793`*^9}}],
Cell[BoxData[
TagBox[
StyleBox[
DynamicModuleBox[{$CellContext`i$$ = 0, Typeset`show$$ = True,
Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu",
Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ =
"\"untitled\"", Typeset`specs$$ = {{
Hold[$CellContext`i$$], 0, 50, 1}}, Typeset`size$$ = {150., {71., 79.}},
Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ =
True, $CellContext`i$34252$$ = 0},
DynamicBox[Manipulate`ManipulateBoxes[
1, StandardForm, "Variables" :> {$CellContext`i$$ = 0},
"ControllerVariables" :> {
Hold[$CellContext`i$$, $CellContext`i$34252$$, 0]},
"OtherVariables" :> {
Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$,
Typeset`animator$$, Typeset`animvar$$, Typeset`name$$,
Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
Typeset`skipInitDone$$}, "Body" :> ArrayPlot[
Last[
CellularAutomaton[{
224, {2, {{2, 2, 2}, {2, 1, 2}, {2, 2, 2}}}, {1, 1}}, {
$CellContext`ParticleGenerator["antiglider", {1, 1},
$CellContext`ParticleGenerator["glider2", {1, 1},
$CellContext`ParticleGenerator["antiglider2", {9, 9},
$CellContext`ParticleGenerator["glider", {1, 1},
ConstantArray[0, {9, 9}]]]]], 0}, $CellContext`i$$]], Mesh ->
All, ImageSize -> Tiny],
"Specifications" :> {{$CellContext`i$$, 0, 50, 1}}, "Options" :> {},
"DefaultOptions" :> {}],
ImageSizeCache->{366., {133., 142.}},
SingleEvaluation->True],
Deinitialization:>None,
DynamicModuleValues:>{},
SynchronousInitialization->True,
UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
UnsavedVariables:>{Typeset`initDone$$},
UntrackedVariables:>{Typeset`size$$}], "Manipulate",
Deployed->True,
StripOnInput->False],
Manipulate`InterpretManipulate[1]]], "Output",
CellChangeTimes->{3.7208156390861073`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Column", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}]}], "}"}], ",",
RowBox[{"Alignment", "\[Rule]", "Center"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "7", ",", "1"}], "}"}]}], "]"}], ",",
"4"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.720815761598419*^9, 3.720815841385734*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TagBox[GridBox[{
{"0"},
{
GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 0, 1,
1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1,
1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 1, 1, 1,
1, 0, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"1"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1, 1, 1, 0, 1,
0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 1, 1, 1, 1, 0, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 0, 1,
1, 1, 0, 0, 1}, {0, 1, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"2"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1,
1}, {0, 1, 0, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {0, 1, 0, 1,
1, 1, 0, 1, 0}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"3"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 0,
1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0,
1, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"4"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 0, 0, 0, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 0, 0, 0, 1}, {1, 1, 1, 0,
1, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"5"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 0, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1, 0, 1, 0,
1, 0, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"6"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1, 1, 1, 0,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"7"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 1, 1}, {1, 1, 0, 0,
1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1}}, {{0, 0}, {9, 9}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 9}, {9, 9}}, {{0, 8}, {9, 8}}, {{0, 7}, {9,
7}}, {{0, 6}, {9, 6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0,
3}, {9, 3}}, {{0, 2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9,
0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 9}}, {{1, 0}, {1, 9}}, {{2, 0}, {2,
9}}, {{3, 0}, {3, 9}}, {{4, 0}, {4, 9}}, {{5, 0}, {5, 9}}, {{6,
0}, {6, 9}}, {{7, 0}, {7, 9}}, {{8, 0}, {8, 9}}, {{9, 0}, {9,
9}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]}
},
AutoDelete->False,
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.720815755216052*^9, 3.7208158419545193`*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Column", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}]}], "}"}], ",",
RowBox[{"Alignment", "\[Rule]", "Center"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "9", ",", "1"}], "}"}]}], "]"}], ",",
"5"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.7208728689201117`*^9, 3.7208728794119463`*^9}, {
3.7208729398748827`*^9, 3.720872980703416*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TagBox[GridBox[{
{"0"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"1"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1,
0}, {1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 0, 1}, {1,
0, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"2"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1, 1, 1, 0, 0, 1}, {1,
0, 0, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"3"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 0, 1}, {1,
0, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 0, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"4"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 0, 1}, {1,
0, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"5"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 1, 0, 0, 0, 1, 1}, {1,
1, 0, 0, 0, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"6"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 0, 1}, {1,
0, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"7"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1}, {1,
1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"8"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"9"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]}
},
AutoDelete->False,
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.720872880197935*^9, {3.72087294610984*^9, 3.720872981177088*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Column", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"Mesh", "\[Rule]", "All"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Tiny"}]}], "]"}]}], "}"}], ",",
RowBox[{"Alignment", "\[Rule]", "Center"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "60", ",", "1"}], "}"}]}], "]"}], ",",
"9"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.720816105785248*^9, 3.720816233380615*^9}, {
3.7208163066192408`*^9, 3.720816306705378*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
TagBox[GridBox[{
{"0"},
{
GraphicsBox[{
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 0, 1,
1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1,
1, 1, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 0, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"1"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1, 1, 1, 0, 1,
0}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 1, 1, 1, 1, 0, 1}, {1,
0, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 0, 1, 1, 1, 0, 0, 1}, {0, 1, 0, 1,
1, 1, 0, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"2"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 0, 1,
1}, {0, 1, 0, 1, 1, 1, 0, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 0, 0}, {0,
0, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 0, 1, 1, 1, 0, 1, 0}, {1, 1, 0, 1,
1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {9, 8}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {9, 8}}, {{0, 7}, {9, 7}}, {{0, 6}, {9,
6}}, {{0, 5}, {9, 5}}, {{0, 4}, {9, 4}}, {{0, 3}, {9, 3}}, {{0,
2}, {9, 2}}, {{0, 1}, {9, 1}}, {{0, 0}, {9, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"3"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {0, 1, 1, 0, 1,
1, 1, 0, 1, 1, 0}, {0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0}, {1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"4"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {0, 0, 1, 0, 0,
1, 0, 0, 1, 0, 0}, {0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0}, {1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"5"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1}, {0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 1, 0,
0, 1, 0, 0, 1, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"6"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1,
0, 0, 0, 1}, {1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0,
1, 1, 1, 0, 0, 0, 1}, {1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"7"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1,
0, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 1, 1,
1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {1, 1,
0, 1, 1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"8"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1,
0, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {1, 0, 0, 0, 1,
1, 1, 0, 0, 0, 1}, {1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1}, {1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {1, 1,
0, 1, 1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"9"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1,
0, 1, 0, 1}, {0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0}, {0, 1, 1, 1, 0,
1, 0, 1, 1, 1, 0}, {0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0}, {0, 0, 1, 0,
0, 1, 0, 0, 1, 0, 0}, {1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1}, {1, 1,
0, 1, 1, 1, 1, 1, 0, 1, 1}}, {{0, 0}, {11, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {11, 8}}, {{0, 7}, {11, 7}}, {{0, 6}, {11,
6}}, {{0, 5}, {11, 5}}, {{0, 4}, {11, 4}}, {{0, 3}, {11,
3}}, {{0, 2}, {11, 2}}, {{0, 1}, {11, 1}}, {{0, 0}, {11, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"10"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 1, 0,
0, 1, 0, 0, 1, 0, 0, 1}, {1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0,
1}, {0, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 0}, {0, 0, 1, 1, 1, 0, 1,
0, 1, 1, 1, 0, 0}, {1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1}, {1,
0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1}}, {{0, 0}, {13, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {13, 8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13,
6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13,
3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}, {{12, 0}, {12,
8}}, {{13, 0}, {13, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"11"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1,
0, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0,
0, 0, 1, 1}}, {{0, 0}, {13, 8}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 8}, {13, 8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13,
6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13,
3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 8}}, {{1, 0}, {1, 8}}, {{2, 0}, {2,
8}}, {{3, 0}, {3, 8}}, {{4, 0}, {4, 8}}, {{5, 0}, {5, 8}}, {{6,
0}, {6, 8}}, {{7, 0}, {7, 8}}, {{8, 0}, {8, 8}}, {{9, 0}, {9,
8}}, {{10, 0}, {10, 8}}, {{11, 0}, {11, 8}}, {{12, 0}, {12,
8}}, {{13, 0}, {13, 8}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"12"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0,
1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0,
0, 0, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 0,
1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {13, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13,
8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13,
5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13,
2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2,
10}}, {{3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5,
10}}, {{6, 0}, {6, 10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8,
10}}, {{9, 0}, {9, 10}}, {{10, 0}, {10, 10}}, {{11, 0}, {11,
10}}, {{12, 0}, {12, 10}}, {{13, 0}, {13, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"13"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0,
1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0,
0, 1, 1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {13, 10}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 10}, {13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13,
8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13,
5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13,
2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 10}}, {{1, 0}, {1, 10}}, {{2, 0}, {2,
10}}, {{3, 0}, {3, 10}}, {{4, 0}, {4, 10}}, {{5, 0}, {5,
10}}, {{6, 0}, {6, 10}}, {{7, 0}, {7, 10}}, {{8, 0}, {8,
10}}, {{9, 0}, {9, 10}}, {{10, 0}, {10, 10}}, {{11, 0}, {11,
10}}, {{12, 0}, {12, 10}}, {{13, 0}, {13, 10}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"14"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1,
1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1,
0, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {13,
12}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 12}, {13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {
13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13,
7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13,
4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 12}}, {{1, 0}, {1, 12}}, {{2, 0}, {2,
12}}, {{3, 0}, {3, 12}}, {{4, 0}, {4, 12}}, {{5, 0}, {5,
12}}, {{6, 0}, {6, 12}}, {{7, 0}, {7, 12}}, {{8, 0}, {8,
12}}, {{9, 0}, {9, 12}}, {{10, 0}, {10, 12}}, {{11, 0}, {11,
12}}, {{12, 0}, {12, 12}}, {{13, 0}, {13, 12}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"15"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0,
1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 0, 1,
0, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {13,
12}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 12}, {13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {
13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13,
7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13,
4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 12}}, {{1, 0}, {1, 12}}, {{2, 0}, {2,
12}}, {{3, 0}, {3, 12}}, {{4, 0}, {4, 12}}, {{5, 0}, {5,
12}}, {{6, 0}, {6, 12}}, {{7, 0}, {7, 12}}, {{8, 0}, {8,
12}}, {{9, 0}, {9, 12}}, {{10, 0}, {10, 12}}, {{11, 0}, {11,
12}}, {{12, 0}, {12, 12}}, {{13, 0}, {13, 12}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"16"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1, 0,
1, 1, 1, 0, 1, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0,
1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 0, 1, 1,
1, 0, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {13,
12}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 12}, {13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {
13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13,
7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13,
4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 12}}, {{1, 0}, {1, 12}}, {{2, 0}, {2,
12}}, {{3, 0}, {3, 12}}, {{4, 0}, {4, 12}}, {{5, 0}, {5,
12}}, {{6, 0}, {6, 12}}, {{7, 0}, {7, 12}}, {{8, 0}, {8,
12}}, {{9, 0}, {9, 12}}, {{10, 0}, {10, 12}}, {{11, 0}, {11,
12}}, {{12, 0}, {12, 12}}, {{13, 0}, {13, 12}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"17"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0,
1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0,
1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1,
1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 0, 1,
0, 0, 1, 0, 0, 1, 0, 0, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0, 0}, {13,
12}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 12}, {13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {
13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13,
7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13,
4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 12}}, {{1, 0}, {1, 12}}, {{2, 0}, {2,
12}}, {{3, 0}, {3, 12}}, {{4, 0}, {4, 12}}, {{5, 0}, {5,
12}}, {{6, 0}, {6, 12}}, {{7, 0}, {7, 12}}, {{8, 0}, {8,
12}}, {{9, 0}, {9, 12}}, {{10, 0}, {10, 12}}, {{11, 0}, {11,
12}}, {{12, 0}, {12, 12}}, {{13, 0}, {13, 12}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"18"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 1, 1,
0, 1, 0, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0,
1}, {1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1,
1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0,
0, 0, 1, 1}, {1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1}, {1, 0, 1, 1,
1, 0, 1, 0, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0,
1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}}, {{0, 0}, {13,
12}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 12}, {13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {
13, 10}}, {{0, 9}, {13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13,
7}}, {{0, 6}, {13, 6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13,
4}}, {{0, 3}, {13, 3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13,
1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 12}}, {{1, 0}, {1, 12}}, {{2, 0}, {2,
12}}, {{3, 0}, {3, 12}}, {{4, 0}, {4, 12}}, {{5, 0}, {5,
12}}, {{6, 0}, {6, 12}}, {{7, 0}, {7, 12}}, {{8, 0}, {8,
12}}, {{9, 0}, {9, 12}}, {{10, 0}, {10, 12}}, {{11, 0}, {11,
12}}, {{12, 0}, {12, 12}}, {{13, 0}, {13, 12}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"19"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0,
1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0,
1}, {0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0}, {1, 0, 1, 0, 1, 0, 1,
0, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 0, 1, 0,
1, 0, 1, 0, 1, 0, 1, 0, 1}, {0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0,
0}, {1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 0, 1, 1,
1, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1}}, {{0,
0}, {13, 14}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 14}, {13, 14}}, {{0, 13}, {13, 13}}, {{0, 12}, {
13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {13, 10}}, {{0, 9}, {
13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13,
6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13,
3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 14}}, {{1, 0}, {1, 14}}, {{2, 0}, {2,
14}}, {{3, 0}, {3, 14}}, {{4, 0}, {4, 14}}, {{5, 0}, {5,
14}}, {{6, 0}, {6, 14}}, {{7, 0}, {7, 14}}, {{8, 0}, {8,
14}}, {{9, 0}, {9, 14}}, {{10, 0}, {10, 14}}, {{11, 0}, {11,
14}}, {{12, 0}, {12, 14}}, {{13, 0}, {13, 14}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"20"},
{
GraphicsBox[{
RasterBox[{{1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 1,
0, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1,
1, 0, 1, 0, 1, 1, 1, 1, 0}, {0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1,
0}, {0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1}}, {{0,
0}, {13, 14}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 14}, {13, 14}}, {{0, 13}, {13, 13}}, {{0, 12}, {
13, 12}}, {{0, 11}, {13, 11}}, {{0, 10}, {13, 10}}, {{0, 9}, {
13, 9}}, {{0, 8}, {13, 8}}, {{0, 7}, {13, 7}}, {{0, 6}, {13,
6}}, {{0, 5}, {13, 5}}, {{0, 4}, {13, 4}}, {{0, 3}, {13,
3}}, {{0, 2}, {13, 2}}, {{0, 1}, {13, 1}}, {{0, 0}, {13, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 14}}, {{1, 0}, {1, 14}}, {{2, 0}, {2,
14}}, {{3, 0}, {3, 14}}, {{4, 0}, {4, 14}}, {{5, 0}, {5,
14}}, {{6, 0}, {6, 14}}, {{7, 0}, {7, 14}}, {{8, 0}, {8,
14}}, {{9, 0}, {9, 14}}, {{10, 0}, {10, 14}}, {{11, 0}, {11,
14}}, {{12, 0}, {12, 14}}, {{13, 0}, {13, 14}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"21"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"22"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
0, 0, 1, 1, 1, 1}, {1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 0,
1, 0, 1, 0, 1, 0, 1, 1, 0, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"23"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"24"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 1,
0, 1, 0, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1,
0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"25"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1,
1, 0, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"26"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1,
0, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 1,
1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"27"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1,
0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 1,
0, 1, 1, 0, 1, 1}, {1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0,
1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 0, 0, 0, 0,
1, 1, 1, 1, 1, 0, 0, 0, 0, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1,
1, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1,
1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1}}, {{0, 0}, {15, 16}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 16}, {15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {
15, 14}}, {{0, 13}, {15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {
15, 11}}, {{0, 10}, {15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15,
8}}, {{0, 7}, {15, 7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15,
5}}, {{0, 4}, {15, 4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15,
2}}, {{0, 1}, {15, 1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 16}}, {{1, 0}, {1, 16}}, {{2, 0}, {2,
16}}, {{3, 0}, {3, 16}}, {{4, 0}, {4, 16}}, {{5, 0}, {5,
16}}, {{6, 0}, {6, 16}}, {{7, 0}, {7, 16}}, {{8, 0}, {8,
16}}, {{9, 0}, {9, 16}}, {{10, 0}, {10, 16}}, {{11, 0}, {11,
16}}, {{12, 0}, {12, 16}}, {{13, 0}, {13, 16}}, {{14, 0}, {14,
16}}, {{15, 0}, {15, 16}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"28"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 1,
0, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1}, {0, 1, 1, 1, 0,
1, 1, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {0, 1, 1, 1, 0,
1, 1, 1, 1, 1, 0, 1, 1, 1, 0}, {1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0,
1, 1, 0, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1,
0, 0, 1, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1,
1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1}}, {{0, 0}, {15, 18}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {15, 18}}, {{0, 17}, {15, 17}}, {{0, 16}, {
15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {15, 14}}, {{0, 13}, {
15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {15, 11}}, {{0, 10}, {
15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15, 8}}, {{0, 7}, {15,
7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15, 5}}, {{0, 4}, {15,
4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15, 2}}, {{0, 1}, {15,
1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"29"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0,
1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 0, 0, 1, 1}, {1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0,
1}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 0, 0, 1,
1, 1, 1, 1, 1, 1, 0, 0, 1, 0}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {0, 1, 0, 0, 1,
1, 1, 1, 1, 1, 1, 0, 0, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0}, {1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 1}, {1, 1,
0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1,
1, 0, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1,
1}}, {{0, 0}, {15, 18}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {15, 18}}, {{0, 17}, {15, 17}}, {{0, 16}, {
15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {15, 14}}, {{0, 13}, {
15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {15, 11}}, {{0, 10}, {
15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15, 8}}, {{0, 7}, {15,
7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15, 5}}, {{0, 4}, {15,
4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15, 2}}, {{0, 1}, {15,
1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"30"},
{
GraphicsBox[{
RasterBox[{{1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1}, {0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0,
0}, {0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0}, {0, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {0, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0,
1, 1, 1, 0}, {0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0}, {1, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 1,
1}}, {{0, 0}, {15, 18}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {15, 18}}, {{0, 17}, {15, 17}}, {{0, 16}, {
15, 16}}, {{0, 15}, {15, 15}}, {{0, 14}, {15, 14}}, {{0, 13}, {
15, 13}}, {{0, 12}, {15, 12}}, {{0, 11}, {15, 11}}, {{0, 10}, {
15, 10}}, {{0, 9}, {15, 9}}, {{0, 8}, {15, 8}}, {{0, 7}, {15,
7}}, {{0, 6}, {15, 6}}, {{0, 5}, {15, 5}}, {{0, 4}, {15,
4}}, {{0, 3}, {15, 3}}, {{0, 2}, {15, 2}}, {{0, 1}, {15,
1}}, {{0, 0}, {15, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"31"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAmJBIGYEAjCBTKMygCRCBUiIgQGqEcoCK2CAKYBykcxg
QDYThUkhQDcU3VosDkNzOqbnMLzPiBZAAMa+Aq4=
"], {{0, 0}, {17, 18}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {
17, 16}}, {{0, 15}, {17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {
17, 13}}, {{0, 12}, {17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {
17, 10}}, {{0, 9}, {17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17,
7}}, {{0, 6}, {17, 6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17,
4}}, {{0, 3}, {17, 3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17,
1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}, {{16, 0}, {16, 18}}, {{17, 0}, {17,
18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"32"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAmJBIGZkZAQTjAgGA5wBZIH5yIABmUIikZkMaFoYkMXQ
ZSkAaIZiWIvhMAynY/EcuvfRAwgA1SICxg==
"], {{0, 0}, {17, 18}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {
17, 16}}, {{0, 15}, {17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {
17, 13}}, {{0, 12}, {17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {
17, 10}}, {{0, 9}, {17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17,
7}}, {{0, 6}, {17, 6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17,
4}}, {{0, 3}, {17, 3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17,
1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}, {{16, 0}, {16, 18}}, {{17, 0}, {17,
18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"33"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAmJBIGZkZISQSDQjXIARwkASwAbQhBkgAJnHyICkBspG
EsBqKjaLUFnohmJYi+EwfM6HyWJ6HzWAAMkkArI=
"], {{0, 0}, {17, 18}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 18}, {17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {
17, 16}}, {{0, 15}, {17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {
17, 13}}, {{0, 12}, {17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {
17, 10}}, {{0, 9}, {17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17,
7}}, {{0, 6}, {17, 6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17,
4}}, {{0, 3}, {17, 3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17,
1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 18}}, {{1, 0}, {1, 18}}, {{2, 0}, {2,
18}}, {{3, 0}, {3, 18}}, {{4, 0}, {4, 18}}, {{5, 0}, {5,
18}}, {{6, 0}, {6, 18}}, {{7, 0}, {7, 18}}, {{8, 0}, {8,
18}}, {{9, 0}, {9, 18}}, {{10, 0}, {10, 18}}, {{11, 0}, {11,
18}}, {{12, 0}, {12, 18}}, {{13, 0}, {13, 18}}, {{14, 0}, {14,
18}}, {{15, 0}, {15, 18}}, {{16, 0}, {16, 18}}, {{17, 0}, {17,
18}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"34"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAjCBQjOg0DA5JB4DAwqNBhgYUXVi2oKuDc14
bIbisAirAVhsgnEwHYZhKBbPobsPPYBQaABBlALy
"], {{0, 0}, {17, 20}}, {
0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"35"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAjCBRDNChGEUWIIBQeFQgcEaIgDT6aR7HzUI
AUw8AwI=
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"36"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAggJo0AMBhSakQGMYBQ2FYzo9BACGF4gx/vI
QQgARD4C9g==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"37"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGZkZGRgBJEIGkQxICg4B46xaWFgQKGHEMBwOrrn
sHkfNYDQtAAARD4C9g==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"38"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAjCBoBkYIOIwGpsAI1QAQoO0otIYhg4egOlA
NC+ge45weKAZCgAxmALa
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"39"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAjCBoBmwYBDJgKwIFQDNARsFozENHTwA3beY
TsemHtn7mIGDaigARugC+g==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"40"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYkBzCgYSDJgEpjCgwWQNClmJ4jFQAATDwDAg==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"41"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYkC8A0wmk0DCJRaUYMmk4A03p0B2I4Hc1zJAMA
TDwDAg==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"42"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYkCjCg01CNcBoNY6rANINOYACcDgBG6AL6
"], {{
0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"43"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYkBsDUwdWjCzCgYSK00AkMhNMBPEAC6g==
"], {{
0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"44"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGbEBhgwaAY0GhUTIYBhBqYtVAGDwekAQZQC8g==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]},
{
TagBox[GridBox[{
{"45"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGbEBhjQaag6BM0IZiFoBhSMqQLTDExbqAIGg9MB
JvACyg==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"46"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGbEAmDCcBoLBpFwWcIC2PSj2UIVMCicDgA27ALi
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"47"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGYEAjCBTEOEkWkwC0FDCASNKsCAoQLTDExbMN1B
BBiUTgcADvYCpg==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"48"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQAWJBIGZkZISQSDQWDCKRaQgbKs+AJsuAoQLDDKw2oLmD
CDA4nQ4AKZoCzg==
"], {{0, 0}, {17, 20}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 20}, {17, 20}}, {{0, 19}, {17, 19}}, {{0, 18}, {
17, 18}}, {{0, 17}, {17, 17}}, {{0, 16}, {17, 16}}, {{0, 15}, {
17, 15}}, {{0, 14}, {17, 14}}, {{0, 13}, {17, 13}}, {{0, 12}, {
17, 12}}, {{0, 11}, {17, 11}}, {{0, 10}, {17, 10}}, {{0, 9}, {
17, 9}}, {{0, 8}, {17, 8}}, {{0, 7}, {17, 7}}, {{0, 6}, {17,
6}}, {{0, 5}, {17, 5}}, {{0, 4}, {17, 4}}, {{0, 3}, {17,
3}}, {{0, 2}, {17, 2}}, {{0, 1}, {17, 1}}, {{0, 0}, {17, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 20}}, {{1, 0}, {1, 20}}, {{2, 0}, {2,
20}}, {{3, 0}, {3, 20}}, {{4, 0}, {4, 20}}, {{5, 0}, {5,
20}}, {{6, 0}, {6, 20}}, {{7, 0}, {7, 20}}, {{8, 0}, {8,
20}}, {{9, 0}, {9, 20}}, {{10, 0}, {10, 20}}, {{11, 0}, {11,
20}}, {{12, 0}, {12, 20}}, {{13, 0}, {13, 20}}, {{14, 0}, {14,
20}}, {{15, 0}, {15, 20}}, {{16, 0}, {16, 20}}, {{17, 0}, {17,
20}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"49"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQA2JhIGYEAQiJoIEsmAwDA0IEzIbRyKphPJAEkllALkgt
AyNMPZSPoQqbWdhsxOYubK4fVh4CAAMmAvg=
"], {{0, 0}, {19, 22}}, {0,
1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 22}, {19, 22}}, {{0, 21}, {19, 21}}, {{0, 20}, {
19, 20}}, {{0, 19}, {19, 19}}, {{0, 18}, {19, 18}}, {{0, 17}, {
19, 17}}, {{0, 16}, {19, 16}}, {{0, 15}, {19, 15}}, {{0, 14}, {
19, 14}}, {{0, 13}, {19, 13}}, {{0, 12}, {19, 12}}, {{0, 11}, {
19, 11}}, {{0, 10}, {19, 10}}, {{0, 9}, {19, 9}}, {{0, 8}, {19,
8}}, {{0, 7}, {19, 7}}, {{0, 6}, {19, 6}}, {{0, 5}, {19,
5}}, {{0, 4}, {19, 4}}, {{0, 3}, {19, 3}}, {{0, 2}, {19,
2}}, {{0, 1}, {19, 1}}, {{0, 0}, {19, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 22}}, {{1, 0}, {1, 22}}, {{2, 0}, {2,
22}}, {{3, 0}, {3, 22}}, {{4, 0}, {4, 22}}, {{5, 0}, {5,
22}}, {{6, 0}, {6, 22}}, {{7, 0}, {7, 22}}, {{8, 0}, {8,
22}}, {{9, 0}, {9, 22}}, {{10, 0}, {10, 22}}, {{11, 0}, {11,
22}}, {{12, 0}, {12, 22}}, {{13, 0}, {13, 22}}, {{14, 0}, {14,
22}}, {{15, 0}, {15, 22}}, {{16, 0}, {16, 22}}, {{17, 0}, {17,
22}}, {{18, 0}, {18, 22}}, {{19, 0}, {19, 22}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"50"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQA2JhIGYEAigFp4EsNIxNCK4YKs8AFUYyAqIGKgGlGbCo
wmIWkY4gFgwlD6FFBwAgnAMc
"], {{0, 0}, {19, 22}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 22}, {19, 22}}, {{0, 21}, {19, 21}}, {{0, 20}, {
19, 20}}, {{0, 19}, {19, 19}}, {{0, 18}, {19, 18}}, {{0, 17}, {
19, 17}}, {{0, 16}, {19, 16}}, {{0, 15}, {19, 15}}, {{0, 14}, {
19, 14}}, {{0, 13}, {19, 13}}, {{0, 12}, {19, 12}}, {{0, 11}, {
19, 11}}, {{0, 10}, {19, 10}}, {{0, 9}, {19, 9}}, {{0, 8}, {19,
8}}, {{0, 7}, {19, 7}}, {{0, 6}, {19, 6}}, {{0, 5}, {19,
5}}, {{0, 4}, {19, 4}}, {{0, 3}, {19, 3}}, {{0, 2}, {19,
2}}, {{0, 1}, {19, 1}}, {{0, 0}, {19, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 22}}, {{1, 0}, {1, 22}}, {{2, 0}, {2,
22}}, {{3, 0}, {3, 22}}, {{4, 0}, {4, 22}}, {{5, 0}, {5,
22}}, {{6, 0}, {6, 22}}, {{7, 0}, {7, 22}}, {{8, 0}, {8,
22}}, {{9, 0}, {9, 22}}, {{10, 0}, {10, 22}}, {{11, 0}, {11,
22}}, {{12, 0}, {12, 22}}, {{13, 0}, {13, 22}}, {{14, 0}, {14,
22}}, {{15, 0}, {15, 22}}, {{16, 0}, {16, 22}}, {{17, 0}, {17,
22}}, {{18, 0}, {18, 22}}, {{19, 0}, {19, 22}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"51"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQAGJRIGYEAygFp8FsqCRcEVieAawGRmNqgullRAYMDDAp
FIsYIGbDjALTIBFsKrGbid122oBB6E2s0YE14jCiGABRcAN2
"], {{0, 0}, {21,
24}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 24}, {21, 24}}, {{0, 23}, {21, 23}}, {{0, 22}, {
21, 22}}, {{0, 21}, {21, 21}}, {{0, 20}, {21, 20}}, {{0, 19}, {
21, 19}}, {{0, 18}, {21, 18}}, {{0, 17}, {21, 17}}, {{0, 16}, {
21, 16}}, {{0, 15}, {21, 15}}, {{0, 14}, {21, 14}}, {{0, 13}, {
21, 13}}, {{0, 12}, {21, 12}}, {{0, 11}, {21, 11}}, {{0, 10}, {
21, 10}}, {{0, 9}, {21, 9}}, {{0, 8}, {21, 8}}, {{0, 7}, {21,
7}}, {{0, 6}, {21, 6}}, {{0, 5}, {21, 5}}, {{0, 4}, {21,
4}}, {{0, 3}, {21, 3}}, {{0, 2}, {21, 2}}, {{0, 1}, {21,
1}}, {{0, 0}, {21, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 24}}, {{1, 0}, {1, 24}}, {{2, 0}, {2,
24}}, {{3, 0}, {3, 24}}, {{4, 0}, {4, 24}}, {{5, 0}, {5,
24}}, {{6, 0}, {6, 24}}, {{7, 0}, {7, 24}}, {{8, 0}, {8,
24}}, {{9, 0}, {9, 24}}, {{10, 0}, {10, 24}}, {{11, 0}, {11,
24}}, {{12, 0}, {12, 24}}, {{13, 0}, {13, 24}}, {{14, 0}, {14,
24}}, {{15, 0}, {15, 24}}, {{16, 0}, {16, 24}}, {{17, 0}, {17,
24}}, {{18, 0}, {18, 24}}, {{19, 0}, {19, 24}}, {{20, 0}, {20,
24}}, {{21, 0}, {21, 24}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"52"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQAGJRIGYEAXQaJ2BgZMBgMSJpgjHRzAFx4QiqHYwYIAwG
hJEMSIqRVWI1kxGhjBELj6oAm0X08ya2QMYRHTicjxbFAFFwA3Y=
"], {{0,
0}, {21, 24}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 24}, {21, 24}}, {{0, 23}, {21, 23}}, {{0, 22}, {
21, 22}}, {{0, 21}, {21, 21}}, {{0, 20}, {21, 20}}, {{0, 19}, {
21, 19}}, {{0, 18}, {21, 18}}, {{0, 17}, {21, 17}}, {{0, 16}, {
21, 16}}, {{0, 15}, {21, 15}}, {{0, 14}, {21, 14}}, {{0, 13}, {
21, 13}}, {{0, 12}, {21, 12}}, {{0, 11}, {21, 11}}, {{0, 10}, {
21, 10}}, {{0, 9}, {21, 9}}, {{0, 8}, {21, 8}}, {{0, 7}, {21,
7}}, {{0, 6}, {21, 6}}, {{0, 5}, {21, 5}}, {{0, 4}, {21,
4}}, {{0, 3}, {21, 3}}, {{0, 2}, {21, 2}}, {{0, 1}, {21,
1}}, {{0, 0}, {21, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 24}}, {{1, 0}, {1, 24}}, {{2, 0}, {2,
24}}, {{3, 0}, {3, 24}}, {{4, 0}, {4, 24}}, {{5, 0}, {5,
24}}, {{6, 0}, {6, 24}}, {{7, 0}, {7, 24}}, {{8, 0}, {8,
24}}, {{9, 0}, {9, 24}}, {{10, 0}, {10, 24}}, {{11, 0}, {11,
24}}, {{12, 0}, {12, 24}}, {{13, 0}, {13, 24}}, {{14, 0}, {14,
24}}, {{15, 0}, {15, 24}}, {{16, 0}, {16, 24}}, {{17, 0}, {17,
24}}, {{18, 0}, {18, 24}}, {{19, 0}, {19, 24}}, {{20, 0}, {20,
24}}, {{21, 0}, {21, 24}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"],
TagBox[GridBox[{
{"53"},
{
GraphicsBox[{RasterBox[CompressedData["
1:eJxTTMoPSmJiYGCQAmJxIGaEAHQavzCUz4BVLRqbgQELE8hCEkZIIInDREFC
DHBxGIcBh2qwKIpLYDwGNNeie4kGAIeVOBxIJc9jD1js0YAz0uA87BFPMJ0A
AKp2A8Q=
"], {{0, 0}, {23, 26}}, {0, 1}], {
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 26}, {23, 26}}, {{0, 25}, {23, 25}}, {{0, 24}, {
23, 24}}, {{0, 23}, {23, 23}}, {{0, 22}, {23, 22}}, {{0, 21}, {
23, 21}}, {{0, 20}, {23, 20}}, {{0, 19}, {23, 19}}, {{0, 18}, {
23, 18}}, {{0, 17}, {23, 17}}, {{0, 16}, {23, 16}}, {{0, 15}, {
23, 15}}, {{0, 14}, {23, 14}}, {{0, 13}, {23, 13}}, {{0, 12}, {
23, 12}}, {{0, 11}, {23, 11}}, {{0, 10}, {23, 10}}, {{0, 9}, {
23, 9}}, {{0, 8}, {23, 8}}, {{0, 7}, {23, 7}}, {{0, 6}, {23,
6}}, {{0, 5}, {23, 5}}, {{0, 4}, {23, 4}}, {{0, 3}, {23,
3}}, {{0, 2}, {23, 2}}, {{0, 1}, {23, 1}}, {{0, 0}, {23, 0}}}],
Antialiasing->False]},
{GrayLevel[
NCache[-1 + GoldenRatio, 0.6180339887498949]],
StyleBox[
LineBox[{{{0, 0}, {0, 26}}, {{1, 0}, {1, 26}}, {{2, 0}, {2,
26}}, {{3, 0}, {3, 26}}, {{4, 0}, {4, 26}}, {{5, 0}, {5,
26}}, {{6, 0}, {6, 26}}, {{7, 0}, {7, 26}}, {{8, 0}, {8,
26}}, {{9, 0}, {9, 26}}, {{10, 0}, {10, 26}}, {{11, 0}, {11,
26}}, {{12, 0}, {12, 26}}, {{13, 0}, {13, 26}}, {{14, 0}, {14,
26}}, {{15, 0}, {15, 26}}, {{16, 0}, {16, 26}}, {{17, 0}, {17,
26}}, {{18, 0}, {18, 26}}, {{19, 0}, {19, 26}}, {{20, 0}, {20,
26}}, {{21, 0}, {21, 26}}, {{22, 0}, {22, 26}}, {{23, 0}, {23,
26}}}],
Antialiasing->False]}}},
Frame->False,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->Tiny,
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
DefaultBaseStyle->"Column",
GridBoxAlignment->{"Columns" -> {{Center}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Column"]}
},
AutoDelete->False,
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.7208160803886538`*^9, {3.720816115403817*^9, 3.7208161299752693`*^9}, {
3.7208161603451433`*^9, 3.720816234073347*^9}, 3.720816307601368*^9}]
}, Open ]],
Cell["Annihilation v new unstable particle generation:", "Text",
CellChangeTimes->{{3.706688704228044*^9, 3.7066887274401083`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLogLogPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"BDM", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}], ",",
RowBox[{"BDM", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}], ",",
RowBox[{"BDM", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}]}],
"}"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<3-particle\\nannihilation\>\"", ",",
"\"\<Near-miss\\nstable collision\>\"", ",",
"\"\<Unstable collision\\n(new particles)\>\""}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{
3.7066883062830563`*^9, {3.706688584706068*^9, 3.706688590991329*^9}, {
3.706688639967392*^9, 3.706688698516262*^9}, {3.70668873942376*^9,
3.706688796250585*^9}, {3.7066888855944147`*^9, 3.706688929748054*^9}, {
3.706688968702896*^9, 3.7066890077908077`*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxN1AtMk1cUAOBSCgVLgf5IFTplgIZHK4w6xArsvzDpmDwExBEZbKhpIAJC
oQwHOrArIps6ymPJYCoPQ5VWFIgIFFDRAkIgQbbObS7qigRkjhoYtEDLWBr+
s5uc3Hw5yc3Jufce12NZcQIyiUQSrMd/+8aKOGSIVIxgaI63bAz1mcLnaus/
WLmKIZr5zYLXlW/xtsoS8WzdRn4RHwys9lb0YGj3xTdLIff1eNZ3Bg+tEUPk
d72XafJV/PZMeMfWdgwlJHJbctzWcMXVzqcOwwyUKw/E2xpIqMgh9nP/qY3z
zZDqo5lHqb9iiHn4jrI1nYyG+owvs9friQwouqvxMUfZ730t/L0bQ2euTPQw
X5qjBCYbf1SModgLfmxKCQWNzRtKJyQYkil/YQ6/Y4HiP7HMepODIZfwKB6z
2QJVH2+VaEo36rdEXAtpZloZhgqKlh+kN1simePJBq4QQ+ek6fsKXajoeOyr
55IoBuK0Uyz3XKIiXjUFj1u3VJNbGLpERa6nAxvNtjNQa0tWlc+nVohs4L+o
JNmhIVVwvqjbCpVYNy7xMq2Rtn3ccMbRmrCeU3FalgE29Q886qx9XWW/iXC5
xLzzeTLY/cD36sTrYBfj6MheLbhWTdM3+dMIJ7Kl4WOnwOlDnX0TXeDxzp8X
nurAi/Sus6v+NoRV83aHEoVg0/2Cewf3/e2pAV8PeagacKITVtPPp+mjwfQc
buCEGBytuBQmuAPeFewTf28KzPhrM1PLtCX8YfzqHgs++Nrjxi9oInBGaHmv
bT24Q1vu6zwKzlPGBO3VgU3v047wLZbi7pMI8Bopdi1FBP74Rkvzzh/B8iC3
NM+HYBuH/vzsGfC8sfuImGpPOCbDe+QfJ/CRmpv1jhxwFH9ANRkM/tJrUC84
CP6WK3hWmwKmZ2Cz54Xg2WceEl8xmLVVMy2tAJv+HzjPq6qyog3c5H7gt/f7
wbsYnm9rxsG8MWXdwAuw0rnqctcc2DUktSzPCH6s3rGwYsMgjCcsJEWzwFO+
brtPeoG3yVfVSQHgJGpDDSsMjE3f75fHgYO4kaW2KWCvaPfNYZng3NZbZTEF
4P3Fpwx+pWDT/AELLjeRC+vA4sljFycV4J8Ei9aeXeBNjbrP+Cowv3fmBBoH
P8ErKFv+AKcIk1eGp8GL37RsSV4A23P8WGNr4L6knQ+20zDCojRZ30EmOFs9
33/UFfzDPVn+YQ5Y02MoZgeAddeoX02G/M8Rr6zORoJPiHQdZglg9jamU+pR
sGk+g/26WR5/5oH/BQtYjag=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxN1A8s1GEYB/ALRc6JoxOXhFrkYqik2O9OsfIv+mddNNpuDCU5CZW6VfpH
DmuLlNKQQ5MpHCrtlIrtqKs1/T2ZSF2j687fajfvt2d79+yzd3v37nne97Hf
l7RNoEej0QR/1788G9pKzwLeeyb3h/f4tJ/rADXiJRdd+sTk0vVrMoYKflIv
HGwumw/O7qspI1XYrixjC65nzshv3kMt9Ssm4/ptSwuu3tKV43TJJKV9kS4K
HGZyI/getYccZqjOJHVdUAuTmyLZQN29SeNeEbcUx3+YPX8OMWtng7QuQY84
2CvrvtJVn/jYtd4W1ic4/KK7i8FpA+IK6WvWs8Vzie02h3izqmDd/ecRZ2SN
P0qogs+IE9Zn2hkSc+oN5q3NhcXKlEy/33BdbVKh6x4j4qcy3zRhM6yql08d
WzifWMvJP1qRCOvqB3fZqIYKzYyJ807pN36Igh0DLyv4lbDddNfzdSq4WEHX
lq+hE/NdxJu7j8AJTxvbeptgeeOrsTcaWM1oOjm5xoRYNrpgOz8Z1vUXbn2y
/ruTEq7kPZZ1WDOIFYyzcdpQmHHIY0OvCA6tzvUXNMCrfF13PBiAzb9ZslQs
U+KNOybXzg2Ab3WWHaYL4US/vFbTG/A9VZ6bTRecKg3zWaeBde9zAfEddvX9
niB4hhY+Ey2Et9yurVp+FZb4OMQ5PYZNLNrTDn6FR6ebd4sMzYjDElc+/2UN
7y6qubGQA4cEdMj6feF05ydawVb4goegrzgaZiQyh88mw8N9K065iWD2IuWg
OB/W/T841bmwIP8uXO4Y+HZ1O7zK3OlnkRz27paWdnyEpTaFJU0/YHte7LnU
abhTsWxswsScmIoYiwxlwwNuDp4HnGFbyaQi0guONLxZxPaHmYMP2yXbYB+P
4GzTaNg51NHSfz+cUnfnXFgGvOnEkSn3bFg3f2BBSbleZiks6t+X018NvxSo
5zs1wcZlmr0BMjig9Ws8Vw73UPkGVu/g6OSoiWeDsPp8rVXUGGzGcWd3z8Bt
kcsfLaEziYVxFW1bWfBBxWh7jD185UFF2k4OrGyZOuHiBWtuGR7v5/3noC9G
J4PheKHm3pwI2MWWZR0bA+vmM+zezF7xORX+A9Pg6Sk=
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw1VAlQUwcTplwRcr33SF5eEhDkUMJZsIpaMR+C1CoqBQWJqKjNLxUFUVAK
FQtFQX9EQOqPWlvBlqgc9WjlCGCNE6z4A0VtrFZbS4RG0EpBKEGO0pl0Z3Z2
dvaYnf12vxmbkyKU5mZmZsop/cf+K7a+XeeTOHZ4OX90YrFPjzw7cub9oZsU
2BbV6b3H/pQLV12UX9NQpviw3PbMf9KiblOYfeTFX0HfGeU5kclsfys7mDt5
jLIrx+TfEMqMvnIK0Qr/ml3Ok/LD4tRfpgcQ2F35tvxyuRn8lE2ZtdMJU/83
0NffY29g7ECv+VZ9KcEcg4pnvka+HcIC9tfqfSzgqD/npf6/APs+v9tI/2aB
Tqey8eADAryX7+dpecASMVvyFBsXCKBS36db7a1QFPfh0seJAjguXTGfvmCF
FXM+0qrvCk3zW0O79n23rAAh0vePXk+4YI3lTgsOOxE0DhYlLMhwZEFA9Yh/
96DhdcXSem4BC/K2hqq1S2kU6XdnLP6LhdwOS4vUBBqXapJKfNZNQzmL9bg5
RYjvtYF7UxqmYVPN1Y7AyzT6r3SO7xPawMYmkjPULYTRq/gj1XYbWPMbZVF/
CE37s8H12c+GBn4Qok3S31tC2MJw/1RybJcQhTkWdb+ut4WPShft4EDDZdlx
neKcLVyvGGcGG2k4TrTdntdvi+hKz3pDBY1TOraxYg4bDEUE5ibSUHgWLW1P
Y8P62lEertJI+L6u+W49G8ZF/asjGQaddT+++mmEjfVZIVY/EAyGufVZY3M4
iIlTFHbcFkE7yI9UJHNQYDn5PKaYMeHLQV3WB5fF60RourngD3c9B6vr12XX
9tI4F3RD2yLmYmY1Le/T0tBx8+KNK7kY+i1io/ukENxd/m/fzeYis2o8f8YU
HiurCpYov+WifUXOJ6wHAngH+qy+1sNFQS0nT1YrBPlcQPfTPLj6nY/d94sQ
wavH5lqF8tBXONt92agQX946u4edwsN878QdD1uF2L64sIlXxkM072DgQYrG
1f5CX0kbD5wTgQ6u14VIVYcvnDfCw7BZfKl+msh0n3ycjuS7NXSJ8LW0qvbO
cj4auLOOD9eKMGn23mRcCh8VD0vPklP5756vueD2GR+Neb9ueKeLQeVC53j3
G3wIXmhGSisZcOw0e3c+4yNKtuVKZ5MYgxMNMdksAqmOHQM3DogRvt3j9pCY
wM8lS7ZcrGUQc7K6TOhFYDRdwSz0ZrAitEX7NJBAyET+ViuFCB/KbhqVqwj8
+Ok3QdWlDP7rr3x0Ko7AvbmcMOYkA+52qi8vmYCLc8t5TjyDvkezcnyzCdS9
czjW5bkIUkZvKComsEV53LzDgjH9H4HuY1/pGoMZpMpKjhVfJjAUMdiSmc+g
wmXZw7c0U/Uc1x0Bexh4k+5/nuwkENoYYPkoisH8dvWZlicEEsd1QAYDtaTk
dP1LAoY3g2QRIgYzgrYeSp0gENiz7J5GzeCWzvXVaw4JfX4q2+IOA3n0q9iV
UhIP5u16aenHoMfXeXaijATx+8Ua+YAIDpVjutgAEh6n9orDkhnEsspPSpeQ
iFLdnFyTLgJl+E5TGUFi56ogIdaIsNA/LJcXR+LoV5tbnUpFkK10ESzZQUKV
br42ZLoYuy99fSg8nUTyE/7nOXZihHycNu6XS2Km+kyzdz9j4h8S9w6NRWzb
KobydIV5xhkSuaSw9d0p/LKfbj7ytIrEhVvdx8PfF+OectjGvZ5EWoj3wLxq
CWzPjmwI1ZJoZzolgYskCG16tg2dJD6Zm5ukSpPgjrzYUvSYhMWLgxrDfQni
kte/bjWQONDib7MfUgwfrhGtf0XiSMGL6p9apCC8/KTtkyQOvd7Qy22SojnW
7fp0NoWLTIzzYg8JUuJVzatoCovW6UODrSTYqRvUbJpBgT/+RV2oQoIT11R7
13hROBGu8eEaJNA3jn/sGUDBvTu7XLRHipEvWZlPgyi0qSSZ6hNT/vLuaVlh
FHRPjvbus7HHtpSRq29EU0iShQzsKrOHpwMt3rqJwuRbJBXubm/iZwpub57d
rV0khV+DdFZXKoWN/9M++LRMir8BGhySdw==
"]]}}, {{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJxN1HtMk1cUAPDSFgqWAv2QKnTKgBkerTDqECuw78JGx+QhIEpksKGmgQgI
hTIc6MCuDNmmozyWDKbyMFRpRYGIQAEVLSAEEmTr3OairkhA5qiBQQu0jKTh
OzvJ+eOXm9ycnHPvcTueHS+kkEgk4UZabCSZBBF5yBilHMXQPH/FFOY7jc/X
Nby/egVDdMqNwldVb/D2qlLJXP3m+RI+FFTjo+zF0J4Lr5dD7xnw7O+NnjoT
hshv+6zQFWv4rdmIzu0dGEpM4rXmuq/jyitdTxxHmChPEYS3N5JQsWPcZwHT
m/dbIPVHsw/TfsMQ6/BtVVsGGQ33m17kbNQTFVh8R+tLQTnvfiX6owdDZy9P
9rJeUFAii4M/LMFQ3Hf+HGopFY0vGMsmpRiSq35ljbxliRKOWGW/zsWQa0Q0
n9ViiWpOtEm1ZZv1WyGepSwrvRxDhcUr9zNarJDc6VQjT4Shr2UZ+4tcaehE
3Mtn0mgm4nZQrfZepCF+DRWP37BMm1cUtkxDbmeCmix2MlFba3a17yfWiGwU
PK8i2aNhdUiBuMcaldo0LfOzbJCuY8J41smGsIFbeUaeCTb3DzzmontV7bCF
cIWU0vUsBexx4AdN0jWwq2lsdJ8OXKehG5oD6ISTOLKI8dPgjOGu/slu8ETX
L4tP9OAlRve5tQBbwuoF+0NJIrB5vuC+of3/eGnB10IfqAedGYQ1jPPphhgw
I5cXNCkBxygvhgtvg3eH+CbcnQYz/97K0rHsCH+QsLbXUgC++qjpc7oYnBlW
0WfXAO7UVfi5jIHzVbHB+/Rg8/u0J3yTrbzzOBK8TopbTxWDP77e2rLrJ7Ai
2D3d6wHY1nGgIGcWvGDqOSqhORCOzfQZ/dcZfLT2RoMTFxwtGFRPhYC/8B4y
CA+Cv+UJn9alghmZ2Nx5EXjuqafUTwJmb9fOyCrB5v8HzveurqpsBzd7HPj9
vQHwbqbXm9oJMH9cVT/4HKxyqb7UPQ92C00rzzeBH2neWVy1ZRLGExeTY9jg
aT/3Pae8wTsUa5rkQHAyrbGWHQ7GZu4NKOLBwbyoMrtUsHeMx9bwLHBe283y
2ELwhyWnjf5lYPP+AQsvNZOL6sGSqeMXppTgn4VLNl7d4C1N+k8FarCgb/Yk
mgA/xiup2/4Ep4pSVkdmwEvftG5LWQQ7cP3Z4+vg/uRd93fSMcLidHn/QRY4
R7MwcMwN/ONdecFhLljbayzhBIL1V2lfToX+z5Evrc9FgU+K9Z0WiWDODpZz
2jGweT+D/XvYnn/lg/8DIFSNqg==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxN1H0s1HEcB/DzFDknDldcJdQiF0MlYb87xeS5R0s02m4ZSjgpKrr1XMph
NqQHNU8nTa3CodJOHmK71NVazyfzkLpG504est183322zx+vfbfvvvt8Pt+P
3f7k7Xw9Go3Gn0ududSlITRVHgW8T0zuL6/JGT+XAWrUUya8+pXJpevdzRwu
+E29tLcpMh+cP1dRRsqI3dnGFlyP3NEJ3lMN9Scu80a1pQVXd8WaSbp4itK8
PCYMGmFyI6Pc61LtZ6nOZFV9cDOTmyb2pu6X07jFoubShM/z9+sQs3Y9lNQn
6hKHeGY/VrjoEZ+43tfM+gpvu+zmrH9Gn7hS8pbVtdSA2DYw1ItVA2vfv4A4
M3vyWWINfFaUuCnL1pCY80B/wYYrsEiRluU3AdfXJRe67DUi7pD6ZgiaYOUD
2fQJq4XEGk7+8cokWFs/uMdGOVxoZkycd1qv4XMM7BBUJI+qgm1nero3KuFS
OV1TsZ5OHOUsCuw9Cid2NLT2NcKyhjfj79SwitF4amq9CbF0bNGOqBRY21+4
5cWmn44KuIr3XNpuzSCWM87Ha8JgRqq7d58QDqu94s9/CK/1ddn5ZAA2/2HJ
UrJMiTfvnNpgEADf6bx9hC6Ak/zyWkxvwY+Uea42PXC6JMJnoxrWzuci4nvs
2sevguFZ2rbZWAG8tbquZtU1WOxjH+/4HDaxaMs4PASPzTTtERqaEUckren+
Yw3vKbl7y4oDhwa0S/t94WNOLzT8cPiSO/9DaSzMSGKOnE+BRz6sPu0qhNlL
FIOifFj7/+B0p8KC/PtwhUPQ+3Vt8Fpzx98lMtirV3Kz/QsssSksa/wF2/EO
XEifgTvlK8f/mpgTU5Hj0WFseMDV3uOQE7xMPCWP9oSjDctL2P4wc/Bpm3g7
7OMecs40FnYKc7D0Pwin1d+7EJEJb8k5Ou12DtbuH5hfVqGbdRMW9u/P7a+F
X/NVCx0bYePb6n0BUjigZSiBK4NfUfn6iz/CsSkxf7sGYdXFusUx47AZx43d
Owu3Rq96tpzOJBbEV7aGs+DD8rG2ODu4+Ellxi4OrGieznH2hNV3DE/28/5z
8HejUyFwgkD9SCcSdl7Gsj4QB2v3M+zWxF79LR3+B+jc6Ss=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxFVGtUVIUWRp7CvM45zDlzZgYEeSjDMzBFTZwPQTJFJVCQERW1uZIoiIIS
JAahoBcRkLyoWYLFqDzyUfIYwBzXYOIFQm1M0zJGaARNAiFAHvFj1mqv9f3Y
az/WXvvb+5u5JTFcaWZiYqKcwrQpmJr8azY+nRcSubZ4tWB0Yol3tzwrYtaD
wVsUOGZVaT3H/5LTqy/Jr2soY3xIbnP2P6mRdyjMOfry78DvR+TZEUkcPwtb
mDq6j3IqxuTfEsr03jIKUQq/6t1Ok/Ij4pRfZ/gT2FPxjvxKmQl8lY0ZNTMI
Y/9p6O3rtjOwtmDWfqe+HG+KAcVznxGBLUL9D9Tovc3goD/vqf6/EPu/uNfA
/G6GDsfS8aCDQryf5+thftAc0VtzFZsWCqFSP2Ba7CxQGPvRsicJQjgsW7mA
uWiBlXM/1qrv0cb5LaFd94Frpj+NtAOjN+IvWmKF48IjjgSDQ4XxC9MdrCCk
usV/uDPwvGpuOS/fCvLW+sp1yxgU6vekL/nbCjnt5mYp8QwuVycWe6+fjjIr
qydNyTR+0AbsS66fjs3V19oDrjDou9oxvp+2hrV1BHewi8aIZ9HHqh3WsBQ0
yCL/pI37s8aNOc8H+3+k0Srp6ykmbGB4cDopppNGQbZZ7W8bbOCt0kXZ2zNw
Xn5CpzhvA5erI7OCRhg4TLTemd9ng6gKjzpDOYPTOs5I+VwOWIoIyElgoPAo
XNaWyoHl9WN8XGMQ/0Nt0706DkYW962JYFl01P70+udhDjZkBlv8SLAY4tVl
js3lIjpWUdB+RwTtgCBCkcRFvvnki+gi1sgvF7WZH14Rrxeh8dbCP930XKyp
W59V08PgfOBNbbOYh1lVjLxXy0DHy40bWcXD4O/hm9wmafB2+71zL4uHjMrx
vJlTfKyqzF+q/I6HtpXZn1o9FMIrwHvN9W4e8mu4ubIaGuQLIdPH8OHieyFm
/680gtaMzbMI4aO3YI7b8lEaX90+t5eTzMcCr4Sdj1po7FhS0Mgv5SOKfyjg
EMXgWl+Bj6SVD+7JAHuXGzRS1GGL5g/zMWQSV6KfLjLepwBnIgSu9Z0ifCOt
rLm7QoB63uwTQzUiTJq8PxmbLED5o5Jz5FT+exeqL7p+LkBD7m8b3+1kUbHI
Kc7tpgDCl5rhkgoWXFvNvl3PBYiUbb3a0SjGwER9dJYVgRSH9v6bB8UI2+F+
Z1BM4JfipVsv1bCIPlVVSnsSGE1TsIu8WKwMadY+CyAQPJG3zUIhwkeyWyPK
1QR++uzbwKoSFv/1Uz4+HUvg/jxuKHuKBW8H1ZubRMDZqfkCN45F7+PZ2T5Z
BGrfPRLj/EIEKas3FBYR2Ko8Ydpuxhr/j0DX8a91DUEsUmTFx4uuEBgMH2jO
yGNR7rz80duaqXquy07/vSy8SLe/TnUQCGnwN38cyWJBm/ps81MCCeM6IJ2F
WlJ8pu4VAcNbgbJwEYuZgdsOp0wQCOhefl+jZnFb5/L6DZeEPi+FY3aXhTzq
dcwqKYmH83e/Mvdl0e3jNCdBRoL441K1vF8E+4oxXYw/CffT+8ShSSxirMpO
SZeSiFTdmlybJgJl+F5TEU5i1+pAGmtFWOQXmsOPJXHs6y0tjiUiyFY5C5fu
JKFKM10XPEOMPZe/ORyWRiLpqeCLbFsxgj9JHffNITFLfbbJq4816g+J+4fH
wrdvE0N5ptw0/SyJHJJueW+Kv6xnW44+qyRx8XbXibAPxLivHLJ2qyORGuzV
P79KAptzwxtDtCTa2A5JwGIJQhqfb0cHiU/n5SSqUiW4Ky8yFz0hYfbykMbw
QILYpA1vWgwkDjb7WR+AFENHqkUbXpM4mv+y6udmKQhPX2nbJInDbzb28Bql
aIpxvTGDQ+ESG+20xF2C5DhV02qGwuL1+pAgCwl26QY0m2dSEIx/WRuikODk
ddW+tZ4UToZpvHkGCfQN4594+FNw68oqE+2VYvgrq4xngRRaVZIM9ckpf0XX
9MxQCrqnx3r2W9the/LwtWlRFBJlwf27S+3gYc+It22mMPk2SYW52Rn1mYLr
W+f2aBdL4Vsvnd2ZQmHT/7QPPyuV4h8vGJJ5
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {-0.16976192005308022`, 2.8895107487823632`},
PlotRange -> {{-0.09614834410085958, 4.61512051684126}, {
2.9572592297229097`, 7.157665048036832}}, PlotRangeClipping -> True,
ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {-0.16976192005308022`, 2.8895107487823632`},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}},
GridLines -> {
None, {3.912023005428146, 4.605170185988092, 6.214608098422191,
6.907755278982137}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange -> {{-0.09614834410085958, 4.61512051684126}, {
2.9572592297229097`, 7.157665048036832}}, PlotRangeClipping -> True,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
"\"3-particle\\nannihilation\"", "\"Near-miss\\nstable collision\"",
"\"Unstable collision\\n(new particles)\""}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.97, 0.606, 0.081]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.91, 0.318, 0.243]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], ",", "Automatic"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{
3.706688308092372*^9, {3.706688660495554*^9, 3.706688699274287*^9}, {
3.706688764377651*^9, 3.7066887973714037`*^9}, 3.70668893209691*^9, {
3.706688973863407*^9, 3.7066890092016706`*^9}}]
}, Open ]],
Cell["\<\
Definition of collision: when the change of the state of cells in the causal \
vicinity (with ratio equal to the CA neighbourhood) affects another local \
pattern.\
\>", "Text",
CellChangeTimes->{{3.7208156701193132`*^9, 3.720815731633654*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLogLogPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Entropy", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}], ",",
RowBox[{"Entropy", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}], ",",
RowBox[{"Entropy", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}]}],
"}"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<3-particle\\nannihilation\>\"", ",",
"\"\<Near-miss\\nstable collision\>\"", ",",
"\"\<Unstable collision\\n(new particles)\>\""}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.706689028746162*^9, 3.706689033555668*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGAQBWIQDQONmyUn9S95Yv/e8tc/J71n9jA+N/PaqleTP9qj
yn+D84173353PPATzmdS0PrFvfqP/QqtT4uOT39oHx5ltK5I6T9cvni1tf2m
RQwOqOYzOpjqfZu62eClvVjo1t0bs5kcpG6J3vC6+8zex7x++2M9Zgez59sP
/Xh9y7523uU9Yg+ZHRac43zi2P3APrDHUJullcWhgH+rZ96ha/bLd18XOyXD
6qCg9SnqZOBde3kPX0uxVaxw9RD3szko202+mvrqhH1V/a+D2avYHOq4PaJf
nTho3zYx26pant3hrvrtd7dCbuzX2czCZtbH7uCjlXZGkeHo/omPi6udviPk
N67Ln6IXzeHQNDNHsjz0yX4AFiCggg==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxV1AlIE1AYB/Dl0aw5U7OVLjMv8liKlnmkLC2lzLNLvEKFoTg71JmpWSna
XaiNIE3JAzXngYrnvGVqheLViig6ZqLZsdB086wYvX998Pj48eDx+L73PsOI
c8c4ShQKhfN7/cl/gzacEr2wbZz93XFx1c1qkv3XNOWq5M/3f7D/358n3nP3
64Jrl5xYaafFIk2wzOYnmWQ+4PI6A4Jsq+OM1ojjBfvZdUWUAwUVwaeGqa86
FeevI2acbBDWcpWIveyvNEmslIlTC8baGB9g/zs2liqZKsRlwpeMZ9tViQ0O
ezsyKmDF/dcTJ19Z7OZWwNeyuU4pBlRiVr3K+n334GxJfIrbAlxbfY5vFaxG
PCBySeS1wtL6kZXULRuI5aycS2UxsKJ+8KCe9DNfcyNxVoZy87tQ2NjzgTio
HDZYHXzuIIXzxDR5qR2NOMgy+/DQRZg70Nwx1gKPNL+YeyWD5+ktact26sSi
2U3Hg2JhRX/h9n6nb2YSuNy1V9SnSycW029EyX1gepzt/rF02KfynjunAd7t
YnWicxLW+qLDkDI0iA+eWN6n6gGXPC2+QOPBMW5Z7RqFcKM0y1pvEE4Q+jk7
yGDF+9xEXMOsbBo9Cq9R/NfCePCRJ9UVpo9ggbNRlFkvrL65J/H8NDy72hqY
TtUk9ouxeP5TFw7MrSrcwoK9PfpEEy5wknm/nOML37blvMkLg+kx2jM3YuGZ
N7syrNNh5jbJVHYOrPh/cII5/35OHVxq7Pl6bw+8W8vsR+4I7DgkfNz3Hhbq
8fNbvsOGrpE3E1bhp2KTuSV1LWJ2wFyIDxOetDbac9Yc1hcsi0Ps4RBqUS7T
Hdae6uoRHIOdbb2ua4TB5j7GOu5n4Pjampt+yfChqxdXbK7DivkDc/JLlVIe
w+kTEXcnKuFxzvwGsxZ4Y7HstIcI9mifjj4wAo+yc1S2voXDYkOXnk3B87eq
t4bOwZosG+bQGtwRYtq9g6ZNzIsq6/BlwOfFsz3hhvDDzrLEkyxY0rZy1dIe
lpVQL0+4/uOjn9TSvOBonqxxXQBsqc/QjQyHFfMZtmll7vqYAP8CNHoGjg==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxV1AswlGsYB3AtuS/7bWwhRzjGndBNcZ6HYiQpYvakJUwbxXEJqUR0cyu5
ZaRUi0FujQxCKEIUQrnFkXYJEZ0k5HLOmdg955355p3f/N955nnf7/teRVdv
WyaJj4+P+c/z77w6QHi9a8LHNzBpOL9kqjMMqxbjzz83lvAF/p/PcG1wfeK7
ydM5rkmbNObFchfAiUmER31JB7qDfsEppWW459F/+y//rmq/3F3wKI0PV/2z
/hpcXU+zL64o9CDhaj2r7RdK2Tr83Dz4bscT2iA/N7e5pqcpcEUA9/mlv6s/
mgtZFV20po1r8ewtPje9I+2gYLHfkJazFsPKDY+Dbk31z/4F0SkqwcrCMBzO
XZh/5pEjiJulGISBUTtcjfPYGaQgxLVWkYDgthgh7vo4tl+Q6XchNLTVHL1m
2QGFBd6JOkeEUbwkyEyF7gsv6owD/cuFkaQlaJpc+gKmitoWg6VF8Hzw1bJj
RT0wpxV/PstTBEmpgTElGo9Wzk8ES8arcypb26BZdmoskSLK3V/sZf7HA46i
GFYkE38jgwPKlkmdDtk8Kyw1v9wxJYqyvdLdlv3DcLtTbC5zqxjXDppxFi1n
ePZ48biqo4zntsdvp7tneZ4hl4UtbBXnuu6r5CEHX3E0Lqsr+/3m8Mr7FUfX
aLlkVkYHVDbs/KzG5jnbpLauXobMdSc5wn3OmozZm21eqhR2A/mU/q6Oi7zc
Oi/GjFlMxszi7kuxZq+qtY117KqHyTj7qpYeY9wExLgUbYomgSdmjzPwciPs
tlvYttZcAqMbq8KIvvzqjMb002L+Ekgvdkl5970DPE1jKyVYEuit0uTjSu+D
kqlYXdlmXh5QcdBox6wEigmfJtsODK58n5JcP5TLK23fJ4kGlR+nNuz6AMt8
NsvO/pJ4SDHtjmf5AOx9UJCjckcSZSK0NqlFD0OukZK7Wq0kklgk/fTuIRBf
VxPoMyqJR7vkHcQGR+HrUvnhi0IUtNs5eij3GwcOemq8/CZDQRnrerempEE4
nJLPktaioLN2CUuD8hr2m9fXcYwpyLjXZhNs0QNn1RvmmAcoSHXcSqHzd0K0
PrPvtjMFHX1aY37rfA9kT+qnCF8KkhYyNnrk98KnPtXLuhd5udwG9khcPC//
+f/x6geoJybEP6Jg6NKt4hO2A5CpbNm7pYaCpk7Sx4lQNmgTal9S2nj9GrZU
3K9/z9tPhWxiatkkBVVVS1oaDQZB0cQtMmCJgsFKjSkhdb3Q2Pnr9A9xAlnX
tJgTDwcB6NMMazkC6aH8eVtE62BYV8nAS51ATR/zVEpbP8jnLnQythNYKqrp
NVndBwyhtBQ5MwK/2Vsozlt9AOrI05pcWwIn3iSr6r9rACN9q3AJZwIti4S9
T4n+CerWylJmfxAobeixR2+IA36FDyMPniNw7jnL2N63D/aEnlnUCydwt2Ra
pEvD8Mr9RmDPmMKN1jNDwEzNJAXdJ3DE146h/ZwNFzmu1zl5BF4h75fPM2XD
G+aMiFoZgWFJA3qmvUMgmj7rZF5HIHEsJJtdNArmlaMnsY3ndogXWN9PYOaD
0C6y+wQ4+zr+aBrheSaqYL3jNIGvly8N7eWbAoqWnlzLMoFeDFuvjJDPUMVQ
efaLGBXvL6oGNES9B3/3rKoDNCrebA1421g7DD6dX2tcFKk4llkS1XSXA7eq
swLttagoHL2ZCe0TwH6yGKq5nefZDKEQjsl/vG9IOMyKiuUOnOZQ0Sk46T9b
soZORVaazLSj/SRoytNk3Fyo2JPsvE457vPK/UzFgqSIGdAbB71yOdUPAVRU
W6iMlFIah78BvHfZSw==
"]]}}, {{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJxTTMoPSmVmYGAQBWJGIGZiQIDGzZKT+pc8sX9v+eufk94zexifm3lt1avJ
H+1R5b/B+ca9b787HvgJ5zMpaP3iXv3HfoXWp0XHpz+0D48yWlek9B8uX7za
2n7TIgYHVPMZHUz1vk3dbPDSXix06+6N2UwOUrdEb3jdfWbvY16//bEes4PZ
8+2Hfry+ZV877/IesYfMDgvOcT5x7H5gH9hjqM3SyuJQwL/VM+/QNfvlu6+L
nZJhdVDQ+hR1MvCuvbyHr6XYKla4eoj72RyU7SZfTX11wr6q/tfB7FVsDnXc
HtGvThy0b5uYbVUtz+5wV/32u1shN/brbGZhM+tjd/DRSjujyHB0/8THxdVO
3xHyG9flT9GL5nBompkjWR76ZD8AH9yghA==
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxV1H0sFHAYB/BzXi7OCeW8XCVkDodR3opdp1hFSC9GNLXdMqcidxHpxQi9
Dd3a0ssUQw5NpnBeih2qsbx0tab1cjJ6c0bcyUu2W79vPdvzx2e/7bffnuf5
PTZHTkTwtSkUCn85tZaTSkHQX2UkzFoMcSd85xYDXEe5f03Xrkn/en2S+//5
DPHGqz9meU/VxNT1TnN0yTxXfHpDzg2BsD0y2qP2pO0ScYpkC/fRfcrWu1UH
D7yivW3X3K9FzNzfIK0TUIlDvM89UbhqE2feHWxhfoL3XHF31snRIa6QvmG+
WKNLbL1jty+zCta8X484/dzcM0EVfLFQsDnDmkbMqdfR87oGFypSMgJm4bra
E2LXgyuIe2T+qcJmWFnfv5Bppk+s5hSdqUiENfWDe62UX8XGBsQF2dqNH2Jh
u1035NGVsPVi70sfJXxLTleXe9KJo50Ld/SlwYKexrbBJri/8fX0WxU8w2i6
MO9pSCybWrk3OhnW9Bdu7d78k62AK3mdsi5LBrGckRevDoUZJz22DGbBodXX
AvkNsIu/6772Udjk+2qmkmlEvG3fvJduEFz2vPQUXQgnBhS0Gt2DHysL3Kx6
YZE03M9HBWvmcyXxQ1b1k4FgeImyZylOCO98UFtlfxuW+NnGszthw1UdqUnj
8NRic1QWzZg4PNHp5S9LOKq45p4ZB94d1CUb8YdPO3ar+WHwZQ/+8K04mJFo
+i0vGf427JDtlgWzLBRjhUWw5v/BIkfx9aJHcLndrnebOmAXE/ZkcT/s2yct
6foIS63Ed5omYBve0XzRIvxcvmH6t6EJMTdyOiaUBY+62W487givlczLY7zh
GNr9YlYgbDr2tEMSAft5hOQaxcGOoXarA4/BKXUP88PT4e3n0xbcc2HN/oH5
d8qpGSVw1siRqyPV8BB/Rp/dBBuUqg4FyeCg1vGErf3wALdIx/w9HJcc+/vF
GDxzqdY8dho25riz+pbgthj7Z+vopsTC+Iq2MCacJJ/qOGwD32yvSN3PgRUt
C+edvWFVGe3sCO8fB39ZcSEEThCqHmtFws5rmZZHD8Oa/Qy7N7McPovgP0l2
BpA=
"]]}, {
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.009166666666666668],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxV1Hkw1H0cB3AtuZf9bWwhj/AYN6FL8Xw+FCNJEbNPWsK0UTyOkEpEl6vk
ykipHINcjQxCKEIUQrnikXZtiOhJQo6nmdh9nu/M94/XvL/zme+t6Opty+Tn
4+Nj/uxrfnYSH6+B8HrXhI9vYNJwfslUhwOrFuMvODeW8AX+n89wbXB94rvJ
0zmuSZs05sXyFsCJSYRHfckAuoN+4SmlZbjnMXD7H//uGr+8XfAonQ9X/av+
GlwdT7MvqSzyIOFqPavtF8pYOvzcPPhu5xPaED83t7mmpylwRQD3+WW8azia
B9mV3bTmjWvx7C0+N70jHaBgsd+QlrsWwyoMj4Nubc2v+QuiU1SClYVhOJy7
MP/MI1cQN0sxCAOjDrga57EzSEGIa61iAcFtMULc8XEsvyDT70JoaKs5es2y
E4oKvRN1jgijeGmQmQrdF17UGwf6VwgjSUvQNLnsBUwVty8GS4vg+eCr5ceK
e2FOK/58tqcIklIDY0o1Hq3snwiWjtfkVrW1Q4vs1FgiRZS7vtjL/I8HHUUx
rFgm/kYmG5Qtk7occnhWWGp5uWNKFGX7pHssBzhwu0tsLmurGNcOmnEWrWd4
9njxuLqznOf2x2+ne2Z5niGXhy1sFee6/qvkIQdfcTQury//8yZn5XzF0TVa
LjktsxOqGnd+VmPxnGNSV98gQ+a6ixzhPmdNxpzNNi9VinqAfEp/V+dFXm6d
H2PGLCFjVknPpVizVzXaxjp2NRwyzr6qo8cYNwMxLkWbokngidnjDLzcBLvt
FratNZfA6KbqMKK/oCazKeO0mL8E0ktcUt597wRP09gqiTQJ9FZp9nGl90Pp
VKyubAsvD6g8aLRjVgLFhE+TbQeHVu6nJNcP5fLLOvZJokHVx6kNuz7AMp/N
srO/JB5STL/jWTEIex8U5qrckUSZCK1NatEcyDNSclerk0RSGkk/o2cYxNfV
BvqMSuLRbnkHsaFR+LpUcfiiEAXtdo4eyvvGhoOeGi+/yVBQxrrBrTlpCA6n
FKRJa1HQWbs0TYPyGvabN9SzjSnIuNduE2zRC2fVG+eYByhIddxKofN3QbQ+
s/+2MwUdfdpi/uh6D2RP6qcIXwqSFjI3ehT0wad+1cu6F3m53AbWSFw8L//1
/nj1A9QTE+IfUTB06VbJCdtByFK27NtSS0FTJ+njRCgLtAm1LyntvPkatlbe
b3jPW0+lbGJq+SQFVVVLW5sMhkDRxC0yYImCwUpNKSH1fdDU9fv0D3EC065p
MSceDgHQpxnWcgTSQ/nzt4jWA0dXycBLnUBNH/NUSvsAyOctdDG2E1gmquk1
WdMPDKH0FDkzAr/ZWyjOW30A6sjT2jxbAifeJKvqv2sEI32rcAlnAi2Lhb1P
if4N6tbKUmZ/ESht6LFHb5gNfkUPIw+eI3DueZqxvW8/7Ak9s6gXTuBuyfRI
l0bOyv9GYO+Ywo22M8PATM0iBd0ncMTXjqH9nAUX2a7X2fkEXiHvl883ZcEb
5oyIWjmBYUmDeqZ9wyCaMetkXk8gcSwkh1U8CuZVoyexnecOiBdYP0Bg1oPQ
brL7BDj7Ov5oHuF5JqpwveM0ga+XLw3v5ZsCipaeXOsygV4MW6/MkM9QzVB5
9psYFe8vqgY0Rr0Hf/fs6gM0Kt5sC3jbVMcBn66vtS6KVBzLKo1qvsuGWzXZ
gfZaVBSO3syEjglgPVkM1dzO82ymUAjb5D/eNywcZkXFCgd2S6joFJz0ny1d
Q6diWrrMtKP9JGjK02TcXKjYm+y8Tjnu88r/TMXCpIgZ0BsHvQo51Q8BVFRb
qIqUUhqHfwHRc9lN
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {-0.16976192005308022`, -0.754319647379296},
PlotRange -> {{-0.09614834410085958,
4.61512051684126}, {-0.7264326014912118, 1.002564243570005}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes -> {False, False}, AxesLabel -> {None, None},
AxesOrigin -> {-0.16976192005308022`, -0.754319647379296},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}},
GridLines -> {
None, {-0.6931471805599453, 0., 0.4054651081081644, 0.6931471805599453,
0.9162907318741551}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange -> {{-0.09614834410085958,
4.61512051684126}, {-0.7264326014912118, 1.002564243570005}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
"\"3-particle\\nannihilation\"", "\"Near-miss\\nstable collision\"",
"\"Unstable collision\\n(new particles)\""}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.16500000000000004`],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.97, 0.606, 0.081]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.91, 0.318, 0.243]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], ",", "Automatic"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.70668903571975*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListLogLogPlot", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ByteCount", "/@",
RowBox[{"Compress", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}]}],
",",
RowBox[{"ByteCount", "/@",
RowBox[{"Compress", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}]}],
",",
RowBox[{"ByteCount", "/@",
RowBox[{"Compress", "/@",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{"8", ",", "9"}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "i"}],
"]"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}]}]}]}],
"}"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLegends", "\[Rule]",
RowBox[{"{",
RowBox[{
"\"\<3-particle\\nannihilation\>\"", ",",
"\"\<Near-miss\\nstable collision\>\"", ",",
"\"\<Unstable collision\\n(new particles)\>\""}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.706689053705592*^9, 3.706689069559214*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxl1H0s1HEcB/ALOTrn4Y4TVwkp3MUo5Gn3o5hKojIjmlq3LEpyUiRllVTK
09qiBw+NctJk5eFQaeehxiZ1tdIqJ9PzFelOHqr95vv+o+/23Wev73ffz/e7
75P1jsRNYi0GgyH+W//F2ZJxpb+F945LffOcmPZ3GhalmpUwzldyKZb2zbSP
hd+J6f5x4hW5X3753dcQay12nGBJJ0V1PyyvpsVxqYgo19r9NjPEyVJv0e1y
BjVrOv8canZ+XvgdWV28FnGwR2aD0kmbms1Pt2uT8WFnXQQ6J3SIq2TPeY8W
zCW2CtrgyauG6fXrUt2H1vjsXMql0jInHsRXwyfz473SrZhUbr2+oO0NhxLW
6+i6n2NSgyXubq8KOVS+Mjnd/xdcV5tY5LRVj7hL7psqadaj1NeYR4b8OJSq
vm8qw0yfWCMsOFyVANP7B/dYqj4WGc8jzjuu3fgmBrZdd0ERdR22mu55vEoF
lyhYmko3FnGUID+o9yAc39XY1t8E9zU+G3uhhsfZTccm3QyI5aNGm6OSYPp8
4dZOr6/2Svi630N5hwWbWME+FacJgdn7Xb37s+CQmnMB4jvwcl+nLfeGYZPP
pjwVz5B49ZZJ97mB8LXuigMsCZzgn9dqWAbfVeU5W/bAKbJQn1VqmL6fRsS3
+DUNT9bDM4ywmVgJvPZGbbXdJVjqYxNn/xA24Lan7vsAj043R2YxjYlDExwf
/7SAI4tvlpkJ4Q2BHfIhX/iQQ6dGvBE+4yoeKImF2QmcT6eS4E8Dy447Z8H8
+cqR/AKYfn9wikNRYcFtuNJ23cuV7fByE/vvxX2wZ6+stOMtLLMsutz0Dbb2
25WTMg13K5aM/TYwIRZFjEWH8OFhZ5sVex3ghdJJRbQHHM0sL+YHwJyR++3S
TbCPa3C2YSzsEGJrGrAHTq67lROaBq85enDKJRum/x9YfLlSK70UzhrakTtU
Az8Vj+vbN8HzKtTbAuVwYOuH3VQf/ERUoGP+Go5Nivn9aAQeP11rHjMGGwtd
+L0zcFu03YNFLA6xJK6qbSMP3qcYbd9uDV+8V5UaLoSVLVNHBR7wf3H9e71j
wfBuifrunAhYsJBnsWs7TP/PsEszf9lgCvwHNzyyxg==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxV1A0s1GEcB/DzUuKcl5N/cZWQhTsMIcXuKCYhxMxFo+3GUN5Oil6t9yJv
a4veM8qhybweV2knamxSV+tlysn06kS6k5dqV8+3ftuz3z57tmfPfr/n+Vnu
SA0XaNJoNMGv9Tv/jWzTctrZShPemOf0nK/jCPev6Vq1OR9Kxrn/709x67+a
X85JNOG55n/+7nNXRay50n6aLprh5jfosiWDTF4U36Uuw2qeOFO0nnv7Go03
VO7u9rKE+ed8DWIqslFcn6xJHORxsFnuqEW8/9JAO/UWDjvjzNY+qk1cJX5G
PVy2gNgiINiTqobV919InHNw+l5yNXysKHldroUOMadBe6F7AVwkz8z1/Q7X
16WWOm5bRNwt9c4WtsGKhv7Z/aa6xCpO8b6qFFhdP7jXXPGh1EiPuPCIVstg
LGwdeE7GvwFbzPU+WquAy2V0VaUbnZjPLgro2wMnd7dIBlrh/pank8+V8BSj
9fCMmz6xdMJwKz8dVvcX7niw7outHL7hc1/aZcYgljFOJKpCYEaGy/qBPDik
psBP0Ag7eDtG3BmBjT8tphSUAfGGiBn3Bf5wRc/13XQhnOJb2GFwFW5SFDqZ
98JZ4lCvtUpY/T4NiW+xapofb4bnaWHzcUJ40826apsLsMjLKtH2Pqxv0pmd
9h6emGuLztMxIg5NsX/0zQyOLqu9asqBg/27pMPe8F67ByrBFvi0i+BVeRzM
SGF+PJEOf3y1+ohTHsxaKh8tKobV/w/OsistKb4NV1oHvljTCTsY246X9cOe
feIrXW9gsXnpxdYx2NIn4WTWHNwjWzX5Q9+YmBs1GRPCgkecrFx32cHLRTOy
GA84RudaGcsPZo7e7RSFw14uQccN4mC7EOvFfjvhzPpbJ0Nz4I2H9sw6H4fV
8wcWXKzUzL0C5w3vyB+ugZ8IpnRtW2G968rt/lLYv+N9Eq8ffswt1l7yGo5L
j/3xcBSeOlW3JHYSNuI4s/rmYUmMzb0VdCaxMLFKsoWC02QTnfGW8Pk7VdmR
HFjePnuI7QErK3QODPv8483vFh0OgpOEyiaNKJi9nDJLiIfV8xl2bmOtHsqC
fwL5UbsU
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxTTMoPSmViYGBIBWIQDQPlorMZ+pcJO7y3/PXPSe+ZPYzPzby26tXkj/Yb
P0nNr8qAyX+D84173353PPATzmdS0PrFvfqP/clKF5sUNWGH8CijdUVK/+17
N3Nq77sv5FC82tp+0yIGB5g8xHxGB5h+sdCtuzdmMznUzru8R+yhsIOPef32
x3rMcHmIOIIf2GOozdLKAjdv+e7rYqdkWOH65T18LcVWscLlIe5ng+uvqv91
MHsVmwPMv20Ts62q5dnhfJ3NLGxmfexw9RMfF1c7fWeHm79xXf4UvWgOuPoT
R23LS3ZxwOU/bL74t1aU02HuDpvoyetEHH7qTKpZnsPpEKC/QKlEQgQafgj+
WakPr6YIcDk0HQ+P/eUj4jChhXnH/VguB7M3z+6uYRd1UPaadi1qBYIv/+/s
aYsPXA4Kj0WnLo4UdZh9jfvnMlNuOD9Ke6LHuQoEP/vEjn2Xd3I7nP71oqtt
qajDxR1Xv9z4gZD/xruz8Y8pD1z+6Gf+4KhCBB8Svzxw/+w9bvVO4zGCv8Lx
8NFjkrxw/jXejoyffgg+b5GR9eUmBN9vTZ9r6lZeeHjp2uqF7H+GkBd8IyL2
QYwPHh7OIX/MWN344OqXnFxcxl2CkM9xmrCXbyEfXP+2DxP0pc4i5Et3B9hY
/OCDhx8kffLD+eul12y/5M0P9+9/hsD/CSX88PDxXLluleocfgf2g8pzdN6I
Oqy2UcrQOIzg8wgfKi94yQ9NZ2IOn//timxiF4DLB+Ronf4qKQA3P3LW2oWi
OgJw833djh19YovgV2oe/5nqj+B3G6XemZ2A0M+bI/S6oxDBf31HvUW/CcGX
lnj8YuIkhH5I/kPwSzWnTJ60CaF+mbLXLZNDCL6uoMbHWRcRfMtzuxcce4Dw
z26pKXN3vkeYp+iY3ln6D6H+5DWVL795BOF8+/AvMX7SgnD1z/SVjPM0EfKy
q/9cizFH8GPYF82SdhWEh6fQiwOHVgch9NsY+bTzJQjC3aPppyzimivosDWm
KiE8R8yheOP6zoAqhLxLQ8Vfw3aEeZDyB6E+de4ypuoFCH7Tk6TeJ2sQ6q+k
fuPU2CnosPvpJpn7y8QcuBb/iHM7KuhwgM987yEhcQe3vS+zHC4i+JfsJ7GI
3xV0uP1fend0ibhDQmHs71MvEPxvXevEY78IOpQYH7MtPSvuIKBjKH3uP4K/
L0b1oBy3ENy+kozl+/zFhODmF1z7fChREcGfuX95eaiOEFz/4z1/G7TNEfwf
S9jrnjgi8b2fcjT6CDnEaX39ki0v4ZBV8mMbYziCry0rJpmeiOBDymchuPsN
d0mrPypFmAcAA0KwoQ==
"]]}}, {{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJxl1H0s1HEcB/Dj1OGcuMsVl4Qe6C5GeSp2P4qVJJVmiUbrxqIHOSl6ND2o
lIdbW6Q8NMpJwypcnneKxiZ1tR7Ww8n0fOXSncfafvN9/9F3++y71/e77+f7
3ffJfue+zRImg8GQ/AuDf2HIQDl6rf8B/z2P+uEzOhngMihOtSpkXCrnUWzm
7bTP+T+J6f4R4uXZ3/74t+qJDRcsHWXLx8U1v2yup8XzqIhI9+oDDlPEyfJV
4tpSBjVtOr8BNT0/f+tdRU2CIXGI1/H7ahcmNZ2fbmeS8ZsuuAmNThkRVyie
87vnzSC2W7vBh18J0+ufSXUdXuO7azGPSjs+2pZQCZ/OTViZbseisutMhM1v
uZSozmim50UW9aHQ0+NVPpfKVSenB/yBa6r3yVy2GxM/UvqlShuNKd0N1rEB
fy6lqeubOGplQqwX5R2pSITp/YN7bDSfZRamxDmZzPq30bBj8GVV5E3YbrLn
sbcGLlSx9eUebOJIYe7a3kNwwqP65v4GuK/+mfaFDh7hNJwc9zAjVg7P2hKZ
BNPnCzc9XPndSQ3f9O9QdlpziFWcs/H6UJhzwH1VfwYcWnUxUHIXXubnEt4y
CFt+nc3X8M2JV4ePe84Igm90lR1kS+HEgJwm8xL4nibH1aYHTlGE+XrrYPp+
ziK+I6i6/2Q9PMXYNBUjhdfdqq5cdBWW+zrEO3XAZrz21P2f4OHJxm0ZLAvi
sMSlj39bw9sKbpdYieANQZ3KAT/4sPNDvWQjfN5d8rowBuYkcr+cTYK/vF6S
6ZoBC+aqh3LzYPr9wSnOsvy8WrjcMfjlinZ4maXTz4I+2KdXUdz5DlbYyIoa
fsD2/nFZKZNwl2qhdszMklgcoY0KFcCDrg7L9zrDtvJxVZQXHMUqLRAEwtyh
1nb5ZtjXPeSMeQzsHOo4O3APnFxzJyssDV5z4tCE2xmY/n9gSVG5YXoxnDGw
M3ugCn4qGTFxaoBNy3Q7gpRwUNOn3VQf/EScZzTnDRyTFD3WPQSPnKueE62F
LURugt4puDlqUdt8NpdYGl/RvJEP71cNt8faw1daKlK3imD1g4kTQi/4v3r9
R+OTIfBuqe6eQQQstOVbx8XC9P8MuzUKlnxIgf8CTDiyyA==
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxV1H0sFHAYB/DzHufE4cQlodZxh1He2R3FKi/pbUY02m4sepGTovIyhUp5
W1ukKKOcNFl5Oe/tVIxN6mq9THUyej2R7ryc2q5+33q254/Pfttvvz3P83us
9x3awdegUCj836n2O9UpiFTTcsrFGmPeN885pb/jOPevqRq30z6WTHH/P5/l
Nn63uJYWb8xbX/Dlp1+3glh9tf0cVbjALWjSZXeO0nnhkS4NR2yWiJOF3ty7
1ym89+Vurq9K6H/uVyNm7L4nakxQJw52z2iWOmoQn7w60s54B28/78zWPK1J
XCt6zuhfqUVstTnEk1EHq96vTZyWMdeTUAefKUrwSrfSIeY0aWq7XYCLpMnp
/j/hxoZDpY57lhE/EvumCtpgWdPw4klTXWIFp/hEbSKsqh88aCH7WGqoR1yY
o9EyGg3bbr0kibwJWykHBzxkcLmEqqhxpRJHsos2Dx2DEx61dI60wsMtz2Ze
yOFZWmvWgqs+sXh6+c7IJFjVX7jjoddXlhS+6fdA3GdOI5bQ8uIVoTDtiIv3
SDYcWn8hgH8PdvB13NU1Dht9NmHIGAbEG3ctuGkFwtWPbxylCuBE/8IOgyr4
vqzQyWIQThGF+XjIYdV8Lie+w6xvfhIEL1G2L8UI4C23GurWXoGFPjbxrAew
vnFv6uFJeFrZFpGtY0gclmg/8MMcjii7XWXKgUMC+8RjvvBxu4cK/jb4nAv/
dXkMTEukf8pLgj+9XpfjlA0zV0gnioph1f+DU+xKS4rvwjW2W19u6IUdjFhT
ZcOw55Cosu8tLLIorWj9Blv7xeWnKOHHkjUz8/pGxNzwmahQJjzuZLP+oB1s
KVyQRLnDUTrXy5gBMH2iu1e4A/ZxCc41iIHtQm1NAg7AyY138sPS4E2Zxxad
c2HV/oH5FTXq6ZVw9ti+grF6+Cl/VpfVCuvdkO8NFMOBHZP7ecPwE26xptkb
OCYper5/Ap4922AWPQMbcpyZQ0twZ9TanlVUOrEgvrZzGwM+LJnujbWGL3fV
pu7mwNL2xUy2Oyyv1jk15vePgz4sywqG9wvk99XCYbYlwzwuFlbtZ9i5jbnu
fQr8Cw5cuxY=
"]]}, {
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.007333333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxNlH1MU1cYxstngdKPW9pboDoE5gRaIcAE0ZIemBCniOg0DVBMNWsktpsi
7dAypxLn14bja0sGsqG44ijWAEGBCkJNQSSQIFu3bBq2FQkqm3VUbCvQmdSe
dzc5f/zu87zPPe977z2R+w7ulPtQKBT56+X1enlT4CrjNlC+0oagZ2nO5cz4
GbGHaT7XNE9qn4vb/w3/XlPs0RcwJ1f+/TJjwIHZe1Wck6ZbFI8c3ST68J0Q
JClI0h+OcokrOwMF/VNsVKrbKO64TEEe3Z3vhTz15O4uQ7vCGx37bvIW+WcI
ykk9ftMS74N1933gHV8mCnw/98V5LYZfyHsr/HB9xOZtaWSrH9bd+/fH9Zrj
zkFFqz/y9Hu6WrGhPIKKWdjp659ygYr91ZbS8syXVJzfrj9YF18YgP13Tell
qt4ArFs7J5aOcQNRY7eosFbPQQ5hzactykCUl9AUpQrlvJkf8Fi49UkdKwhV
DEuKnDkcVHXKp3uqKAilzM08bKNyUfSWb8wFV4EjlsdG11uD0CoL9+vmfC5q
MNMc2nU0zAWC6s3jR4AVd7v7J3toaNQ5e/70D1w00f2z7Vc76Av0npOL64Kx
bppnflBQAux+v8G4n77hDf/EWICvZtwxDYXRMZvpZ4sducD0w0kbJyuAc9su
ZMm76Hhea9Pjd92eAZ2Y45BWkoHn8d6uxRS/bAb2Xxlp/oSmAl2ZWdXHuMTA
9TesVQnhY6CrDXmi9XYGnp/7+2Rivs5vu3l/KxP366LscMlUTDyf93/Ut66+
yETUweiLwjku0omiimPuAAeHGMsOPWa++c5INL/cm19BZWE9Txk3+iKMhfPz
669d4gpZOH9b9pBpOh34aOywQ74d+Isk+YMGGdTTleynZ0uAnz5YcyqhApgf
apmtroF69/8HrI6tq63pAL82estv7xqB1xIxz+sngNPGDU1Df0A/hvC6xp5n
kBeZsf+cehn8I+a3ba+CCcxiiU2ayyewfyYhKvnjWNBX6hbN0lRgKfVyPT+L
wPNkzw4YdTuhXpSUc4YhI/B+YnOjOVkfEahLqpFJlCQqbb9+Lk8D+qYTR5YS
z0Ce+/wBv7xR613eBFwxva9yug38P8kXAmN6CGR41LFiSkuioGb7nmwTgQYY
qX1GNg9l9z0+gCaA74trfHkPCfS7i28oVPGQrKTo1b1Z4IXzel6RjUCq5KF0
9RgPsYSJ/HEXcL909eBbNDZ+nqq4pX87ycb5h8zzxr2RwN/ebinbLWTjesut
pROCVGD7Fepn0xn/462PAk7msNGeuBc2RUQoOqCy3/CSAAtWkmH79wK7z2c2
3n9iL3/NX2rI+w8YPrCj
"]]}, {}}}, {}, {}, {{}, {}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}},
AxesOrigin -> {-0.16976192005308022`, 4.457920500990895},
PlotRange -> {{-0.09614834410085958, 4.61512051684126}, {
4.482885020979312, 6.030685260261263}}, PlotRangeClipping -> True,
ImagePadding -> All, DisplayFunction -> Identity, AspectRatio ->
NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {False, False},
AxesLabel -> {None, None},
AxesOrigin -> {-0.16976192005308022`, 4.457920500990895},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}},
GridLines -> {
None, {4.605170185988092, 5.298317366548036, 5.703782474656201,
5.991464547107982}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]],
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Log, Exp}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Log, Exp}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}},
PlotRange -> {{-0.09614834410085958, 4.61512051684126}, {
4.482885020979312, 6.030685260261263}}, PlotRangeClipping -> True,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],FormBox[
FormBox[
TemplateBox[{
"\"3-particle\\nannihilation\"", "\"Near-miss\\nstable collision\"",
"\"Unstable collision\\n(new particles)\""}, "PointLegend",
DisplayFunction -> (FormBox[
StyleBox[
StyleBox[
PaneBox[
TagBox[
GridBox[{{
TagBox[
GridBox[{{
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}, {
DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, {
GraphicsBox[{{
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
LineBox[{{0, 10}, {20, 10}}]}}, {
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]], {
InsetBox[
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}, {DefaultBaseStyle -> {"Graphics", {
AbsolutePointSize[6]},
Directive[
EdgeForm[
Directive[
Opacity[0.3],
GrayLevel[0]]],
PointSize[0.132],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]]}}],
NCache[
Scaled[{
Rational[1, 2],
Rational[1, 2]}],
Scaled[{0.5, 0.5}]], Automatic,
Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10},
PlotRangePadding -> None, ImagePadding -> Automatic,
BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}},
GridBoxAlignment -> {
"Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
AutoDelete -> False,
GridBoxDividers -> {
"Columns" -> {{False}}, "Rows" -> {{False}}},
GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}},
GridBoxSpacings -> {
"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}},
AutoDelete -> False,
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
"Grid"], Alignment -> Left, AppearanceElements -> None,
ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
"ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
FontFamily -> "Arial"}, Background -> Automatic, StripOnInput ->
False], TraditionalForm]& ),
InterpretationFunction :> (RowBox[{"PointLegend", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.34398, 0.49112, 0.89936],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.22932000000000002`, 0.32741333333333333`,
0.5995733333333334], FrameTicks -> None, PlotRangePadding ->
None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.34398, 0.49112, 0.89936]"], Appearance ->
None, BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.34398, 0.49112, 0.89936];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.34398, 0.49112, 0.89936], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.97, 0.606, 0.081],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[
0.6466666666666667, 0.404, 0.054000000000000006`],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.97, 0.606, 0.081]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.97, 0.606, 0.081];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.97, 0.606, 0.081], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}], ",",
RowBox[{"Directive", "[",
RowBox[{
RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}],
",",
InterpretationBox[
ButtonBox[
TooltipBox[
GraphicsBox[{{
GrayLevel[0],
RectangleBox[{0, 0}]}, {
GrayLevel[0],
RectangleBox[{1, -1}]}, {
RGBColor[0.91, 0.318, 0.243],
RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame ->
True, FrameStyle ->
RGBColor[0.6066666666666667, 0.21200000000000002`, 0.162],
FrameTicks -> None, PlotRangePadding -> None, ImageSize ->
Dynamic[{
Automatic, 1.35 CurrentValue["FontCapHeight"]/
AbsoluteCurrentValue[Magnification]}]],
"RGBColor[0.91, 0.318, 0.243]"], Appearance -> None,
BaseStyle -> {}, BaselinePosition -> Baseline,
DefaultBaseStyle -> {}, ButtonFunction :>
With[{Typeset`box$ = EvaluationBox[]},
If[
Not[
AbsoluteCurrentValue["Deployed"]],
SelectionMove[Typeset`box$, All, Expression];
FrontEnd`Private`$ColorSelectorInitialAlpha = 1;
FrontEnd`Private`$ColorSelectorInitialColor =
RGBColor[0.91, 0.318, 0.243];
FrontEnd`Private`$ColorSelectorUseMakeBoxes = True;
MathLink`CallFrontEnd[
FrontEnd`AttachCell[Typeset`box$,
FrontEndResource["RGBColorValueSelector"], {
0, {Left, Bottom}}, {Left, Top},
"ClosingActions" -> {
"SelectionDeparture", "ParentChanged",
"EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator ->
Automatic, Method -> "Preemptive"],
RGBColor[0.91, 0.318, 0.243], Editable -> False,
Selectable -> False], ",",
RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",",
RowBox[{"AbsoluteThickness", "[", "3", "]"}]}], "]"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{#, ",", #2, ",", #3}], "}"}], ",",
RowBox[{"LegendMarkers", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], ",", "Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], ",",
"Automatic"}], "}"}], ",",
RowBox[{"{",
RowBox[{
GraphicsBox[{{
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], ",", "Automatic"}], "}"}]}],
"}"}]}], ",",
RowBox[{"Joined", "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",",
RowBox[{"LabelStyle", "\[Rule]",
RowBox[{"{", "}"}]}], ",",
RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
Editable -> True], TraditionalForm], TraditionalForm]},
"Legended",
DisplayFunction->(GridBox[{{
TagBox[
ItemBox[
PaneBox[
TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
"SkipImageSizeLevel"],
ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
AutoDelete -> False, GridBoxItemSize -> Automatic,
BaselinePosition -> {1, 1}]& ),
Editable->True,
InterpretationFunction->(RowBox[{"Legended", "[",
RowBox[{#, ",",
RowBox[{"Placed", "[",
RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
CellChangeTimes->{3.706689071506304*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Module", "[",
RowBox[{
RowBox[{"{",
RowBox[{"randinit", "=",
RowBox[{"RandomInteger", "[",
RowBox[{"1", ",",
RowBox[{"{",
RowBox[{"100", ",", "100"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"Row", "[",
RowBox[{"Riffle", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Mean", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",", "randinit", ",",
"100"}], "]"}]}], ",",
RowBox[{"ImageSize", "\[Rule]", "Small"}]}], "]"}], ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"TrueQ", "[",
RowBox[{"#", ">", ".5"}], "]"}], ",", "1", ",", "0"}], "]"}],
"&"}], ",",
RowBox[{"(",
RowBox[{"N", "/@",
RowBox[{"(",
RowBox[{"Mean", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",", "randinit",
",", "50"}], "]"}]}], ")"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Small"}]}], "]"}], ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"TrueQ", "[",
RowBox[{"#", ">", ".3"}], "]"}], "&&",
RowBox[{"TrueQ", "[",
RowBox[{"#", "<", ".6"}], "]"}]}], ",", "1", ",", "0"}],
"]"}], "&"}], ",",
RowBox[{"(",
RowBox[{"N", "/@",
RowBox[{"(",
RowBox[{"Mean", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",", "randinit",
",", "50"}], "]"}]}], ")"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "Small"}]}], "]"}]}], "}"}], ",",
"\"\< \>\""}], "]"}], "]"}]}], "]"}]], "Input",
CellChangeTimes->{{3.7067187778239107`*^9, 3.706718783838716*^9}, {
3.706721648970552*^9, 3.706721659962586*^9}, {3.706721975548242*^9,
3.706721976897431*^9}, {3.706722731581935*^9, 3.706722771460154*^9}, {
3.706722808538102*^9, 3.7067229088169127`*^9}, {3.7067229400780897`*^9,
3.706722977150539*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[
RasterBox[CompressedData["
1:eJyV3X3k//tdx/FZMhIpiVmyGSkTWRKJr/ojSqK2P8qMrCYmYmKWjNQfJTEq
plQkUjKmjDmZzRrH5rRauz67OmcXZ2eXZcYs0e/3+/7un+N3+/4ee307HO/f
5/t5f97v18Xz8vG8eL3gFb/5i6989rOe9axfu///t/zJzz/2ex/9zNVbvvDr
f/RnT3zh6iOveOXXf/q7P3f1C7/y3r9/7eu/cPXk8+7+6+nL9ae+/I0Pv+KV
n7v6h9e+/pHXvflzV3fveuR1n736i+fcfcJnrn7kd174bT/345+5etX3ffqN
f/1Dn736rm/9/r/88+c8ffXqD77ne170jqcuv+/+3777mF96+uodP/Y3b/vb
l3zq8v7nvvU77/zy85fPdx76o9/x6qcu93dtHD/7d5/9yS9/4+mrF7zmf3/j
TS/+4tW9r5/75asf/OGn3/cTj37p8vnRl1+97B+//SuXz/em+cgzf+/+5t/z
Gk/X3/2Zuy/8/GVd/vuPf+DOL794WY+7T3n51Rcu69r3Prf39fntf/uSrz7/
NV+6ujPpN/zWq54Z17o2j37Xc3qP6+U+dJ/397nnNo8/fPZdgvni5XPj79r6
9J72rfujh+5rnbq2rr6n7xtP19a1q+t2b1gvf2a9em/Pd716f3Tsfb0neut3
0mnvab79PbqPbn/17s/e8OnLerX+8kn89O7/ujuAT1+e13N6f5/j657XvHpP
44t+Wiev8k9//+V7D/jSZR16b++TT7re5fKvPv+py/jct97T/f2993W/fOI+
d42/u69r+9q6NY+ub3rxXQL4/IX+Gk/z6r7GJR/1O+m1dWr/2ufWpff0nMbR
PvQ+3xt/JI/kyxNf9Ln16netU+9p/eMH+bPPzUt90ufoufvursYH3/PZSdc9
t3Xvvvjh+vvH707mE3/w7E9dnhu9d42v+7382nubX/Nf/OF69bl1ap96vvOU
P5IXvbfnxBd93z7LF447ujvpD/Vf9NJzW5fotP1ufxy/em+Nq/H33n7f+7pG
L/JN+9p4ek6fl55Rn2gPNC7li3zT75pX9/fc/q4+S0722Xk2rxfdM4w+dbEr
Wm/tMOVt80t/9Pue3z4qt3uvdl3vUx5IX/KF6yVdKdfaf+WadpO/Vy7HH61H
fz/ZYe2n9NDv+ty8td+kr9atz9ob7b/ytOf3u96f3sxu6Pmtm/JPe6t16D3a
2dKZ9k+/Sy+d5MuihyVHo4/Wp/FFn9Jz40yuO59+1+fGrfxqPXuuctnfxUfd
7372ufk0vt6z+GPRW/whPbce7qtyNb7u9/J9v49emq/2tfS47EPtj2Vna2/5
d9c/vtYf6e/dlz/Zuvc5/tFeVm9o9/XcpXcaR+veeLSzb+vX6Zf2uef0HvVo
72ve7W/jaf0bv+vguLW3lj/Zc6IL90v9px554b0XPHnhj0VfrYf2f9fozHFl
d0XfrldX7VG/77nNr3VrXto92g/uq/po+fHNXzs8+nM/HHf7kH5IbnnV/lAO
LX9Mfa3967qo97QPl7+y/Lxllyl/XFev0XvrmZ3kuoqX3RMrX3tGvijP1MPq
+carvd3v2hfpbfnD7Zf+Sffr9zRP56/93Pvjk+im37ce6hHllfLQcbufjV95
p552Pxu/43BflHPaFervfq/fJ59o3zpv+V3/3u+XXxd/N49lf6lPtC9ar+W/
6qf0XvFY9WV+evTivkgvzTO6a17tiziCeky6iF+kM+Wq/oN+aM9THyYfll/V
PLpPO0g767b+57ouP1hcST/A9Ra/F8/UDm/dolfXWXoUr190q1+28JHGHX/0
Wb5bfLLWV/uu9VPeLX2hfbrWWTusv3cVn9debl+0f3pv+im+EV9Wr8g/+onN
t/HF7+J73qe8al6NUz297L1FN8s+UC7Lb71XuaY/1O8bf/TReiXvtDt7rvJ4
0eHpPvGI1ku/vc/Oo985rsbr+orjqI+1A7Ubop/owbhI41Of5B9Ev/192bvq
F+WweKZ4WvNvvP2uvytXjf+IN/dZPWicTP+0v2unRGf6+er15VcqV5XH0Ydy
T31h3NX4mv7q0u+te/et8Z+u8r84nfyhnaA/r7xpfgvHEv/QXhOfMU4iHSy6
7Hvp7M5L7mzEk1f/8+G7D/z0hb6jN+O+J5xF/b/w+OSc194nbtK4Gm988dJ7
f3jiMp+e03iSE90v/q0cFI9rf1fcUHmqXybOrp2uHaecdTwrjq78lB9OOPtJ
Hy4/Xv9D+8X5+HnhNSd7TvlifD36zf+K7qKTvtcuM97c76Orfh9d9Xf1pONT
Xoi/pm+U213FWRpnv1M/9H34TXhD4+578fHmrX1m/MNxir/o1y5/V3vAz+qX
ZS+oJ9bzlNPSldclr/29+tQ4vvysvWrcb63niT/1/8UZzRe588c7nPrkhT+i
i/Dv7tN/1T/tfvVA73VdjX8Zt2k/e358lvzus3GVPvd9zzO/zHwa82rMV5Pv
xcfFm8RntJukH+2ARY9+b3w0OaPft+hMOlnx0kXn4oXqQf2wheOJq/jZdVx+
xtJja5zive179kLyM39C+tL/1j50P7TPo3vtcvNktLsWftW4zeeSzrs//u7v
4jXiyfGH9qQ4qHE69ceyI5aekM61R5Z/L/4jnt46KI/b7/SmekbcyjyYpV+W
n6F9pPzXrmx9+/3Jflv8oVxyHH3fvPMT2v/sce0q/fcVz9B+E+cRh/d3K04r
f/T+5Hf0Hn+nB8UJ4vOeZxxXvEx9Kb+Ie4qjRk/GJ6Jf5a98oX287GvpSr3V
OhgXab3EC+8M4o6E+MQN3FJ9s/hEO3/FfRbOveyu2+aZnPA/9Yfjar7RS3lY
4kba+coT5ZH8od9g/kHr3HvEb7uKB5vHpf8U35hvqd8hDmr80HiP8xa/MG9W
O0Q7ZeXF6Bcr9075E+aNmZf58PjV++7vx0dv4Pb97p/f+a47d37y6l/uvuat
T0y7Sn5x/rfFt/+/cfF1/+Ifx6ucah+Uj9oxq76g32tP6EcYv9f/ux7vJy77
If2JJxvPTQ6an6+949+Nh2sn9jzzRsQP5FvzgLWvlFvti3k18tHpuvxg40DG
PZunerp1bt7X8uoDl/Ve+enqh6VvjAMu//5kT530xilPSz2m3b/qQZKXxhnM
k1n5ACc7ITn0YJ7fh2/oB8eXXZi9nB+i3ljxpPhBv8X4Z/TRe1Y+h/jQiS+W
PbH88FNcxL8rv833FjdVLopTtg/mBS09uN6rvSW9nPzp633/15mneOKH9dzl
/zVu6zSsz8je0k+T/l0P9UvfR2/9Pn8hek2/R8fyafvV882rb39XXn72hv6X
+m75E8YRzOdQ/iwcR7kq3Zm/dKq7a7z6NSt+2Lq6ftalipeIK+n/aC/qV4mX
rXhQ12s5+nbwr7feyF8R111xmiU/tAPFKZp/9Kfdqpw0/q/8cv/d7/we8Ypl
/7Sv6gfriKWf9lect/vFr3qf9pl2pPksq/7DvMDep7+iHb/yW617Ml9Nebzs
nZ6jXWs+slfz5JffK935fuOBK47xvfcW9G2X+/ps/PsUF9Tv0K5R/miHWu8h
ncj/xims29CuEd9fduuqp48vrdNZuKpyyvwT/Wv1o/LW+mr1qDhqf8+vvZ7f
x2/gauZtLb/R53ct7t97jDO53qsO3OeHJ/Z864JWHVq/N86nXlHfSt/K+ev7
H7kx/iWfl92nnpC+jIebJ7Xy7rSntVvcZ+27k38l7tK8G0/2kPH4xrny+B2v
+Snmq1oXbx6Tcqv5y1+//9Gv/dM73/UMX+hfmfcnHy/+U18Wv/ji3a+f98Qx
T0k6cT7JjZ4Xf5j3v/yaFRdrPkuuOy7lrHbI0lNL7i78W7nQfucHRNfaK9qd
rYPyTLxWe1C9pp71OeYlNg/rNPp8233pedY1aE9at2peZeubfI0+xbPi4/wr
8zzNO+v95rOs+40riS/IX8avzRM3PiJu7vvMG5DezM/QHpNOVn7ACQ/y8231
x+rjYV2Q9ol0oTwyDnzCLfUTtdeSp61v4w2XWnSu3DKf0fi2/mjPb//TT+K9
0l3zyM4LhzMeI301HvWfV3GK1bdCPWe8auXBmq+1cDj9Me1Q41nq0eWnRifa
E9pXp3xCcfHb9kORX1ZfluiqeGly0HzmVf+6cJiVN2S+vv6Lcsx9NX5r3M/9
Mz8r+oz+0h/xSXzTOKw7Ug5oz4mz2a9q5SGY97jqmbW7tWv1x1aer+vY1Xxn
cV7XxbjK6iOxcM/FJysvQLmv/aS9coqnmP8i/TV/+cM+b+pd7aFV/6Me155c
8TvpQn+kdY6vyosxn14cpueaT2V+mfu++Fx9J9171W7y/dZnKYddL+WRfWv0
v1dfNetHra8Xv9RvEu9e8eNTvPDkl6y8lFOeyoozylfiCeJ52vPGA41ri28v
vWb+jPskH6y6Ce2I6EV/wvwW7Y5Vj7r0/8oval7mzRuHNt6pH2XfB+0z8UHj
Bif8X/5e+d3W+S8/TD2x6lsW3us4pOeV37vwhGVXLT208N++d37L3hZPMV5n
H4vlbzUe4y7W1Sq3zY9TPit35RvrevUntRdXPHhdW5/0kbiCfS6id+vqxU3M
M9a/Uh6f6GLhheKbjlu9suyxE30uuj/xw/KrrTc8xcn9nXJd/1g9GJ3Z50n9
Wjyvz9dxmk9e1nP1O/T94iPRl/XOxmX0W1deqXEd+Vu/p8+nuJJ6w/ia426d
8vtbP+1B7XvzguVn533q+6ucFg9Sj0oH2nn6afGP8nDxycrrWHGNruYRWa/p
fum3qB98r/yx9LtxZXFH+SKcX1xBueC+GG+xbtF8IHGshaNpJ/fZviP2XTjJ
v+ahnvO64o+OxzoZ/Xr5Qz5Z9bHKc+0r399zrKvWrrMerPXruuzS5Q9of616
oOhEHMW+DfLHqk9bebTiq9afr6vyujitdn5yctnp9jlvXOIlyuOe33xWvoy/
N09ffFv/auXLuu7iVqteb/XfVM9oJxrPWPwofioOv/o5WM+ufohfo0P7ZZkX
arxy5YEtO0h9Ib66+sGvPlzqheSC+lacZ+WVaN+YR7D2IbwrfbLiINojy79b
fbZW/Vv87viMdzS++miv/jvq42UHqA/1B5aeVF4VXzTuIV2rFxefiEesPoTi
NOLu6zwF7Sn7cFjvYz+whd9oB6y6otUPVHoXX3a/fY/98tuHvm+e7ZN2l/Ex
+9C6b8r1Fed0Pq2z42nc7vPKe2x88YX5dcX1Fq5wWz9y2TMLj2zc2Y/Nt/i6
dCY9L1xcflnfq+eUP+Ii+lHqcfE652V8SvtL+2r1xTSPWLpXTq74tn9feSXS
i3Epr8bvVt6FdlXzFNdd+9bzrcvQfzjlNYrfPpgX+KEbfL364ItLLn93+Skr
D9e6fu1X6UP/2fxH/fNFbytfQzxGeSd+KL4R3hD+0PfijZ4LoR+96gmM/6w8
UflFfMZxmKfT+5UvnufhuR/az9YzKxcWzm1/JXFCcXftLem292m36leaT7bq
at0f9cWynx+uRz5+uao/lx6yfkw7zziDv1924tJvq4+O+2b+m30r4wvtcuuH
7LPQe9xHcaSVT6P80N5d9Qo+p/GIC8q34kjW3SrPV79g90f+1k8wbqwfLV8o
v83v0L81b8B5WO+z8hXUEw/nj4/dsFOq6178oZ+z7MbVT9Q6klWftvqNrbqQ
3t88xPfT8+vcMPOEzPtZ/pB4n/pNPMH7F96uXWiezMobd1zq0ZO92/zkxxWH
E+c2DrXyrsQplZvWd8kn9tM1PixfGMfxKo74oN3y+MWe09/0Pac42Ip7izcp
T1b/c/dj+bHiO+FW2lPWsax6Lv0Z91d6673xn3iG/Ljidj1H/8h+G9r/2l2O
83rdHr8hD3zO0lurvlD5tPqgnvxw7eRrP/e9979/7EZfke5f+V231RcL99UP
kv+XHlz228rPsG7Q/F/rYcSx+6xeWvVk6Qnr/q3D1e4RD7Bvsji4/ZSiZ/va
NA7tg+Si59H2d/Oou095Le76cFzyceprPn5jf/rdOhdn9eFbOMWqt1TOKj+7
XtvF77//u3+beIXvWXWavf8a7/rPox/e99o7xp/0K+S7Pi99qd2z+t6Zt736
S2i3SG/mOxcP7u/aCeKy2kHa6/a1Nf8svrBP2yk/2niYcWfzZlzvFY9/9H6/
HflknWOy6gzUT/ot6g/rZ5YfsPLV9OvEV5Xnq3/bg/kwj13eE58sObP0X/XS
XW/b78x9US43r+goPDs7RDtJOWX9m/Ex7Rf9Q8//Wn1KV95wdNx4Pf/TPkPx
pX3atF/kC/lGf+Skv1cegHaA+y79SefX+v4DN/xt7VLzgBaOIv3IJ9K5/Lzy
rL+5fnnshj14fd+7j+sSPccX9eHQTlz1bitvZJ1HFX0sfayeXP1ijXf1OT4U
99VPWnbD8itb/+xD9b56R79i1b2oj8zjUY6ufMXmc5Jj/q51lq+u5/UR5NGH
Z152n63fVW/4nn7nPoo7uA7qM88lEn+4pu9/v18n854beJD0rLxff5d+jVuc
8nO185SDq05bed66eX704pPlX7re2t3mjdj/1O+NC2r/6ZcvPZF/XxxW/Mb9
1r+1z8Jt86Wl1wfX66P4h8/Yacve1h5XPz3cDvzKDb/bvCfjJyvfoPWSfqUD
43jSvfFR9bB6bdXf6TcvfnD9Tn6LOIl4zcp3Uo4YbzSfLr4wP9z4ovly+kXi
p+JD5ukpJz2Pw7xP8wiNaygXln9y0i/aS/KJ8XT31ef7PPdbO8Y+wSuvcel7
8XDpasX/Fz8ol/QbVn+axb8Lz7Iu07iCfUyUZ66Pdqt6RrnQuieXrcc0XrLi
2Np7+q/28bR+2P2UbsSrxfnlb+MoPu+E/5/yG1Z/u4XjaDfdtr5dnFf/Q/tK
+b3yR1d9heOTn42zabfZv1r9IH0v/2P1j9P+Mb7hvBeeeKojEJ/TfzAvoz4W
5o3HV8px7SzxePWs11X3YZ6V/Lr6e6z36C8YXxe/WHF/5V79oLK/xIGWHyLO
u3AS8V/tXuMR4vj6fcqNVee28i4Xjnyi9+VfKze1Q+RX7ZNVV6d8k5/8nfxs
nZV5fp4vlF4Jx1Kur34s7afyV/oRR/G8M/tShB/HL/G98kd5J59b/x099H7r
+hv3NV9+6Mb659drR5/i2fr5K79I3FL8xXjOqk9auLPj6D39bp1zqf5beany
ifTufeJ69lMQR1p8u/wo8wdW/wzxp+KLXT3vcZ2vseqBtNsXztnvPAcwvog/
8+ONQ9q3wnGsPmb291cPGod5ML73+IUvTjiN/op8tPBM9Yf8oT+vne0+aB8t
f0p6bH3051e9R/Rofrl2h/yy4h2rH6h+2bJ3VxzK+eg3W1dQ3ZDn+pWvkj3W
NT4y7meewil+tPJezSNb51Ean5c/XH/1SOsuXhG/al+tvPHFH/qn3rf2yX5/
+o2tR+PWjzFvYuGua/zR84pXLn4uPqtfu/rVrXzQVQdlffHKe3GfVj6D8UXl
TXSQHxJf6J9El9k5zT97bNGddoV2lfFO45HWc65z4FeeyOqbp93dupTPqn3r
+q56C+ep/at8cz/FzVsP8xmW3aVdqpyQLldfpuX3Lr+7fmTFq+OTxi1+YNxV
f3Tlg5rnpx/qPJcdu/J+9D+yo6zT0y95Gecddb/yXfxKujAPt+dnR6Wv/Ht2
VX+Xj6z/aj2tPxCX1P/RP115FavfwMKxlvwyLia+bdxIe3KdV2henfkYyn3x
Iu9zfN5fnkj5v8atlcue32vejDiedKM8Tl6ITzXOUzyy+aqvXVfzEJMLnkNp
HwjHqx8lHm883T4UXePL+CN51LpmZ9nHedWlaFck7/td69R7tA+7Lrtl5Ssu
u11+jR6al/Fc7dDkiefnuK/WVa381xXvWHVx0sPq46J90L567u7qI238zz5F
1o+ZX9I6mPemHlxyp+dI983f/pbWseo3Rl/2BzSuu+xOnx9/pr/sK6RebJ7G
AaRz/YDmqT5Y+UXaAStfWLrTfrdvW/M3v0Ccu3VvPTz/2rxsx6deWeOTL62b
XH0CrHP1vJbmY3/S1e/COI31auaZ6jdbP6od2efVV8m8Y/NL1JPqw/gjv6Vz
RpNrq0+2cWb3ZfkZyhmfv+Lci08WDqIdazx6+d0rr0L+a1/W+WnmobTuyUX7
lUZv1lsZH9LOWuup3abd5PlE6jvPTWie8o15h6vefOEXfW59lZfyg3opuaD+
aF2lO/udmG9qnE2903klnoux6pCal33JrBtY59+Yl7DyTMRf/X7Fm5Wvyz9Z
8Y+Fq1rnbl914zLmOZj3Kb5l/qN4v/14patVv6i9vOIHK4/Vc9lXPHrV46x+
BbeNU694o/NZ/qDrYJxBvF1+drz2yXW80Y32rv071jkr4iwnvSHdqi/Mp9Dv
OPHBba/mQ3lulHiIdTbqEfukrb4w8oPnuJ/ipsrHvlcf2OfKz41j1aMpn60D
sa5jxaXVn8svFh8wHqXeMX9x4eOrvku96XwX/im9m7eqHdy6aQ+d8hSdh/h7
z1v5kOK6t7Xn5A/zRpQ3+oPJ9dXXUDniOdHij+KT4seuh/brikeufhTW1Xa/
8l5cT/xQebbyTdq/VTe//DDluf5y8cP8ZPVK4zefRf9dO3Ll7egfrnirdcIL
d72t/DaOpZ5efeqll1MesfaadKEc8Bwn9UTX5LBx08Ztf5vuyx/IHm6/7YOj
Pbv4RD9r4QLS79Lf8pl5M8rDhXf5HnEb9yP5oNxqPvb3LT6ovtHuMI9G/37V
T63+FeKfD4/b3jzvRH276NT91h8w7rTygJWvy/9XHkln5hva18C4kDheekFc
x3wV+771nOpCPWdc+XXKIxKvkP6k6yVvVtzf69If7o/8q3xqPa7H+7HL5+ig
9TPPT3tMv3/pK/Et8Wrj6OYXneJavU+9tOKoy092PeW7U58G7Vz3eelJ18k8
SvEhzyEQD+p7z1e3Dtr1XvGwFT88+XlLHyx55ferL9tJX5vn5nNOeSnNM/mw
cKDW231ddfKOr+cYNxFvOJ2btPpR6X+u+xfutOScfuLKG9IPXHFf5deqKxNX
Vb57zpN9luyHdjo31ve6buLK+t1LHxgP0g9uPOqDlbe29M36rF23+ET9s/rN
LT/HfT3192he+uvGIbWX7RemX6Y81i9Z5w/q5y27QPmjXbfyQpa/tvphuY/O
V9xy9YXU7rGuRz974UYrHiUeI05gf8elD9c+aYco71fdoHy28tjV/+uz7xHn
E0/0fdLFisusfjXazfKHOLtyVX6VntUznlstX4iDqbfVL+IO2mcLR1h+pPan
8UZxbfuFRf+rT6ZxLPHf7DD9q9WvILowPqFeXfWHro/xzeho6R/rSYx/r3V1
/9x/8coTDqD80o7UThJHtH7Xc1WiX/EW8WLtp8a55Evr9vX7/dWu9/HRG+vr
PMXFtZ/s/+D34v/igPqHvX/hMvqv7YN1NsWfywcsz6F1tw/ZOk9aP2vZfwtn
VI+7LtYZaK+l3/RnVp3Y6sex6F4/RXo65WGa39J9Ky6g/+u+Se8rHqS9ZTxk
1YGLW/f3a3n4vhv5d9c45X9M+1V7VLxg5YlpV0snxk0Xnr3qcVf+ivEe+5BF
//FH/sg6j2/JnVV/rvzSjlJP2y9NetAeXnmQK+9Vu+zkp698q2W3WWew6hx6
T89LfnVemXn46hfj3yvPQbo72YvqkZfd7xMYXyy/UPnkeum3rviH8kr7RD7Q
ntGu8znum3iv9VziT9lR4oUrriP9GD8yv1255vr0Xuk9ORp+nB6x/nv1vfGc
7hOu3OdV9+8+rXPh1Ev6Le1n+Ih51Ks/u/SmXD71V1t9YVY+iP6c9QbmuZjH
Zd21eTjaAeK20vXqk+J4tXu1+z1PrnmYv2F94eKPhVfJJ13FCVY+RPogvWad
l/U2vdf8IesTVl764g/pSHtM+1//W7/ztnHQnm/eiPUl6qfV923FI0643+IX
cSXze9Sf4suti7jN6osinqXfs/AV+af77AuoHeV8zAu3z7f4sPm28of4o/0w
V3zX/uzpheSo9oPjtO5HvEa+0L+QDpbdqLwWh/X99vnrvdLpym/UTlIuG88w
bqIel/8dh/yxcIuVR2r+Rf5tOFB/tz/Lyu/Vj/GqPnZfV31e+yROGN8YB9d/
8pxy/U3pWn/a/imrz8LKx25c2VHx9+qHZz/N+HnFAb0uu6fr6gO65Iv5Ofof
0sHq09R+9n7xKeutVj6+ePKiR+N4ygfrytTT9i1qP6rXa9zR56k+1nNXxX2X
/60eMR/TuKF1D/rZ5l1r97bfK2/b54k7am/ot8tXXcU5zVc3zyG+WvS4/Ivl
l6ov5U/jbtaz9vcVV1x5SOoH8z/1082r85yPnrv0xlof7Szjz+vckvS+eRr6
UeLNjre+WNfr+JEb+Xb64fqL4rniNK63clA7SDu++1Z9kfQsPrnGozxaed/W
f8l/y889+RXP4r/ld0gH5rNaPyCuJo6x8kmbl/IpvfjSe8DiEzf4JJzec6fb
T+22U77riluLv+vnGa8PZ8i+qh7afKeFiz4Yt3oc/fGJG/u9/CrtM3E27R/X
Tf2++kKuuJ90LX/YZ3zlVeqP6a/qF7fO8Z/285KPzTe+uKarP512VeNa/So9
n0fcbOUDKE+sJ0wOZ5/YVyT7xbrxdU7QSU9o1yy8SPtFXMf+kJ5rmp3V3+2j
vvKVrn//gRv5kgv3iE/1m9xHcRv1z8orWHlIK9/LOjf9Dc8RMD51yr9aeTVL
/qlv13XZ30ufNM+VF63f4bnC5g24TsY/Padn9Y8zvm58Z9mVyw9adOq+RFf2
i09u6HcU17HPaXytnjbeab2A43mwHu+Dl/U65c0vulhX/X/Xx3i/9rR9xa13
Ni5u/H/lbSwcf9lVJ/pfcmHFCaJf+0fJH9HJ8pOME636I/3+nmvfxQf7ht2M
t5zsTffP/ZauVp8H/cX0aPVA2YGNN/swOdHfxSntfyberr3e+rie5rGccImV
JyvOKL+d+sDp56x+PSsvSH218LtVd2Mc1/yuk55QzybH4ovWv32PL9p/7XPz
g5Qj8YdxZePmngdlvLD1P81vfS/dn/KElp1ovUn8kj6p/4p1rOIdq66x96dn
9ZftH9PvkmfdJz94Drp2vjiSdvOqzzQvVP/U/TbOpdxbfmz76ThWHND8CvXd
kq9LPrZ/4kbiVvrt2rvilPrx1gMbp/XvfRbHXXbDmrd8svBG6arvl9y2jtX+
3OIaS861Xq1vuFbvlQ5bn5c90J/y/Rc+cfz2RRSfkl7Fz9UjxsvM87CPt/E8
+cL3mJcgnWmHnOJqK39h2VvmRdovz3iE52N2v/H+VedmHFO+lk7t6yN+vOKB
i1/8+6p76nmNJ/pr/fvs+VzGaYw3rHrd5iUO2/NWnYh0k/7SnpePyzd7w/3z
BbUHjO+pX1depfiAeU/GwVf/SOk/u0V7xPyFJVetG3WfFz119fy/7CnjEEve
i7ct+bP6Ci5/THxqxck6L1W5vvTHitP0vXQY7qrdEC4tLtO6SFfyieMy/rXm
He4nXy+8yXysztktf9l+JZ67ZzxW+1x5u+Ln9o8zDrrquY1Dms9mfK37o1vl
1PKr5Av9MZ9jHZL1kitOdOo7ueykFR/Wr+lzfPGgHPqrG3VFJ7vL5+tvtB/x
Q/aL+978rcv2e+WwOMvqV9R7O182u2vV7/t3/Srj0uYNmO+w8pQWHemviWus
+lVxTf0Y89Tlb/1X+9ItebzyPtXv5u+Y16N8XXbf6iMrHyw5KT0/PA72VuyI
R2beoXrDuIh9AVvP1V9IfMF4nHymPJEuxKkcZ/PIjpKvTv17Vx8m87fki0Uv
xsvWebrrPFDld1fzxbSLXH9xQO3/xiVdKkdW36Xet/pNiT+u9yz8UDl2yhs7
1TGqj+IT9dEax4pP9734knlN6gHzd83D0A5edcnmU5jfq75ZfuXCWcWjpNMT
/mFdjfQhfboenb9Y35uFl6w8PfMlzQPXz/J7cdbVn0bcXzmo/jOepZ481SWs
fCf3Vf2x6u/011c8p/lf461vuv/cN874sb9b9SfmaSlPxO20C1admXxkPaR0
vPIqWj/lnXSnPyT9yIfLLzD+qbx9ML/rQxf+WP6GuJTra9ys54mDGx9Rn3a/
81U/Wq+gvqgvnv0s7Hu/+naoP6Xn5Tc/XE/cfI52+8PxyDde/n497rfc4FPl
hvjeOu/ReLx9PJY9Y35rclE7y7jRyu9VHotLSrfiBuYruz/y/cmv8fxu6xPk
D3EO9fLD4yaPX+i1eKzyZMW/Vj9H9bzvbfwPxoM/cINP1KM+17wZ19F91l9Y
9sXipxU3bV2u6eTNs35M/aSda5zA/GPrKfy9fpv1b/kV9ocSz139t1b/FPMT
ol/zDY0jLP9t2YfaMc7f742LrT532kvmfxePXfla4msrT0K6tH/b6udlf8Tm
bX848xaVa6tvzcLXtMdPfsviF+X2yh/VX3FfzAP33KPyrsLHzU80PiKe6jlz
+vfmEa++i/Kd9a0rb8HnKueWnSiea/6I69g6qT/V3+oT8zUax/I73e/m5XlQ
2vHdZ52C83fc4svrXCH3bfkb2svqEb8/5ZmuPNyTnlj1e+27fpnyOP6wn9Q6
/yFc1jo942jWTxpn6vcLh1m42zofz7oe8wwXbr/qQrXDPe/ROIb4WvS28itW
/rb6LrpWH1hPKU6m3Ff+OO7Fz8uPFh8Sj9QeOsUplA/y1akfz8LbPZdQfE77
yrwJ66Y8n9g60Ov3fuxyPqPn+PZ749een3bSN+vcGs/v6P3aXw/6azfPp1/5
0AvXtj+PeJP85vP07/zdCfcUP4keVj396uOoX6w9rX479Ztf+YLaS4svVjxq
+aXdX/5S19WXzfxkcR3zHqwXi948B8w+zdrLi7/6nX0W2of8FPNwxKva78aV
3rJPjnVe0p3yeOXvGhcVzzJ/SP+odRc3WPHvFT9f/mdXcehT/vGiB/uztP7f
PA6x+/suPjjxxbKrlr/x4Lo9fsE5lC/OY/WP0o9RPtpnzfP8zN9Zfop8oX9q
PYl+ovnE/d1zOBr/sveUM8o16aPnPbxO5akbdG2epPN3XtotPk88Ub9InH7l
acuf8vWqB3R/fa64jPyo3yW9L79k5X+s+rNVB79wDe321ZdtyRf1quc02RdS
u2fVlSgP9WM879f+CvGdeRf6HfatXnmD2qerr5B+qnaG+kK8zL4cxr2bl/F6
8UHjINo57bNySroXrzvFEaNX7U7tuhVPEk9bemD59f6++S89tvjtVKdm/pzr
pn0g3a5zSFZczn3V3nWfxUe1bx3Hiid7joF0rl4u/l1fCeWy9fbG16LD3qt/
Zr+L7MLm7+/sR29+feNYfa3LZ8teFa9bdot6dMXhzMtYcUjxx9V/Sj9LOtAO
1f4WP1ZumDfSfdoJ5lV7XrX1N+prvzc+Zt8u5bP+pXl25ocs+l94fe/XvtP/
1T7IXq3OxLpn8x3t/5J/07pGn9ZPiOOd8kh8n/Zl9J+/teIv4lcr33z5C/KH
ccGFU6kftJPSp+6P9mdywXof6wzsixYdeG7YqhOsblI7wPrJhQcaR9QO6rri
yO6LekD/s3FIT/pJ5k1q/2vnn/h92Yn+vflnd371fh/s9iP+Weef2yc1OhCf
7Tl9DgeR/+OXZQcuO2vRt/bNwr+XXb/q5MTFxS/7bF/l5iO+0/3al+UdmA+6
+oKGP7UP7U/yTzkmnXZVfsan+t/mPa34rn7nijvIB9YjqH+XX6T8E2/pfcZv
jBPZ/6X9WH0n9ZPa1+6zn7BxFe096xKWvDjlA4mXLj9ae129I87j+rrf+on2
7ZPOjGdZ72vcuHWL7vssbqH8CheuX4hyeZ033X3hQun16EF5Ld6u36b+12/1
/dK95w6ucySUx/oF4hfJPe1S822MF7Wv+g3yU5+7r/23v7n5OcqddS6fuJ/5
DOa7rbykk721/A/10/IztD+MR6/zWtoH8++63/Nf1nkS6zx0+9JZj6Z/bdw7
/kjPr/ws41XLr+uq/NdOjB49J81+MF2Vxz3XeKH2l+PRTxQnMw5unxr7HeiX
NB79Jvmq79f57dor2sH6meJ2K84t/5ziB/5u9aWInuz3od1kP6zu89ww5YZx
PPOPkjvp355nXH2dy2r81fevPgX6E8teVS+7f+6//beaV+vTfMWB1R/GS1Ye
wcL7PG9B/m197EfZ58Zlv7SV5yNeu/qqigNYj2i8Q39s1TFrJ7keCzeVn+Ib
7WHlr3JA+S++L16jPdH3rad9Dz333r8bz9B/XPaJ+KL9jrTrT+tq/kWflQfq
Me0J/WbxWfOO5H/9SvEK46ryU/tjH3zP7+lzV+u+9WNXntPKn1p5JPbjth+X
vzdO5nvUv+qjrtYZmCfZ/iU3mrfnD+vPte6up3h469vz9MOXP2gcbeUVGr+T
zvR7zYNQvpzwQ+0t+xOIR7ie2q+nc4kW7rn6HRhHU+95Hqh2mXavelj/xziG
/rX6WL5efqV/13/QDnPd1E8rf1Z6kT/0o6LT/wMHvWqT
"], {{0, 0}, {100, 100}}, {
0, 0.9801980198019802}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> Small,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[
RasterBox[CompressedData["
1:eJztWEkOwjAMdPkJX+IJFXf+f0OCAipNHDveESOhUime8VKnqc/r7bKeAOC6
/ZZUUHSHRRWRBvi6mgnUQC1vN0BFt11dxsQcHIktj2x7JRmDR4yPOJjBTHnF
03h1nywBqLVOgw9YVApI83S8Bi2BjoSwL2LZNw17iWLIdpQkguY1NbZmEgR7
SJOureH1GmhJq5Dr0BRywKFjTB4LWPasojg6tppe6x7SJ7neZpRszWsAWcME
waf9slDIjZziVwo01e+A3g7Xz9oUhssxeybNU6x/OCJN/tM4oozicR3dx1u2
d8zF03Dc8qM+oaLh4VTKwCPAnaP2ZgD4WZs3SO2MFAZWHAkR2ErkeQ2XmA3r
hofGnVthZAMh6PynaBClJJ/+9DDsNdxK6jM7LzegN5pxulQ1w4s36lsRW767
zGoarGSoi0nHDJ8V0qGkIYw19kPVhM/y00Yomf0rwGcfuwOJMCi9
"], {{0, 0}, {100,
100}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> Small,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
"\" \"",GraphicsBox[
RasterBox[CompressedData["
1:eJy1WUly3DAMbOUn+VKe4Mo9/7+lyhKIrbHM2JY3DRc0CAINkP798e/Pxy8A
f5+f6/PB8/X5Wjy5456OdowZfOPgeQ2D7zYkAY+K2o70YkTc31w3kY+Mg7N6
j0pW4VDoKGkDIrxZBG4McEXvrlKJI+tzDKIdj3ZnUYUx7h7op9CviySqgNiR
a4o01L2fQQSDjGcydNPNVGdt2fcKgektk45+Zwps8/kLDtHtI6KiyVZ3ywEB
LmaodiFRGZxF2PC/JD4fjKU8Ai4GAvKuCuDjVLhWLlSDMgJSr391HQmC0M51
Ije8bmWODSpZ+vmWf8OjvnU+fjcAJ44fwfgZG4noYKIvghEraDB6q3GDTfhc
T4PhtRkpttWA5s6HSgQPNFYmb+DdJrF5rrySywnbLbAKaPgVFakKjbozihH5
EL5SjI581/ckM6kouEpMByK5xhojlRcwYeOUeffhELy42cFkgTS15grmG56E
ncKw2Ioi45C1bIJ6s9+Nc/cYJnAKLRstnLfWGCeBhZaIRs0RyWP3uNBxNNiU
HLl06wDBF3Tpcvksz7Etgi8zQ8ZgkWtA2pK2wLjkSHTYu9SQ5wrXayA8QJJq
4bimbX+oUnl5PDpPF7TISasxf7MxzSQ5A8VF7x5DAO2htN20GUNduwPR7sJ5
OowXgvyk4jef5cSSgHcZjBIrIzrmt8npknRrgLy7mbOzwYLPdRxsR5c7hXzr
4RmpSJpUkpHglAxkLe7flmCsSCD1qcqEixgpkHsXRV6fExtCUNZi9UG87YoA
5o/V1RjA6XkuxGwJO/Nh0XZEEzJx1P5+XNrTO7dEyy+1YAMB5bPB4yeU6lrJ
yGbnql4okSTW5zH+sjzedpx+UXTOAot5JnH3s2J/W9joILH7LpsQX9oxu0m3
9ng4Iy2vi7RalXPzwu3PGXuZSWVkZvV6vgjfJms5zfrGFmK1eYkDE4a5auQY
NDZbRLqO7mAxennUyH++7fQ2mTIMz9+Q0mPaESKpuGw5ghDcahbP64D2PBMJ
eE5t9Lw6qrZ3+HA6fGn+fq/Ldbx72JFe8HcLEc6NA15GkA0dGMBqwsfMEL12
EYMO7q8MOvFSMxlB0ZmhPqxTzIzCl6yAgpZCMab2iDcdy3zXfTzauv7XQIrS
hmNoPeSt2wKMKng9lL6Q+r761JZ5kYnrvGP+gRgt8303pvaYkXo2ZGQmNO3i
zznnrxIknDXogCsThg3eVTmCwQeV92wwGpAJQxRNfAGjaDwXm5fdZtjjkQq1
x8eDa/VKb8M6QrUZGhBQfYW+xPBzHplRj8d47wUDKzrTsUW2DO3RfiH8tGdU
uz/zYqb0TavWYjMq+WVaGoD9iCaaqnw6Khk5qypixTN4WV4prW2SozwbB0k2
msv1lvfTi6gIc0v3KL3t/PJNdPJZ6MzmScWFU/0HOnQkEw==
"], {{0, 0}, {100,
100}}, {0, 1}], Frame -> Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle -> Directive[
GrayLevel[0.5, 0.4]], ImageSize -> Small,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
"RowDefault"]], "Output",
CellChangeTimes->{{3.706718775585071*^9, 3.706718784084997*^9},
3.706721799837276*^9, 3.706721977347848*^9, 3.706722732191787*^9, {
3.706722769726631*^9, 3.7067227719029217`*^9}, 3.706722811752043*^9, {
3.7067228655074797`*^9, 3.706723015304454*^9}}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"dists", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{"7", "-",
RowBox[{"Length", "[",
RowBox[{"Union", "[",
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "/@",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], ",",
RowBox[{"Reverse", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}], ",",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "/@",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}]}],
"}"}], "]"}], "]"}]}], ")"}],
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], "&"}], "/@",
RowBox[{"Reverse", "[",
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{"Tally", "[",
RowBox[{"First", "/@",
RowBox[{"Sort", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]", "40"}]}], "]"}], "&"}],
",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"#", ",",
RowBox[{"Reverse", "@", "#"}], ",",
RowBox[{"Reverse", "/@", "#"}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@", "#"}], "]"}], ",",
RowBox[{"Transpose", "[", "#", "]"}]}], "}"}], "&"}], "/@",
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{"TrueQ", "[",
RowBox[{"#", ">", ".5"}], "]"}], ",", "1", ",", "0"}],
"]"}], "&"}], ",",
RowBox[{"(",
RowBox[{"N", "/@",
RowBox[{"(",
RowBox[{"Mean", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"RandomInteger", "[",
RowBox[{"1", ",",
RowBox[{"{",
RowBox[{"100", ",", "100"}], "}"}]}], "]"}], ",", "50"}],
"]"}]}], ")"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "i"}], "}"}]}], "]"}], ")"}], ",",
"1"}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}]}], "]"}], ",", "Last"}],
"]"}], "]"}]}], ")"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "2", ",", "8", ",", "1"}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.706721134821178*^9, 3.7067211627778473`*^9}, {
3.706721208281399*^9, 3.706721257024404*^9}, {3.706721296471108*^9,
3.706721310215396*^9}, {3.706721342844431*^9, 3.7067214929980097`*^9}, {
3.7067215400178347`*^9, 3.706721544455974*^9}, {3.706721581102687*^9,
3.706721615013736*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"distperiodic", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Last", "/@",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{
RowBox[{"(",
RowBox[{"7", "-",
RowBox[{"Length", "[",
RowBox[{"Union", "[",
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "/@",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], ",",
RowBox[{"Reverse", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}], ",",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Reverse", "/@",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@",
RowBox[{"Transpose", "[",
RowBox[{"#", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}], "]"}]}],
"}"}], "]"}], "]"}]}], ")"}],
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], "}"}], "&"}], "/@",
RowBox[{"Reverse", "[",
RowBox[{"SortBy", "[",
RowBox[{
RowBox[{"Tally", "[",
RowBox[{"First", "/@",
RowBox[{"Sort", "/@",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]", "40"}]}], "]"}], "&"}],
",",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"#", ",",
RowBox[{"Reverse", "@", "#"}], ",",
RowBox[{"Reverse", "/@", "#"}], ",",
RowBox[{"Reverse", "[",
RowBox[{"Reverse", "/@", "#"}], "]"}], ",",
RowBox[{"Transpose", "[", "#", "]"}]}], "}"}], "&"}], "/@",
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"(",
RowBox[{"Partition", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"If", "[",
RowBox[{
RowBox[{
RowBox[{"TrueQ", "[",
RowBox[{"#", ">", ".3"}], "]"}], "&&",
RowBox[{"TrueQ", "[",
RowBox[{"#", "<", ".5"}], "]"}]}], ",", "1", ",", "0"}],
"]"}], "&"}], ",",
RowBox[{"(",
RowBox[{"N", "/@",
RowBox[{"(",
RowBox[{"Mean", "@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"RandomInteger", "[",
RowBox[{"1", ",",
RowBox[{"{",
RowBox[{"100", ",", "100"}], "}"}]}], "]"}], ",", "50"}],
"]"}]}], ")"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"i", ",", "i"}], "}"}]}], "]"}], ")"}], ",",
"1"}], "]"}]}], ")"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}]}], "]"}], ",", "Last"}],
"]"}], "]"}]}], ")"}]}], ",",
RowBox[{"{",
RowBox[{"i", ",", "2", ",", "8", ",", "1"}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.706722006788001*^9, 3.706722044568516*^9}, {
3.706771573168727*^9, 3.706771574046452*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"60", ",", "60"}], "}"}]}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"(",
RowBox[{"(",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"7", " ", "2"}], ",",
RowBox[{"7", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"7", " ", "2"}], ",",
RowBox[{"7", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "20"}],
"]"}], ")"}], ")"}], ")"}]}], ",", "10"}], "]"}], ",",
RowBox[{"Spacings", "\[Rule]",
RowBox[{"{",
RowBox[{".5", ",", ".8"}], "}"}]}], ",",
RowBox[{"Dividers", "->",
RowBox[{"{",
RowBox[{"False", ",", " ", "All"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.706691406926118*^9, 3.7066914107350597`*^9}, {
3.706797455130535*^9, 3.706797464232789*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {0, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
0}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1,
1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1,
1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0,
1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1,
1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1,
1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 1, 1,
1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0,
1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1,
1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0,
1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1,
1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 0,
0, 1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1,
1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0,
0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1,
1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 1,
0, 1, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1,
1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1,
0, 0, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1, 1,
1, 0, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1,
1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 0,
1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0,
1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1,
1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0,
0, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1,
1, 0, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1,
1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 0, 1, 1, 0, 1,
1, 0, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1,
0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1,
1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 0, 0, 0, 0, 1,
0, 0, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1,
0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 1}, {1, 1, 1, 1,
0, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1,
1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0,
0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1,
1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0,
0, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0,
0}, {14, 14}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
AutoDelete->False,
GridBoxDividers->{"Columns" -> {{False}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}],
"Grid"]], "Output",
CellChangeTimes->{
3.706691411827922*^9, {3.706797455831499*^9, 3.70679746468666*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"60", ",", "60"}], "}"}]}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"(",
RowBox[{"(",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"8", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "40"}],
"]"}], ")"}], ")"}], ")"}]}], ",", "10"}], "]"}], ",",
RowBox[{"Spacings", "\[Rule]",
RowBox[{"{",
RowBox[{".5", ",", ".8"}], "}"}]}], ",",
RowBox[{"Dividers", "->",
RowBox[{"{",
RowBox[{"False", ",", " ", "All"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.70668833154985*^9, 3.706688429980282*^9}, {
3.706688472144073*^9, 3.70668849461418*^9}, {3.7066885321319513`*^9,
3.7066885322418213`*^9}, {3.706691117548674*^9, 3.706691330257984*^9}, {
3.7066913841632547`*^9, 3.706691385838026*^9}, {3.706797450634574*^9,
3.706797469169664*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
GraphicsBox[
RasterBox[{{1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0, 0}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {0, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 0}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1}, {1, 1, 0, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 0, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 0, 1, 1}, {1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0, 1, 0, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 0, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 0, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1,
1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1,
1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0,
1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1,
1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0,
1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 0,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1,
1, 1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1,
1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1,
1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 0,
1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0,
1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0,
0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0,
1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1,
1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0,
1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0,
0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1,
0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1,
1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1,
1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1,
1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 0, 0, 1, 1, 1,
0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1}, {1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1,
1, 1, 0, 0, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1,
1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1,
1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1,
1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1,
1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1,
1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1,
0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1,
1, 1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1,
0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 1, 0, 1,
1, 1, 1, 0, 1, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1,
0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1,
1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1,
0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0,
1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1,
1, 1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1,
0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 0, 1, 1, 1, 0,
1, 1, 0, 1, 1, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0,
1, 0, 1, 0, 1, 1, 1}, {1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
1, 1}, {1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1}, {1, 1,
1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1,
0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1}, {1, 1, 1, 0, 1, 0, 1, 0,
1, 1, 0, 1, 0, 1, 0, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0,
0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0,
1, 1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 0, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 0, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[
RasterBox[{{1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1,
1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1}, {1, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0,
0, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 0, 0,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1}, {1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1,
1}, {1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1}}, {{0, 0}, {
18, 16}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
AutoDelete->False,
GridBoxDividers->{"Columns" -> {{False}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.7066912009339323`*^9, 3.706691238624793*^9}, {
3.7066912755908937`*^9, 3.7066912988305187`*^9}, 3.706691331281858*^9, {
3.706797452020548*^9, 3.706797469802154*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Grid", "[",
RowBox[{
RowBox[{"Partition", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ArrayPlot", "[",
RowBox[{"#", ",",
RowBox[{"ImageSize", "\[Rule]",
RowBox[{"{",
RowBox[{"60", ",", "60"}], "}"}]}]}], "]"}], "&"}], "/@",
RowBox[{"(",
RowBox[{"(",
RowBox[{"(",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",",
RowBox[{"{",
RowBox[{
RowBox[{"9", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",",
RowBox[{"{",
RowBox[{
RowBox[{"9", " ", "2"}], ",",
RowBox[{"9", " ", "2"}]}], "}"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}]}], "]"}], ",", "0"}], "}"}], ",", "30"}],
"]"}], ")"}], ")"}], ")"}]}], ",", "10"}], "]"}], ",",
RowBox[{"Spacings", "\[Rule]",
RowBox[{"{",
RowBox[{".5", ",", ".8"}], "}"}]}], ",",
RowBox[{"Dividers", "->",
RowBox[{"{",
RowBox[{"False", ",", " ", "All"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.706691343603202*^9, 3.706691347793977*^9}, {
3.706797421522018*^9, 3.706797441314095*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGBkYUwADFyAIgZcgiDGh6hg/A5lP00MAMMQAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGDMDAyIDORVUG4jGg6xmSANMXGD7FEhoYAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGLIABjcOALgKEqCJYjRn8AMMXWHyKERqYAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGTMCAyUVWx4AugM4bOgCLLzB9iqYFizEAIeIC/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGLIABk8OAJoCiE4cxgx9g8wW6T7GFBhoAACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGYgADIwM6B1knhM2AqmMQAkwXYvgCi08JAwAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJG4gADGpMBVQTEQTaLaHPpCjBciMUXGD4lAgAAIeIC
/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGogADJgehlQFdAJU9eAAWF2L6AkUDceYCACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJG4gADJpMBTQDJMOLNpSvA5kJ0X2DzKSEAACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGMgEDIwM6E2EYjMWArJ7uANN2DBdi8QUZAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGsgEDGoMBWQTCRBhPiUXkAgzbsbgQwxfkAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGcgEDJhNmGgO6ADKLfgCL7ZguRFJOtkUAIeIC/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGsgEDBgPGQsjAzKfIInIBNtvRXYjNFyQDACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJG6gEGRgY0BiPMfIQ9mAzqWY/BQLcdiwupAQAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGagIGFArEYEBjMMJspLLN2EzGYjuGC6kCACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGKgIGDAYjxAIGdAEUIWrZjmkypu2YLqQCAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGagIGFArBRhKAWkltm3GYjG47NhdSDgAh4gL9
"], {{0,
0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGmgIGRgYkCiLEgCBhipAp4o1G14VhMhbbaQIAIeIC
/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGGgMGOAHjMyBRECEGBEmCwei6sJiMYTttAAAh4gL9
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJG2gIGFArCZoBgFAE0IWJMxtSFaTKm7bQAACHiAv0=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}]},
{
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGGgMGOIEshCIAdgXJTsGmC91kbLbTAAAAIeIC/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGegMGIIQQCCEGCEZWBCPwiKDrwmIyfQAAIeIC/Q==
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJG+gMGMELmM0AJuAgDgsQpgqEL02Q6AQAh4gL9
"], {{0,
0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGugMGOAEXYIASCBVwhEsEUxcWk+kEACHiAv0=
"], {{0,
0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGugMGOAEXYIASMAEghwFM4BbB1IXFZDoBABzOAvU=
"], {{0, 0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGugMGOAHlM4B4DIykuQWbLnST6QUAJGwDAQ==
"], {{0,
0}, {18, 18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGegOIlcgWY4rQ0xwqAAAkbAMB
"], {{0, 0}, {18,
18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGegOIlcgWY4rQ0xwqAAAkbAMB
"], {{0, 0}, {18,
18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGegOIlcgWY4rQ0xwqAAAkbAMB
"], {{0, 0}, {18,
18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}],
GraphicsBox[RasterBox[CompressedData["
1:eJxTTMoPSmJiYGAQgmJGegOIlcgWY4rQ0xwqAAAkbAMB
"], {{0, 0}, {18,
18}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}},
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImageSize->{60, 60},
Method->{
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}
},
AutoDelete->False,
GridBoxDividers->{"Columns" -> {{False}}, "Rows" -> {{True}}},
GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
GridBoxSpacings->{"Columns" -> {{0.5}}, "Rows" -> {{0.8}}}],
"Grid"]], "Output",
CellChangeTimes->{{3.7067974294575357`*^9, 3.706797441855192*^9}}]
}, Open ]],
Cell["\<\
Mean distribution of all possible qualitative different interactions among 4 \
particles:\
\>", "Text",
CellChangeTimes->{{3.7066917699802523`*^9, 3.706691783316193*^9}, {
3.706797621610661*^9, 3.706797645410253*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"Riffle", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"Column", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"ToString", "[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "<>", "\"\< x \>\"", "<>",
RowBox[{"ToString", "[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}]}], ",",
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"Mean", "[",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "300"}], "]"}],
"]"}], ",",
RowBox[{"ImageSize", "\[Rule]", "100"}]}], "]"}]}], "}"}], ",",
RowBox[{"Alignment", "\[Rule]", "Center"}]}], "]"}], "&"}], "@",
"gridsize"}], ",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{"Reverse", "[",
RowBox[{
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "2", ",", "4", ",", "5", ",", "9"}], "}"}],
"]"}], "]"}], "]"}]}], "}"}]}], "]"}], ",", "\"\< \>\""}], "]"}],
"]"}]], "Input",
CellChangeTimes->{{3.706798418537328*^9, 3.706798478591914*^9}, {
3.7067985197793217`*^9, 3.706798671244928*^9}, {3.706798720985003*^9,
3.7067987777548018`*^9}}],
Cell[BoxData[
TemplateBox[{TagBox[
GridBox[{{"\"13 x 14\""}, {
GraphicsBox[
RasterBox[CompressedData["
1:eJxTTMoPSmViYGDgBWI+IN7TL6x7/f07+63bTzyZf+WdPYxPLRrdXBgfRi/U
f8H9q4lye2DmoJu/7n7tnIyd7+xXsBuHGM57Zz8rfO7hQ+kImlR70PXDzIXZ
g0sdqfaSqx9d3Tm2G14e5tlwGl09ujy54QMLfwYogJhXjcO+arg6asU/rWl6
+Y9e8Uev9Env/Efv8oXe5ScANn8hTA==
"], {{0, 0}, {14, 13}}, {
0, 0.9667774086378738}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 100,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
DefaultBaseStyle -> "Column",
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"],
"\" \"",TagBox[
GridBox[{{"\"12 x 17\""}, {
GraphicsBox[
RasterBox[CompressedData["
1:eJxTTMoPSmViYGAQAGJhIA57vuHDzPC39rjoQvc7guVH7uKUJ5Wm1LyU6W6N
HH137c+x3fDyMK+G8wfKPH/+tBVJNm/tPcylE7QV39rrXn9v57flDpxPrrtw
mQezD7/+u/aO8RfEv7C+tZdXj1p3v/YN1Jw39tbtref3vHoDN4+Qf2HyMPUw
/TDzYObD7IPZjx7fDFAgVH5EFihmzz2/8qqlzhs4jeq+O/D4QE8vMD5MHqYe
ph/dXJh9MPvRzYP5TxIcsG/sPwBNidn/2v7vu8cup7++tv8uNvPP5Fuv4f4m
Nrxg6mH6YebBzIfZR8g8WLjC9MH8BTMPNdwJ0zD1MP0w82DmEzIPlv5g/oOp
N1lvBRRB8GE0ofQKk0fXh24ezD5c5g1Wdw3WeBxs6X6wlxODrVwdGvXQ4K23
B0s7BwBYRx66
"], {{0, 0}, {19, 16}}, {0, 0.9169435215946844}], Frame ->
Automatic, FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 100,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
DefaultBaseStyle -> "Column",
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"],
"\" \"",TagBox[
GridBox[{{"\"12 x 16\""}, {
GraphicsBox[
RasterBox[CompressedData["
1:eJzlmE1IFVEUx1+CQkhFH7gQg3RRLXqboFJQL4FRCAYVgS4yMKwkPwhNMDRE
lKhFttBINKQoqIUghEr0QVRQIGUEWWFC0Js7UmQJGlREzVN+d+DA5W1eCdcH
w2HOnHP+/3vOf+7MvOyKuv2VKZFIJCM4MoNj1dGbFfkFUyrZdvmFQ5mpOVMq
ZXjNq+dpocX/r3CTbeE9m9qy8/BL32qJW2y+tjl8iW79sWnIN1Yf9Ae/9fjq
Rdrb4j07eo3FL+MXa25SP6df521p1p7KL7h89fxMTPWtGOy+WKsNz4BkbmNV
l7H4iSOPOrJ+svj+mnx67tJnXz1Zf3L3+9W+6t5WWVJ2QKvgYtBo3+AXzxP0
1Hx7c7Xxj87d7VwbDeeExU8cedTBDw648IBXovVK3Xxo6Tt+54yvznaM3fuU
pVXrQHvD7WXa+G/d37Xxz3Vt8IjjfKRmYrhmIuSBxW/Loy444BKHP5FOWS9x
D+Jlv2ujC/oIr/rf0x+LRj0VZzHe5Rme5adWpvc3eSqetf1hOE8sfuLIow51
wQEXHvCCp5wT62OOrB9dlF55/OhYuafWRd98LdwbMzykXuDBOf1c2AdOGIvf
lkddcMCFB7zgCW85J/ZRrr+7sW9D25FQJ/SFutmT1YEUwvVh4UvfI+KHnziZ
T11wwIUHvOAJ70R6k+uT983moZFnsf6Yuub9DCLCfkt9y+eOvD/Jow515X0k
+dv0ZtOdzJM8OJfzl/gL+3S7sbI/Ut82HFufbfuBa+txTW+u7Aeu7teuPE9d
fd9x7X3U1e+FpfY95/r3dqK5/e//Q/4CQgR8YA==
"], {{0, 0}, {26, 22}}, {
0, 0.7574750830564784}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 100,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
DefaultBaseStyle -> "Column",
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"],
"\" \"",TagBox[
GridBox[{{"\"12 x 14\""}, {
GraphicsBox[
RasterBox[CompressedData["
1:eJxTTMoPSmViYGAQgOKw5xs+zAx/a4+LLnS/I1h+5C5OeWrrg9Ep090aOfru
2p9ju+HlYV4N59NKH4z2509bkWTz1t7DXDpBW/Gtve7193Z+W+7A+YT049IH
Mxe//rv2jvEXxL+wvrWXV49ad7/2DdScN/bW7a3n97x6g9MdMHGYOpg+mDkw
c2H2oMcTAxQIlR+RBYrZc8+vvGqp8wZOo7sD5h8YjW4vun6YuTB70NMHLJ4k
wQa+sf8ANCVm/2v7v+8eu5z++tr+u9jMP5NvvYbbg+5/mDhMHUwfzByYuYTS
AyycYPpg7oeZhxqOmPpg6mD6YObg0oee7mD+gKk3WW8FFEHwYTR6+KPLo+tD
j7fBZv9Ah/9Apb/Bkv8GqvwZXOXvwNc/9K5/ASsNQHA=
"], {{0, 0}, {16,
16}}, {0, 0.9169435215946844}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 100,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
DefaultBaseStyle -> "Column",
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"],
"\" \"",TagBox[
GridBox[{{"\"12 x 13\""}, {
GraphicsBox[
RasterBox[CompressedData["
1:eJztnWuoHVcVx2O1KopKv4iKohZrfYAoggoql2KtDxCp9YHiA6OtaApVUCNi
P/im4IMIGkogQohJEQkNqVXbJCbN+x1UREHrl6j4+CCigiLoTc75zWF+9/4z
c86de2Zus0vDZu7M7L32XmvWe63z3PV3vO3Wq9atW7d+8d8ti/+u277lSfd+
+/xCGevjE278+F9/9oLJOPR5y7i2xn9f/8MfHb9wLt5/2j+uvvOGD0zo5Gs7
H/fyt7/s7JLx4WN3fecvG/M8TSPvp/lZH3hm3U8Zhz2CP+jhE2/4zTUbD5+J
9MJ9xscce8nXr7rmdEU3u770yT2Pun/bwohsdraGg+d5n/mY3+sm+vf9Qp9r
czS9QQ/3XBy2nl049JH3f+rJTzy38M4/3vu3u991ZuFPtz369uu2n1p49vXv
2fW7O09Xf2c8+9hfvfmNr9yy8NUvn9v752fuaA0Hz/O+52U91ufvwAe8wN9E
v2Uc9og8ND8C/3t2/OCFG06eXHjx0Z9/8enfP17dh04YTRdNcjbB4e/C67A+
8AAf8Hof08JRxmGMyDnw/upLjOt0JT8/94d3LHKmE5E+4Fubb/r847/xvpPV
dVv6ND2m+dL3AHzAC/zcL3J8bYzYDbYvzGc++JUXLXKkExUfYoQOTL+8B58z
fSZ4TI+8b/2V9VjfcAGv92F7rNj3wxqthyW9jHGk552qRsvLm57/v+3/euqJ
JfdH1xvGdszmaj7zLa65z/O8X59vsp71C8PpfaT9ct03Xq7UkfNnNB/h7+aD
4J3R8jGNN1xicJsWnnH1ta/69Ee3V/RnPsU193me95vWaYKT/bA/ywWfS994
ulJGn7v5InLtxIXv/uLhaw+N+dWxhV9/7+bnfOFDx5bYvfAj5CX8CzqwfcwI
3VnP5Jr7fo/5mJ/1WB947CcAfvbD/qy3mG8W+pwvPdoPaDsXPIL3bb//z2+P
3XW0wqvp0nKU0Xqg5WmC189Zb/U6rG+6BF7gZz/sz34D+10Lfc6XHi3/TJ/m
Mzcf+cxnX/q6IxXeee8pt92z/jWvPV7hfyR3D4/9jkeX0A3X0E3SL7mf3md+
1mN94AE+4AV+833To8+l0Ofy46x+Np+jR/Q428v2u5h/2E4G7/gN97/+IkM6
WtGH9U/oocmvzX3765mP+VmP9c0vDbfpL+2f82k6x3nhcyij9f+2fgz7exjT
Ofr8rWeCL/tT7F/ErwjeoQ/jfVq/Ic+bbpif9Vjf/lGfh/djfpjOmfs+12nx
Mi0+hzI6X8b7b9qP7YYmvmS/jPHXtJ7pxCN0k+yctvyF9033HlMc3+eb6LPp
u3F8vWk/K8XnUEbvO113rSckf146d/NB+7EtJ7vKJ7KeYT+/+WpX+10r+Oya
P/o7sp8k3V/p92Z5bP6Z8GS6sx4JX+vaTmA+64msb7rtar/T4tP4sT6V7vfN
P83H/f0k/cfyp6vvbdq4h+1m+/9sP3R9bubXtsea5PFqxXmMF89vfcn8sy/5
nvQ/80XO13Yp+0x2RNt8iCZ8mf6SXmR7Hb4FvH4ef07b8+J5z8P89osCT9Lr
fF5N9DjtedpOs56T8Gv8z6qPd80vDZ/lEdeOpyT/BfvyaHva1yneYr5kP6b1
PeJ9+BvxM1648dQ/H/zmnoVX3PqWd9/yy8PxfLjP87zPfMxvfdZ+yxTHMd7T
eVieeUzn73hUwmfS04Yiz/2d2P50PoTx4Pic5an1AePL147jsS70AB+DLkb5
5A+N9/HTCl6e4/q9H/77Wz92x8EleDH/4j7Pp/lYj/WBh+eA13Ep5yml80hx
dJ5zvDV9H8Br/0SSR33RY5IH/l44F+eT4a9zHqTtEOPZ8W7nf/E888GfeJ54
3gi+A2M4HljYePhZi1PsHs+zb7yvAxW93H7pD0eq9Zk/0SX3eZ73mY/5WY/1
gQf4gBf42Y/X9zk4nu7zSXZWwg/4s5+0bV3SUEbbjXx37Be+QNyDv6e6B0bz
G9Nx8l8zEl+BT43yfA6O4flJNfL3EX/YO6abgxV9Oc+CfTsPhOd5n/ma1gU+
4E1+TvM960ucl8/R/JPzBx/Az9+tV6wVOmyyQzgn9k3cDb3LdMn3afvP/MH+
HcftOF/4xwgv+6t4M/gfzbO34lNcj+C7r6Kn0ftbx+Ouan72yzX3eZ73mS+t
BzzAB7zAz/zeZ/I3Wf/jeddncP7gA/yAL/D3SImvc77sF3vg4i7v/u8kD81y
w3E56wWp3tH5NTwPXuFb8CfgY0QfHPGHByu6QO7W8yl3V/hlv1xzn+d5n/mY
n/UMB/ABL/Dbjkv+f9s1rkNO5w0+wA/4An/A1zddzSq/bd/w/bEv26PJT5bq
AFM+o/Ug4AIO9DvyF4GH80eOgpdvPe9Ni/9PnmcfzjPzOtzned5nPuZnPdYH
Hp4HXq9jvT3li6a60ORXtj8CeNiH7aGhynP7KRg5D+fbgg/n89i+tF/I+pHz
up3Pbf8L8Nr/wzX8ADoAXvicvyfnGzG/84WMX+ZjftZj/QSf6d70k87D52a/
kf0Xxgf4cv4y+E3475su+d6RR46jOL/V+YvWh5L/y3LI8WzwM/IXTuQPfIf7
zAPdOD+TvEjkLfRiOwe4U746920HMR/zs57zK4EPeIGf/dT9o4eWfI/Wz9N5
Ov5kvgu+nE/tuBT4hx76smPQf8znkFOOq6V6VJ+bnzPfBM/gDbxwLra3+d7t
LwIu3oePYX+wD+6jf1m/Tedk/Y73mY/5WY/1uQ989g+xH9vr7J/3OR/Oy3zS
eqm/+6b6ZZ5jH+a70Mdq2UmWy6y7bvwf58H377oD54uhp5j/pPxW1nOeA3hm
XfAB3sAL/Mj2JvyJv/OdM98Izh9X9jL8wvKr7bnV45EHqvlZj/WBx/Yif2c/
7I/9sn/m43nnoZhPJL8a+AFfzs9zXQjrQg/Qh+OVXcl58zHkA+eAvWl/l+Us
8NmvluqmUz0N51zH1wPyTx9ckn9u/ZDzg08BJ3Y09jL7dD2t+T3nZThd/8t8
zM96dX/TgQo+66fOb2e/7J/z4HyS/8x2ouMe9hPX+eDkHOyPhh7Yp/1RXcWD
bA+n+lLLSfNHvjP8zJyv8Wd7xX5g5gUf9bjghC7Rw+AnrAt81s9GfOj+ih8x
D3D6/B2X47wcd/X3ynzMz3qsb/0YeIGf/bA/0yXnUffjn14Sp0j5n/wdOFnX
9SbMm+JQSQ9oqtdryyeT39ZxbcehLW/hA+CB/bkey3LH+rjtbvBouYdcIY4H
XI4Lgkfkq+t7XI+W6nltj5suU30Z67E+8DjuCfzsx3YZ+7cd5HNzvw/zFfAB
fsAX+LN+kOL2iV6SHTYtXaZ6LuZn/9y3n9b5CMQ9XL9oOkxxWMsT8AK/QN8G
v/AVf/e8Dx7N1xyXgz7q/O1oBT/nxrWfMz16nQSP5Qz7YX/sl/37++G8Ut6C
6dT4AF/Ob7Ff3vg3P7M+u1J5nvJ7bY+kulTXu4IX9ue865QnjL7sPhrMj32K
PYGe5f4GPifzefMlx9WhD/hAXR6cr665b70lzW++Yz7gfgbsj/2yf87DfTmS
veH4UL3f50MVvlxfnOqWTQ8pn7grv1DKA7Q/N+UNoi/hVwB/0+aP8p2h19jf
Z/2L+85bsl/ZfoT0vVnOpzik5XTC3/J27dkl/hzgZz/Wn+2PZWzLl5y3Cn7A
F/hLeaz256e811n9Rm3zfVPfC+cNWQ+xnb3S78Xzm78h18AfY+qnhb2APuXv
zfI19TVIzzMf87Ne6o9luNlPyjNK+Xez2rv299lusB/Q9NdV/rD9r/Y/OT5s
ewL5xPfruoCu/KyuC2zKQ0DOoS8Bp+kS/gDdmC863pH0Sz9nPsr8rGe6BD7g
Bf6mPJeu6yKt54NP9uH+OuzD+QH2f7etO3QeveuO7CdAP0cPAV70j7rduHp9
Gp2X4Hxv+6mAz/u03uz4pPWsxPfNZ6xXO96Y8iy4Bl6fv/PtV6u/deqrAH6B
D/xDD9CHz9/0kPp/NOVHWA9PcV/7ae1/TP0iuqZLwwkf8XOpn4fznzh39Cvz
zRQfN5/kffvJLHcNl+G1XdX2dwNmPdeEP/udgSflEdjObMonaeqza7+r9Xf7
/Z3HkvozdsU3Ux5myntP++ea96yfJv0k6ZdJ3lk/ZL0Ej/lF6oPc9e9UJH+S
z9Pfv79b+2fM35v6HptvmF/anrEf3H4O66emy670H/tX7S9I+VjGv38HAL94
PU934ifnefMnrrnv95iP+d3nP9V9Ot5uPHn/Xenvpkvrhymewn5sH5lfGk9N
cNjeTv4o/u74QpJPXdk9dT18YhekvhDJrrOe4roBxyXtj0380v4+v++6Esu5
ZBekPia267qSRwl/jueAf+cbWW9PfQ/b/p5WoqP0HRlO8/Gu69zJv1m+HnBf
lGe24+33sP8P/obdDP6hp2SPc5/ned92D6P9ak12dV3v2LdEHnWVB2m/Zsqf
TXXlhj/1P2gLR8ojNV3azrG8t3+rKzuxDtek3nXavnHWS4HTcTfWYTR+mNff
o99bPi67tD5n2j5r9f0f6Pyck3/a8tt1LG3pqWu9I+U/OZ6x2n2/0v6n1VNd
v4A/mzwJ5+e575rjxPU62f3VfK6XmFUvnFf9NvhzfCrlM3ZtR0xLB66vS/64
ecE16+j+EdANdrP9O6lu1XXJ9jcxH/N73b7PoS19mi+lvrLzhi/9nte8+OO8
92c9sG0c0npr33hbLf457e/BrdbY1F9waH1qZqXL5H9P+U+pftvzrHW6tN87
9RssdFnostBlkeNFjg9Tjhe7p9g9Q7J7ip+o+In68BMVv3rxqy839u1XL3HI
Eodc7rz6ikOWvI2St7Hc2HfeRslzK3lul+NT885zK3nBJS/4cvKor7zgUkdR
6igud6591VFYjyh1Z6XubDm+Oe+6swRHqdO9uE6p0+27Ttd0WfoajOim9DUY
Rl+DhP/SB6b0gemzD0zS30rfrNI3awh9s0qfwdJncIh9Bktf1tKXdYh9Wa3/
lj7WpY/1EPpYm29aHyt9/0vf/z77/pffSSm/kzLE30lJfqPyu1Lld6X6/F2p
prH8Dt/y8fHyO3zzpcMkr8rvltbt8fK7pf3SZaLT8jvP5Xeehzxaf+f8wUtT
HoLlUKrftl5qOodOsF/Rf/x79Mgj7GXkLXwOexM7OsUhuc/zvM98zM96hgP4
gBf4TUfW/1L9uvWgpjwX8AO+bC/2TVdd2UmuG+D7s71pf5TjV45TJL8tI98/
eIUuOF/sB+wP7GWuR/DdV8U9Ru9vHY+75N85L/6/q3qe95kvrQc8wAe8wM/8
yX9mfd180/o5z9lfAX5cV9KXHdO1PHd83/4ux+VSXjSj/Wqmz+T3cJwb/CNH
4U+M/B16gm/hZ7YdxL5t5/B83c+9t3Fd29veh/08pkf7iX2O1o8cd7U/2vk4
a0V+u27Gctd+W8sRyyPnpfB3zhn+4Xxt57/ZP0QcDz6FH3pEN7sr/zRyF/3O
ccGUT+b1HfdkPuavxwN2V/AAH/CmuMry9aAT/xLr+3xMx85bMn6stxvPQ6NT
52m6f4TjcraHHGdPfM96uvmpr1Pc3vEM5yPAp8xvuK7HPc9EuuQ+z6f5WM/5
LY6HpTh02n86r8RnHde2feO4q/E8lL5UbfOHzQed7+A8ets1Hv19prpB6/0p
b9B4sD0Kf0LvGvkL91T2QDqfun9xT/W+/T/2Z5keUt6r81bTedgv5DGdv/NP
Ej67zvddqbxO/Q8cr+Q61Rs5btI2vtdkZ3GdvmfXBaS4sZ+Hj7U9r3r8cTJP
ygNw3UmSR2m/056X79uv6frDhN/Ur2De8t3nlvoNJj+Zn1spPJ6/CV+OS5kv
dZ1n4HOzPHXctinOOe1+247GS/IrN/UXHIo8T/W/ic931SfRdr/zrtP3muws
5zl07RdhPuehJDukq/1Oi8/0u2PWIxL++6LHpu/N/LOpTmKldOnvuqku0Pwq
5X92Vf+a/P+OZ5tfd7XftYLP1eaf6Ttq22et7b7NLyx/mtZLfk7n582qL3k/
zhdLfsmm87U+ZP7Zls6m7RvXt33TFX3OWiec+mGk55P+k/oqpL6yphvz1Wn7
rNiO8HfAeqmvaeorkPT3dM6pn8e0eOm7T3XXcnba95L/wuef8lutJzpu5/wZ
57c7X8j550183H4I65Gu73G9ie0x2+upnsv2WtM5zgufj7Qx9T20v8/1fNCD
8yvtt0z1Za4vTnWpqa9Bqlt2vWuqR7Mf0/mZ1kdNr84XWCk9lnE6+jQ9Os8M
v7D7lZhfmm4YXRdi/pXgTfU0zOd1HJdyPjXwsx/n2Zk+Cz32S5/2/yE/3c/A
fMZ0mepvnc+Y4i2Wcyme4nir821Nl+b77m9gPdN2eqHHfukzxdFTPrfzulN9
KeMoz2dTlU+Z9H/bB/V8zU2N6zTB6T4aqb9oocdh0Gfy56X+WO6r43pa3x9d
bxjzq83RL2O/Fc/zvvs4uf7X91M/rbTfQo/DGpv6Hqf+x86/sx5oe9d2coLH
dr/tZeutqY7e/S2b+uz2jYcyXn50ParpzXmfqR7Vv5fVNt6Xfg/O86X6ZeAz
/bp+ue9zLuN0I3RhPmN5id8w0Yf1gVnjPakPi78H/w6A6x0Yix9xbY6pDtB6
mO1e5ynX7fYtY7/jjtZw8Dzve177623/p7qHtRKXLmN9TPWSTfRr/a/eD3Lb
2I7Z2RoOnud9+13b9u1P9Y59n3MZV0af6b7j0LZ7u+onanvMY9s6mUKPV/a4
WvkyazUPZ97j/wGxoRzB
"], {{0, 0}, {83, 98}}, {
0, 0.2591362126245847}], Frame -> Automatic,
FrameLabel -> {None, None},
FrameTicks -> {{None, None}, {None, None}}, GridLinesStyle ->
Directive[
GrayLevel[0.5, 0.4]], ImageSize -> 100,
Method -> {
"DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" ->
Automatic}]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
DefaultBaseStyle -> "Column",
GridBoxItemSize -> {
"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]},
"RowDefault"]], "Output",
CellChangeTimes->{{3.706798436751758*^9, 3.706798479975285*^9}, {
3.7067985278085737`*^9, 3.706798554194337*^9}, {3.706798609776582*^9,
3.7067986164766817`*^9}, {3.706798659306037*^9, 3.706798672600963*^9}, {
3.706798722166615*^9, 3.706798728842823*^9}, {3.706798762327816*^9,
3.706798778329723*^9}}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"bdmcollidingruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"BDM", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "2", ",", "4", ",", "5", ",", "9"}], "}"}], "]"}],
"]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706797757473118*^9, 3.706797838574121*^9}, {
3.706797996929699*^9, 3.706798005441743*^9}, {3.706798090536994*^9,
3.706798097174667*^9}, {3.706798791558729*^9, 3.706798818570242*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"bdmcollidingallruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"BDM", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",\
CellChangeTimes->{{3.706798878400837*^9, 3.706798883664195*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"entropycollidingruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Entropy", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "2", ",", "4", ",", "5", ",", "9"}], "}"}], "]"}],
"]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706797757473118*^9, 3.706797838574121*^9}, {
3.706797996929699*^9, 3.706798005441743*^9}, {3.706798090536994*^9,
3.706798097174667*^9}, {3.706798791558729*^9, 3.706798818570242*^9}, {
3.7067991562249527`*^9, 3.706799171959715*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"entropycollidingallruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"N", "/@",
RowBox[{"Entropy", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",\
CellChangeTimes->{{3.706798878400837*^9, 3.706798883664195*^9}, {
3.706799160881011*^9, 3.706799175011486*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"compresscollidingruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"ByteCount", "/@",
RowBox[{"Compress", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"1", ",", "2", ",", "4", ",", "5", ",", "9"}], "}"}], "]"}],
"]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706797757473118*^9, 3.706797838574121*^9}, {
3.706797996929699*^9, 3.706798005441743*^9}, {3.706798090536994*^9,
3.706798097174667*^9}, {3.706798791558729*^9, 3.706798818570242*^9}, {
3.706799182480937*^9, 3.706799198262941*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"compresscollidingallruns", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"ByteCount", "/@",
RowBox[{"Compress", "/@",
RowBox[{"CellularAutomaton", "[",
RowBox[{
RowBox[{"{",
RowBox[{"224", ",",
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "1", ",", "2"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "2", ",", "2"}], "}"}]}], "}"}]}], "}"}],
",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider2\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<antiglider2\>\"", ",", "gridsize", ",",
RowBox[{"ParticleGenerator", "[",
RowBox[{"\"\<glider\>\"", ",",
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], ",",
RowBox[{"ConstantArray", "[",
RowBox[{"0", ",", "gridsize"}], "]"}]}], "]"}]}], "]"}]}],
"]"}]}], "]"}], ",", "0"}], "}"}], ",", "200"}], "]"}]}]}],
",",
RowBox[{"{",
RowBox[{"gridsize", ",",
RowBox[{"Subsets", "[",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"12", ",", "20"}], "]"}], ",",
RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.706798878400837*^9, 3.706798883664195*^9}, {
3.70679918573475*^9, 3.706799201595975*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"{",
RowBox[{
RowBox[{"ListLogPlot", "[",
RowBox[{"bdmcollidingallruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Web\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM all cases\>\"", ",", "14", ",", "Black"}], "]"}]}]}],
"]"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{"entropycollidingallruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Web\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy all cases\>\"", ",", "14", ",", "Black"}],
"]"}]}]}], "]"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{"compresscollidingallruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Web\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Compress all cases\>\"", ",", "14", ",", "Black"}],
"]"}]}]}], "]"}]}], "}"}], "]"}]], "Input",
CellChangeTimes->{{3.706798892760641*^9, 3.70679889303971*^9}, {
3.7067989238957977`*^9, 3.7067989438910627`*^9}, {3.706799730592166*^9,
3.706799828202935*^9}, {3.706799902535261*^9, 3.7067999454871798`*^9}, {
3.706799996482132*^9, 3.706800065202785*^9}, {3.706800370646516*^9,
3.706800392781994*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw9kwk01Xkfxi9RIlQUUxGNhBYlS0V5uohSlnstEe5+XWVUc6Qm0m20J0Th
UFGUIt62aRkl9aaZooYiW8rWKpVCadE7c97fd5zjOB/P//k9v+f7/f9Nxat5
MlUOh3P7799//v7/552z20+CtMh0fbB/YGMB/1HZemINnOKt/TFDZwzjkUjb
ENse84JYH+bhlUmH3hMbYmniw4aRNmMZT4BWkOYPazuJTeCic1zbwo14ErKk
ASq528hvhp3fh5S2PSc2R+lsvyi1ZLqPBWRxpuese0i3Qon/l+7RvcTTUMox
3DLzGfEM9Ji15cUEUN5MzEr17ktaRTwLWzBPck9CbIN1o/fLdSqJZ+OsQEMR
/YsBY1u85ConeWaRbodd0tjgEaMozx7ny+esXGFGugO66s2DT/eRPgfSV5Xp
DoHEc7FqX8Uw9yZ6fh7GXLcdlfXvvBzh+iFnV+piyndC7qYKvTvrDRnPx7D9
Z3S+80lfgNKSgrxPx8jvjLcrv/X7LiMdOPgkSr3BhrESuH11U70vl/SF0BZz
/GbUkb4Q6pHaVtmtpHOxtveveWeHs3wlF79pFnBu69F9XNCv8kSj7jDpLig3
fPqsLoZ0V4R1tVy8XEq6K6pX2la65ZPuBi/rsFPaj0h3Q1xm7htV7R+Yvgg5
9T7tuyLofovwTtfVsOYz9XWHdFCy9EUjY6U7jnhWlwoNSPdAuf32AflrNn+l
B350S3g8Y4Der8WobhlWP7GG9MV4kvTSI+4j7WsJTm4UXMwZTecvwdSsAxf4
naR7IqBy6y1PK9I9ER+VWtHURPpSNEq+5hSfoPsvRfKlLtPt36n/MrSvuSaI
sx3H9GX4FGI/VFPImOMFzY2i/8xoY/NQemGvv5Mw25F0b5Qk1EtrB0j3xqii
Mdcq82l+Prg2nzv8XBvLgw/SeXfT+uLpeR8kObnP/JLN9HIfDDE76nTmFd3P
F/EDb4718dnz8EXLT7H6Oa20L180quy3jOshvy+OtyfkdT0jPw/PXd1cUnZS
Pg9L+5f8GatO+Tx8aCvkHcwjPw/ql/S7/eTk50Mn8f7kWRnk52N32aJDjnS+
ko8s7ucn7mvYeeV8xAbyTKRZ1N8Pv5w0tg2tJP/fXJGy1uMr7cMPefMi04xi
Kd8P97VOZ5T5Ub4/Pqg5u+zJIb8/OrX7GzxU6P7+mHpXsyNxA+X748bRud3n
LSg/AHuLOyY4/0rzC8CbzScsk/eSPwBfTd/YZVWRPwCZWgfVnq8kfyB0Y9sS
Npxl+0Yg9FxsBjOT6H0JhNd12bpllYzLA2EfKlCcxHjmX44q6Sprl1LGWI7J
Q7amdG5jrFwO5zGrI89NncD8y7E+aMHRgUJ6v4Iwr/vP6sY9lB+Em4Wbeztq
KD8IVyap23i9pvwgWFsGJfEKKT8Yoo7aEMdvlB+M2px7YV1ylqcMRoV/pUnl
XcoPxvjB2Cm26Yw5KzA8onZk9hbyr0BHmWBwx2O6/wr0jVxn2wHyr0BixZpP
iwPIH4I5Zc9PnCIdIdBf4+492ZP8ITA95jj4tJ7uH4JIR9X9q6dQ/1AMdbiZ
Yc+h/qGIfvBA8bqA9hcKgx1qVz6+o/2F4m7zxbSiL7S/MAQ+KvAqsiN/GKrM
m6abpdD8wpBw1iDJ+Tjlh8F1RNyWDNonR4Bav/Nbo/nkFyD1bQlXNZ78Amgt
DGvS/Uj5Asw2Pu+RcoXyhbDKCrkcEMeeNxFi7ONdBRNn0nlC9FkN9Ja4MxYK
EXWzd5NKHp0vxAsjG9M/jjDOFULtovx44h3KE8Ln46FRxuFMbxWCa1//V/VV
ur8IL92iDzssYPM2EcEyx+HKsQTapwgHBi9Ipt2gfBEmzM18OTCd9iPCVE1V
wR/VjHNFSH7f+D15Ge1bBN2T3aJ84lYRbjVk9VqMp/2LkbMr5uw2f8YmYlgk
eBblDzFi+WIURUT32OowForB93Kck6xkrBTDtyctntPL/LliKFr8m52mM71c
jN+/7MuPqaF8Mbhcy9kNvvT+S6Dj1jzNw5n6S5Dm/Zn3ewX1l6DTaOKNfT2M
hRJc81J7eDiUvg8Jvhm+TK37TP0l6L/vsGPYOsblEtwa6vK+2ZPyJTDJuyPd
eZr6S/FOb5w8Zxz1l6K/NSEvJZO+BykKF3kbFEyg/lIUD2nptpRTfym6v6U5
H31L/aU4ZS24bWlJ/aXgXn7KzzZn3CqFe1SdqhkxR4bQp+4awd6MTWSI2OE0
tuk55cugr3Kh77o+5cvw9qHx/SWHqb8MMdoWM+7upnwZfIu9N9j9+73L0DFl
YdWvU6i/DHq6reZ2X2j+ckx7VtKYLaH+cqyPSJ+olUD5cgSEVsVsUad8OQKv
Du5WPUP5chzmSprO/5fy5cjcvCeX85ny5RD+/Hhl8SPKl+NCxER94yDqHw6x
3Q1Xo93UPxyyTIOo1c30/oUj5fpoPTnfmOWHo/SWaF/waMbKcFSla3sXOzHO
Dce9cfY1iddp/uFoD+JrLXxF8w9HYNWlew8/UL4C++cPu5Fnw/wmCpyQNu+Z
yWUMBXRGvCuK/kr9FYidujU/SIfyFUiddOCDty3lK6Dbtb2uzJpxuQJux9bG
1/oxblVgx4Pcny84MOZEQLbm0W8aZ6h/BAQ85bZ1R4zwPxwAWZk=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz1lIVGEYh/HPglAiSFs0MNCSsIXcslwqX/d9G/f9uI8XEUldaXFuIijB
q7IS6VAhEV1lXRnyIWmFFVGiCIqnG4Mi6SqyhRaaT5hnYBj+85tn3pnIttOe
zg1KqRd/n/9e/z++pGVPj9YHvdkhvjekezHJO/nO7EC5NBaz5r41e6tMX5vb
8j0o1Le3y9Tkho1Rm8wOk+Le+wkL4+bz4fLSOxz9bc7sCDl3aubm7s9m75HZ
uPG+tQ9mR0nQxaXUq2Nm75PAlabHU0/Mjpan+/vfN02afUBurU449z6afUjK
bl9f/DVh9mFJORg6svxom2/Hir6Smja7aHachAyOBLcl7/TteBlY29ubNmP6
BIncnNTwetXsI5L7amBQ1r8/UWovVN7NCDf//6jUxTz88WDJ7GMSYP18rkLN
TpIzXwsSP62YnSx98ec9Q8/M/RQZLg+OLggwnio31OjCfEiYbx+XO/0xQ0tn
zT4hv3NH52N3mc+flOXLAYXeNfP70uDi77bA0+Hp8Ax4BjwTngnPgmfBs+HZ
8Bx4DjwXngvPg+fB8+H58AJ4AbwQXggvghfBi+HF8BJ4CbwUXgov83cp83cb
ruGqHH05eriGKw96D3q4hqsK9BXo4RquKtFXoodruKpCX4UeruGqGn01eriG
qxr0NejhGq5q0deih2u4qkNfhx6u4aoefT16uIarBvQN6OEarhrRN6KHa7hq
Qt+EHq7hqhl9M3q4hqsW9C3o4RquLH+PsPxd4BbchjtwDXfhqhX3W3EfbsFt
uAPXcBeu2nC/DffhFtyGO3ANd+GqHffbcR9uwW24A9dwF646cL8D9+EW3IY7
cA134aoT9ztxH27BbbgD13AXrrpwvwv34RbchjtwDXfhqhv3u3EfbsFtuAPX
cBeuvLjvxX24BbfhDlzDXbjqwf2edf8DnEdjrg==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0ElIlGEcx/GnOmRBUKQlEWGWJSGZ5dbq332Z0RmX1HJ7tSYVgjKlQ0G9
aYeiJOiQWUEvFEUkKVLQCk9Rh+gQZAcRilcFD0W2KB4KbKF5BuYrDPKbz3zn
PzOrmw6VBeYqpV7/ffz7///vW4bn4hPf+beREnxCfj9OTLo8YXaEDLbdiD3+
ISq4F8vQg68jo31mR8rQtf5Pdvuy4I6WI1mJKR9D/Uo51Xv05fU55vUx4nl1
NvnHqNmxktd/rGttp9lrZWR41dThErPXiZRHeJuKzY4Xf/9Bd2m/2RvkTOP6
wNw7S4M7QW72dp973Gn2RrnaOr/mwuCS4N4k98dqP98bMjtJesbWfD89aV6/
WU49rBtv7zZ7i7Rf2fnudp/ZyTJbcHJhVOj9UyTu+Uzdgxfm+6bK+wzPgkWZ
5vOlSa795e3PZ8bT5VfsrbbJQuNbZcCXeik69P22idee7kjqMnu7nJiZHk7o
MHuHjDQ/TR54Z/ZO6Ul7o/2h32uXzFakPEqfMDtDpu7GzauPXB7cIu9Xla2I
Hw9+HlvgmfBMeBY8C54Nz4bnwHPgufBceB48D54Pz4cXwAvghfBCeBG8CO6B
e+BeuBdeDC+Gl8BL4D64D+4Pd/GHuw3XcFWKvhQ9XMNVGfoy9HANV+Xoy9HD
NVxVoK9AD9dwtRv9bvRwDVeV6CvRwzVcVaGvQg/XcFWNvho9XMPVHvR70MM1
XO1Fvxc9XMNVDfoa9HANV7Xoa9HDNVzVoa9DD9dwVY++Hj1cw1UD+gb0cA1X
VrjHWOEucAtuwx24hrtw1Yj7jbgPt+A23IFruAtXTbjfhPtwC27DHbiGu3C1
D/f34T7cgttwB67hLlztx/39uA+34DbcgWu4C1cB3A/gPtyC23AHruEuXB3A
/QO4D7fgNtyBa7gLV82434z7cAtuwx24hrtw1YL7LbgPt+A23IFruAtXrbjf
GvI/Nc/mCA==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1H9MlVUcBvCT+QOmFiUoWk3NQsJCjRIUxYeLgqDIvVxAfhWvGiCEWGqu
ZcvTzCaxi1rMQitezZgTHLnUMjWOpYH+UZSmzl/dSMXpUDYidcSs1vut+dzt
3d3nPue537Ozs3f0giXphX2UUkf/fv75/vfTOT3+w+bm/q0hcH6AvhUw4E6L
OADBJ74ZvLpUHISG+6Pq2ixxMKrWn1zybcxQx6HI7+w6kTNR/DDyao9cSjku
60eh5eflKVuPiR/F3fMfw7g+xaN9bcGOw7B0S1ZPUbs4HLcu7w9b1C2OwLKI
sVV/vCL9JxF6BBVV/+0/EsXjXYUjjz/oeAJGzMnpPlwg+USUR5RN910WP41p
Nf0KIhtl/1G4b++VN9cMGeb4GYy/sOZExyOSP4sjK0su1kM8CctXmJLoXHE0
qrJOD897VxyDcRO7ttpF4slI+qhs7GGf/P8UxFx4PfL6p+JYTD5YWX/pingq
mvfUrsyvCXU8DUNPVec2JojjED6se2OfY7J+OsIifXuaRkoObO86H3djlWMN
nLQ3uXdukDwenR8Hr3yvWvJ4RKVuPpQULbkLbQmW69dPJHfhx9Z5399ul3kJ
eOhcanW/csc6AYG1v+x+aoz0Z+DmPVb+gn2Sz8CuJ8rc/tckn4nFk3RGaajk
M9F67fTVxrNyXonwdL0UG9LjWCeirqX9YtNk6Sdh8JIzNVcg+0vC/HV9D4R8
KfksnIqaMKVJzk/PwgNjFy5zhQ938mSsit2/5e1sxzoZ60I2vTygV/IUeDyH
zrg+kDwFSZXz3siJk3w2vCVRX49Klnw2Sm/YA/d8JfkcBEWfvRa4W/I5aDi6
zbMvV/JUVDc0BcSVS56KpKF3BqUvlf3PRXxNR3fgcTmfucjq2F113UiehsDe
DdmH+ks/DZV78erjPZK7URhWGFK53snhhqoYWHOvR9a7saN1X9m5Tc5648bm
0l07mhJlfx6UrLmpA+ul78EXB0+tbvBJ34OeabojYptj40HdlJ0tq+S8VDoS
MTWr5bb009FTt7h2hXeE00/HZz/0Kx8R69ikY1F2zm9lh6Xvxfb5Ka4xw5wc
Xny3NjNmY7H0vfi9uaL3J5/0vRifHb46pK9jlYFgb1tGp5H5GXhn7dSgoj/l
PmRgmRVQvV7uj8lAQYA70n5L7ncm8l58/0Daeed9gUxcTT7Qe3KxY52JzweV
1Poahjh9ssq62yBrsiGredQna7Ihq2zqkzXZkFUO9cmabMgql/pkTTZklUd9
siYbssqnPlmTDVk9R32yJhuyep76ZE02ZFVAfbImG7Ky7vYoMsgWWZNtsiH7
yWo+zSeDbJE12SYbsp+sFtB8MsgWWZNtsiH7yWohzSeDbJE12SYbsp+sXqD5
ZJAtsibbZEP2k1UhzSeDbJE12SYbsp+simg+GWSLrMk22ZD9ZFVM88kgW2RN
tsmG7CerRTSfDLJF1mSbbMh+siqh+f/7L9JtVhY=
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlIlVEYh/GDC5NqoeW0SDKpaJCo1MycXud5nufP6xyGDYsiCb5FVItA
hMJ2fWQlabRpEUrFgQg0Qg3SMog+G6FogEBrEQ10j3CfC5fL//7Ow7vJ01fe
4aeUmvr7/ff7//MtNa7/3e/58WDx/iEVcSNjuXfNDpBxz+z11Y/MDpS4F13L
b2+EeHewPEzY2RkxYna4XDz7cUhPm/cb5MTR5l+H35gdKT+eLd0LCjTvo2Qp
eMurGD+zN8toxKGTj5+b91tlcVTOz6zsbZI0719dOmf2Djn2+YNfSJDpoyUx
ZionZMb4Lun9NHHr5eI6794tx1OGK458MXuPXO0f8m8qNf1eWdOx6v3Cd9PH
yJXo/Ne3l43Hys8zcxOnJo3HSd/kdGTDYKh375MLB5MDoqLDvDtebg48mC9e
8f2y8HWwr1eMJ0hfYUb4uXizD0jIbMK1Oo/ZiTK89mn3pTyzk2QgJ3ZjRGi4
dyfL6fvrBy6HGU+R7YV3noylm50KF1+3BZ4GT4Onw9PhGfAMeCY8E54Fz4Jn
w7PhOfAceC48F54Hz4Pnw/PhBfACeCG8EF4EL4IXw4vhJfASeKmvS6mv23AN
V2Xoy9DDNVyVoy9HD9dwVYG+Aj1cw1Ul+kr0cA1XVeir0MM1XFWjr0YP13BV
g74GPVzDVS36WvRwDVd16OvQwzVc1aOvRw/XcNWAvgE9XMNVI/pG9HANV03o
m9DDNVw1o29GD9dw1YK+BT1cw5Xl65GWrwvcgttwB67hLly14n4r7sMtuA13
4BruwpUH9z24D7fgNtyBa7gLV22434b7cAtuwx24hrtw1Y777bgPt+A23IFr
uAtXHbjfgftwC27DHbiGu3DVifuduA+34DbcgWu4C1dduN+F+3ALbsMduIa7
cNWN+924D7fgNtyBa7gLVz2437PifwDwPC2w
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz0tIVGEYh/Evu9kiEq0cxEhNUqKLZWam5ettvN9nHO8ex3uU7lrU5qAI
rdwFmhSHiKSIoEVBBfkFRUlEZJhFBAdaBNpNChcVWNF8wTwDw/A/v/PwMonB
obqeCKXUzJ/v399/n6+5tZGXCydmt0jogXxfmlyqfmV2pCSv+KKH5syOkusX
o1enb4wN7c3yvOvSJmuD2R7JGJ5KPXXfvB8vweVVUyNvzE6QC2cy90x+MTtJ
coau5Z9eMDtZAu9/nM+8bfZOWbu8LSo4bXaqxPjSJ5Yfmr1LPp57fDflk9m7
ZTqm+9H4A7P3ytyHruSMOzGhnSYto56+Fdfs/eI/Pvj5ZvbW0D4gT8eyBmef
mT5d0tZPu2VLZh+Ud4mj395qszPEeyVi3cnt5v8fkoXszvSXcZ7QzpSRJ/O+
fXHGD8v42PD82R3GsyR68eeEJ9b4Ebn1IqlqvMLsbAnEe2N+VZj3c0Tn+ibn
rpp9VLwzozfmUsw+Jider/HfWzR9LlzC3RZ4HjwPng/PhxfAC+CF8EJ4EbwI
7oV74cXwYngJvAReCi+Fl8HL4OXwcngFvAJeCa+EV8Gr4NXwanhNuEtNuNtw
DVe16GvRwzVc1aGvQw/XcFWPvh49XMOVD70PPVzDlR+9Hz1cw1UD+gb0cA1X
AfQB9HANV43oG9HDNVw1oW9CD9dw1Yy+GT1cw1UL+hb0cA1Xrehb0cM1XLWh
b0MP13DVjr4dPVzDVQf6DvRwDVdWuCdY4S5wC27DHbiGu3DVifuduA+34Dbc
gWu4C1dB3A/iPtyC23AHruEuXHXhfhfuwy24DXfgGu7CVTfud+M+3ILbcAeu
4S5c9eB+D+7DLbgNd+Aa7sJVL+734j7cgttwB67hLlz14X4f7sMtuA134Bru
wlU/7vfjPtyC23AHruEuXA3g/sB//w1iR4Eo
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0FlIVGEYh/EPjRZozyKowPaIEDNzyazXZTQdl1HHfTuOmktQF4HVTZww
KgmCCK/aDt1EgZgYSQT1VQQpoWAh2iIn8qIkTCKKNqhoPmGegWH4z28e3plZ
GzhU2BimlOr/+/z3+v8xvffSaN/VkeEICb4h3vaR/qEPZs+Vg6vWnwhzlwf3
Ynn3WD1IuGV2hMQODGWmtK0I7pXy+9zgjY6ZfrWMfq25kjjLfD5S5k2MPWqb
MHud/Ex+HfP+pNkbpPtHZFJ5gdmbxK7qLPP6zN4inbcH4u/2mL1V/BGtzxu6
lgX3Nume330t87TZUfLt2KTnzt0lwR0ti17cfHjxpdnbJfyZ/9Xlz+bzMfIx
ED7+5bzZO+Rwe5lndo/ZsdLQe+HNtVNm75TmM1FPGp+a3xsn/rQDU0d7zfeL
F9+nBdM9j40nyOaiscnWe8YTxbOxOlrum71Llh7vmjc8ZXaSnAgfP5v/1uzd
kjN4ZOJ6nPm/k+X7moV9pQ+M75EO/6/IOWNm74VLqNsCT4GnwFPhqfA0eBo8
HZ4O98A98Ax4BjwTngnfB98Hz4JnwbPh2XAv3AvPgefAc+G58Dx4Hjwfng/3
hbr4Qt2Ga7gqQF+AHq7hqhB9IXq4hqsi9EXo4Rqu/Oj96OEarorRF6OHa7gq
QV+CHq7hqhR9KXq4hqsy9GXo4RquytGXo4druKpAX4EeruGqEn0leriGqyr0
VejhGq6q0Vejh2u4qkFfgx6u4aoWfS16uIYrK9QjrVAXuAW34Q5cw124qsP9
OtyHW3Ab7sA13IWrAO4HcB9uwW24A9dwF67qcb8e9+EW3IY7cA134aoB9xtw
H27BbbgD13AXrhpxvxH34RbchjtwDXfhaj/u78d9uAW34Q5cw124asL9JtyH
W3Ab7sA13IWrZtxvxn24BbfhDlzDXbhqwf2WGf8DfDdJjQ==
"]]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz2tozXEcx/EfYYtCjE0tjQyN3A42Njvf7Wy2s6vd7f53zq6mCDWZ5e8B
kfIAkTz5o1AuWSlFth/LA2uWR0xp/i1JWYYmRrnl/Fbnfep0+pzX/933nEWB
3cWNk5VST/++/33+f33yjh+YFhzqmSehL8Rz9cHSzj6zI2Vu4c3DY4/Nni2d
zx/5pu6ZH9pRUnWkeaSj3ewYSXd2Ru8aiwrtWEkYqD2e9MPsONk3eON9y2+z
F8vtB26BZ2IvkZ5nD08efW32UvlwP/Hnq5dmL5e3ny+8mv7d7AT5Ejnpin/U
/L6VsmDF6Y9JvWavkv7Kzln+d3NCe40E4ttGBr6YvVam3Gq79qTYPL9O+rui
Lt0dNtsjiaO9X88tM/9vvaiFJ3yR3cY3SMz+F1kRZ41vlPj+wW/e1dGhnSg9
7b+m/jxjPEm6Z5Y9POgzvkmGZ9yb1+E1e7MED6RcHG81O1nOd0W8ueyPCe0U
ue6Jbhs6a/YWqdobeyr5jnk+VY5lnk491Ge2Fy7hbgs8DZ4GT4enw31wHzwD
ngHPhGfCt8K3wrPgWfBseDbcD/fDc+A58Fx4LjwPngfPh+fDC+AF8EJ4IXxb
uMu2cLfhGq6K0Behh2u4KkZfjB6u4aoEfQl6uIarUvSl6OEarsrQl6GHa7gq
R1+OHq7hqgJ9BXq4hqvt6Lejh2u4qkRfiR6u4aoKfRV6uIaravTV6OEarmrQ
16CHa7iqRV+LHq7hqg59HXq4hqt69PXo4RqurHCPs8Jd4BbchjtwDXfhagfu
78B9uAW34Q5cw124CuB+APfhFtyGO3ANd+EqiPtB3IdbcBvuwDXchasG3G/A
fbgFt+EOXMNduGrE/Ubch1twG+7ANdyFqybcb8J9uAW34Q5cw124asb9ZtyH
W3Ab7sA13IWrFtxvwX24BbfhDlzDXbhqxf3WCf8Df+8auA==
"]]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzr1LVQEYx/EflwiXwEqhoUGjIqJXTUsrfSp7UTPLMqurdbqlvQ0NOdny
0BJBY1gQwvkHCqLJpR5qMN1CGqrlNHWHyITAIYiK7in8HrgcPvfLj+fUl272
DRckTf/+/Xn/fb613xoYXdZ6d6VV/rCn18tzc+O5q+z7THG+PLui4mrb/Kbz
1cKjvNfY4/rCxLqZ3KvsU3F+yZPXNRWvttkfd24M9uSus58FH3nRUVvxGlsY
m/pQO517rTVNfal6/s/rre1zsnX8be4NdvtB48TDl7k32r3eybHyUO5N9m6y
5eNod35vi5XeL3xd6vn3bbNnzdUNXfeXV7wdboAb4R1wE9wM74R3wS1wK7wb
3gPvhdvgdtgW22HtQ4e1Hx3WAXRYHeiwDqLDOoQO6zA6rCPosDrRYXWhw+pG
h3UUHVYPOqxj6LB60WEdX2yDHQ5YJ7CHHQ5YfdjDDgesk9jDDgesU9jDDges
fuxhhwPWaexhhwPWAPawwwHrDPawwwHrLPawwwHrHPawwwGriD3scMAaxB52
OGANYQ87HLDOYw87HLAuYA87HLCSxa6DDU5gh1M44AzWRdyHDU5gh1M44AxW
CfdhgxPY4RQOOIN1CfdhgxPY4RQOOIN1GfdhgxPY4RQOOIM1jPuwwQnscAoH
nMEawX3Y4AR2OIUDzmBdwX3Y4AR2OIUDzmBdxX3Y4AR2OIUDzmBdw/3//gVb
W5xP
"]]}, {
Hue[0.7946117974981064, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzk9oz3Ecx/GXnZQL9lPI4WdpsZbmv8389vZv5mfz2+bPmH9fY4YLZxze
JWvOyg4Ovg5bDloJKYU3DlKUi4M/h6+LAyUi7aKQ3zft+alvnx7fV69en4UD
p3sHayQ9//P9vf+dr22tpdGnN67OsuoPaz73pP/LndzTbeRW96fCzdwzbfhx
bc2HidlVF+zsjJGxnsu1Vc+1U11vfrxtKlS9wCavl+/3vMpdtHc/Pze2X5lT
dZ0lne+H6ztyL7Lix++vL7bkrrfi3WmTLydyL7ahB2PPzpRzN9ivh/MvjPfl
brRrl1pfPKrke0vt2+0lo6V7+XubrKEyr+78eP7eZfByeAW8El4Fr4bXwGvh
ZrgFXge3wuvhEtwG21Q7rA3IYW1EDmsTclibkcPaghxWO3JYW5HD6kAOaxty
WGXksLYjh9WJHFYXclg7kMOqIIfVPdUGOxywetCHHQ5YvejDDgesnejDDges
XejDDges3ejDDgesPejDDgesPvRhhwPWXvRhhwPWPvRhhwNWP/qwwwFrP/qw
wwHrAPqwwwHrIPqwwwHrEPqwwwHrMPqwwwErmeoibHACO5zCAWewjmAfNjiB
HU7hgDNYA9iHDU5gh1M44AzWUezDBiewwykccAbrGPZhgxPY4RQOOIM1iH3Y
4AR2OIUDzmAdxz5scAI7nMIBZ7CGsA8bnMAOp3DAGawT2IcNTmCHUzjgDNZJ
7P/3byZmfbk=
"]]}, {
Hue[0.030679774997896203`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjloFGEYxvHHVBYWiutFRJJVgnihRmM883qv8Yob45VNnETjBR5gYZHC
t1YUbbQSBjvtxSAY3iKKEYJLmgWxGCuxE7GwEhV3kP0PfHz85uGZZ1qHr5dH
miRN/jl/73/Pt65Z9359ano11+ovbHTRdNuLWu6Z1v2y9KE8lXu2Vb/3TlTH
cxestjqufKnmXmiV+29j5ddC3YvtzVhrc2HGvLpbbCrruPbuxvy6i3a3r2dw
+n3uZTbx485QZ+Rus/afj9PPt3Ivt5vP+6+WRnOvsGePmqM2mX9/lQ08HFtS
eZ3vr7HynCdPi7fz/1trSxeMFz8+yL0OXg+3wxvgjXAHvAnuhDfDW+Ct8DZ4
O7wD7oKt0Q5rJ3JYu5DD2o0c1h7ksPYih7UPOaz9yGGVkMM6gBxWN3JYB5HD
OoQc1mHksI4gh3UUOayeRhvscMA6hj7scMAqow87HLB60YcdDljH0YcdDlh9
6MMOB6wT6MMOB6yT6MMOB6xT6MMOB6zT6MMOB6wz6MMOB6x+9GGHA1YFfdjh
gDWAPuxwwBpEH3Y4YJ1FH3Y4YCWNboENTmCHUzjgDNYQ9mGDE9jhFA44gzWM
fdjgBHY4hQPOYJ3DPmxwAjucwgFnsM5jHzY4gR1O4YAzWCPYhw1OYIdTOOAM
1gXswwYnsMMpHHAG6yL2YYMT2OEUDjiDdQn7sMEJ7HAKB5zBuoz9//4N+Ff8
BA==
"]]}, {
Hue[0.266747752497686, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzTtIVQEcx/EfGShNUiYODre33Eyyl9nr/nun9rSs9PY4apoNPZYWIfiv
NRQUgpOcJWjosbS4/SUogpagBoPgLE4uN6opogfdQ/i9cLh8zvf8+K8Yutk7
skjS2z/P3/9/v0rpQ9O3zrmny6z6wgqjlTeTL3LX2fTE3Z/zL3PXW8/rqXvt
73M32JLG5umHs7mbbKpu/PbSwYaqm23iTmXuWc3yqgv2qa3/cetM7pU2UHvj
y9d1jVWvtnR2sv5WMfda+zFTXjx/Pf++xYYfjY1/XJX3otV09XWveZf3Vqtt
eVAqduT32+xX1/fnn9fn3mgtG57cL7/K3Q5vgjfDW+Ct8Da4A94Od8I74J3w
Lng3vAcuwbbQDmsvOqx96LD2o8M6gA7rIDqsQ+iwDqPDOoIOqwsdVjc6rB50
WEfRYR1Dh3UcHdYJdFgnF9pghwPWKexhhwNWL/awwwHrNPawwwHrDPawwwGr
D3vY4YB1FnvY4YB1DnvY4YB1HnvY4YDVjz3scMAawB52OGCVsYcdDlgXsIcd
DlgXsYcdDliXsIcdDliXsYcdDljJQhdggxPY4RQOOIM1iPuwwQnscAoHnMEa
wn3Y4AR2OIUDzmAN4z5scAI7nMIBZ7Cu4D5scAI7nMIBZ7BGcB82OIEdTuGA
M1ijuA8bnMAOp3DAGayruA8bnMAOp3DAGawx3IcNTmCHUzjgDNY13P/v37Yw
E9s=
"]]}, {
Hue[0.5028157299974758, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzklIVWEYxvEHV7UQzGyAhG4iUWHSdG3Ot2wy6+bQ7NDRtGHlokVQBC9B
0MKg4C4jDkHrwH2Xd6lEtGkhbjphy6KEgkiIiu4p/B84fPzO8z08Z93IeO9Y
jaTp3++f8+/zpf3R5nLb7YnlVv1gdz+3vFjzJPcSq7k5/HjjbH3Vdbb008e5
wtM8b7BXHx7M173Jvdre/ayvHZhuqLrR3tdWGl/25S5YumphvFJaUXWTre0q
THa2rKy62YpTC4Mz/7zevnZ8f16aze9vsG/3KnduTeXeZBPPmvqHRnO32I/m
5vJMT77XapPFysPu+/n/bbG3rfF6rrys6q3wNng7vAMuwm3wTngXvBveA++F
98H74QNwO2yL7bAOIod1CDmsDuSwDiOHdQQ5rKPIYR1DDus4clidyGGdQA6r
Czmsk8hhnUIOq4Qc1mnksLoX22CHA1YP+rDDAasXfdjhgNWHPuxwwDqDPuxw
wDqLPuxwwDqHPuxwwDqPPuxwwLqAPuxwwLqIPuxwwLqEPuxwwOpHH3Y4YA2g
DzscsAbRhx0OWEPoww4HrMvoww4HrGSxC7DBCexwCgecwRrGPmxwAjucwgFn
sEawDxucwA6ncMAZrCvYhw1OYIdTOOAM1ij2YYMT2OEUDjiDNYZ92OAEdjiF
A85gXcU+bHACO5zCAWewrmEfNjiBHU7hgDNY17EPG5zADqdwwBmsG9j/71/L
3hCE
"]]}, {
Hue[0.7388837074972656, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzj1IVXEcxvGnpsglbwYODhZicovoTdPe/PX+Xmpmb147XTOzpUGiLX7k
2ubi5knajAYhGiL6DS1thRW0xMGgoUhMoqWGiu4p7vcPhz+f8/Dw/FeXb/QM
LZX04vf35/57FjpHi+9L9VO1VvlhtbdGPrU+yb3M5hZel6/P5F5hy1++Gux/
VKi4zpruddfemVhZcb19nRuuWdtWV3GDlUYL3+bf5G60D0t+FscmV1W8xr6s
+2zfH+dusvtvfSKmczfb3WfPO2b/5S3W0vTuYbk3d9HmP47fbh7Ivd6m2mdn
GvryvQ22WLg59uBp/t6NVtM1+WN8On/vJngzvAXeCrfCbfA2uB3ugLfDO+Cd
8C54N9wJW7Ud1h7ksPYih7UPOaz9yGEdQA7rIHJYh5DDOowc1hHksI4ih3UM
OazjyGGdQA7rJHJYp5DD6qq2wQ4HrG70YYcDVg/6sMMB6zT6sMMBqxd92OGA
dQZ92OGA1Yc+7HDAOos+7HDAOoc+7HDAOo8+7HDAuoA+7HDAuog+7HDA6kcf
djhgldCHHQ5YA+jDDgesS+jDDgespNqNsMEJ7HAKB5zBuox92OAEdjiFA85g
lbEPG5zADqdwwBmsQezDBiewwykccAbrCvZhgxPY4RQOOIM1hH3Y4AR2OIUD
zmBdxT5scAI7nMIBZ7CGsQ8bnMAOp3DAGaxr2IcNTmCHUzjgDNYI9v/7F1Rs
erQ=
"]]}, {
Hue[0.9749516849970554, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzk2ITXEcxvEnjUwpKRd3gYYQYroMc73Pz/tgDDPGy5gZzgxzsSHJ7qpf
lhY2JItZHAs3CwvFZkT9yIaaspCFppyGpYXsSN5yT5rvqdPpc57z/J+zcOhi
9/AUSa/+3H+f/64vbe9GbvRUns2y+gtrvPxp/Nf73I12veFusfYm90wbsSXN
pRe5C1adWntafpu7aPcHLrUPfi7UPc+m3fv4uLVhdt1NNv9bdWL0ypy6F1nf
w47lL4tz615sj378nP51Ru6l1tfV2f+6mn+/zMq1B1rluVfYWMtEoTKWn7/S
em5mT74/z/eb7ULpTu/otfz/Snb7w9UFg7dyr4bXwC3wWngd3AqX4fXwBngj
vAneDG+Bt8JtsE22w9qGHNZ25LB2IIe1EzmsXchh7UYOaw9yWO3IYe1FDmsf
clj7kcPqQA7rAHJYnchhHUQO69BkG+xwwOpCH3Y4YHWjDzscsA6jDzscsHrQ
hx0OWEfQhx0OWEfRhx0OWMfQhx0OWMfRhx0OWL3oww4HrBPoww4HrD70YYcD
Vj/6sMMBawB92OGAdRJ92OGAdQp92OGAlUx2E2xwAjucwgFnsAaxDxucwA6n
cMAZrCHswwYnsMMpHHAG6zT2YYMT2OEUDjiDdQb7sMEJ7HAKB5zBGsY+bHAC
O5zCAWewKtiHDU5gh1M44AzWWezDBiewwykccAbrHPZhgxPY4RQOOIN1Hvv/
/Rt3ZVa/
"]]}, {
Hue[0.21101966249684523`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw9kwlYzWkbxk9jSllC2gtZEhJNixbbrZNo35fTcpY6W1HJFiWd+BT6amaS
QpaayjIUUeGzdIxlpiREJesZlJEpJwZjiJnv8j5zrqvrXL/u//2/n/t93jM+
NjlI8hWHw2n85+//318+6vkaO67sXedmCPYPDI8u35VoR6wNn8qiKSdyiUcC
XTNHHV1twFgf540cSwIfExtjxpxvlJoPiM3x+s7231u6iS2gtBLsm6xNPAF3
dO3nNKzUZzwJZQZun8PTiSejc8ihQwv06PkpaOBoj5LEE0/D1k2Zhrv/nWc6
7vXqPR6dQP4ZeF9/IKj5X7ZFRWLXRMvPxN8gMCMmZewI8tvhUs9PWg0cYntM
Tam/p1TrMXbAdxpnmg2Wke6Iquxh/334B/EsOAyqd24cSeflhAG7iudDU4md
8djq5V7ZAmIX5AQ3H9DyI3ZFZUF92jwZ8Wx45U78/GIv8RxsuNx+JXMF8Vzw
R0++JB9pxHgeHLqNDw7MJJ6PzaFO3VbriAGlxtM/i52Nv7ACuJAma081JX0B
KuytG3KrGCsW4Gj26P5OQ9LdENXy4jc3D9LdMKLwtMHkcpqHi9pPTUl3XUnn
YtXUrTphgeR3B3d5gElHFuW7o01w4+3V1Yw5C5GeZHjy8xjSF8L48pNvNTNJ
90D6xlpv3Zuke2BJXfmIyOekL8L9gWL7HzVNmL4Iw887OerzSF+M5TUGFfuT
2LyKxVC4NbeqNtD8nhiaNcX1yFrSPdH5WfXjJUPSvTDT29dquZT6eUEytDDx
UCLdJ2/8ukhdU7OescIb4/cLRUbD6X74INf2jyyXKYwVPnASKMxf6dD7faE2
8vB/oqD3+6LYY7usW5vm98OO3W/Tzv1A/f3w6ILxkbsTWF+OP9IsP3racai/
P7IsH5atqSF/AD4+rXWt7GeMADQJvv59SR89H4Au/U+PrOJNv7AyAMe3XW7Y
UE/vD8S7adO9krnkD8QaJfd81Vc0TyBel0W0ySWMlYEImmHmGBpG+UFwbNmz
qrOW/EFImPqXy4kU8gfBfYjvi/bZ5A9CavOOpoRN5A/GjV+ulRreJX8wSqML
E/Sukz8YJwzjC+y6yB+MNa11/3NUkz8EOldOH9rtyfogBKND/zyb/h35Q9BU
X6Ej7SB/CDKzDw/09JI/FKEurX3FYPtBKFZfnTQ1h0v7CkX+qJg3DwoYK/9h
m4S06nDyhyF7Yb6eVwzNH4b1NrmlpW2UHwbPZXLLlRvZfMowqEeat5pfo/MP
R7KBlPekmOYPx832xqSnErYvRTjq1l/0/uBF+wvHrcqQDQI1+SPw8Z27ji2P
6YhA7jjNMX1p5I/AhyxT97rb5I/AvrqMaa0lZszPg65UlVOygTF4OLVDrbyg
b878PMxaccK1p4zpSh7Oia9u1mym/EiIpOVbXT7R/JFwsM/P6XpB+ZGoOs9b
eySP/JEYSLz68vZ9yo/CnpdLJ1m2UX4UCofVqeOfMVZEYeBiRpKbPZtHGQUj
+eN2vTWMOdE4e2bPM9ML5I+GxaOHbXkF5I/G5h5e9fsiyo/GCLOmMT/MJ38M
PE4WPfyowxgxaDtlM5orJ38MGt6XWX89nvwxWLu48UxuOevH4eNnm7HJubuo
Px+nkiWCntv0++ODe6+3eGkv7Z+P4+VO1y7EkF+AdyJXVZsz7U8Arm/SsryV
dH4CZBw88+rdedqfAKZTTVNWfk9+IYaur3fu6WFsIcRdh+15cyfSeQjh3Blx
VDWW6UIhhugeGiTLo/mEOMZ7E95RxbhUiCs2tcFH7ChPiPC3fddPlDBWCVF1
5ObDQdWUL4L1U4HBHT3KF0H0/TaB8jqdhwiDD1f2R5hQvggVAx6RHJpXIYL5
66Q7OXw2b6kIO7stA8f50XmLMFI7tWinD2OVCEYPAnr+k0L3JxZzK4skXrcY
W8Si18VHq9OB9hkL3d0rSp6lMhbGIqlv8NpreXS/Y6GVH6acf5BxaSw41/Kq
7FvpvsXiuLu52m8VY1Uswvu7+BOb6f7EYbVKUrIlagzLj0P9llnzK6wZIw6/
LdfgTtRgLIzD4Z1PWl/10P2Kw5mzbrMSW6h/HG4Pb12XtZ/6x6Hv3ZsDCRXU
Pw72+jW/rl1E/cXQD8nzzO+g/mLYvhyfPmQE9Rej2Hx/YeRppgvFmGcX9Nc5
FeWLsd+veOMtMfUX49H2oNTDUuovRjt3ybbnS6m/GLwcQ+4ME9aHI0G1/55s
M3/qL0HZyW91/GZRfwkCnEzmNd6i85egpfAVv0Ob6QoJZqiVZdndlC9BalTj
PRd6XimBnpbmHndd9rxKApsi8Wz/A3T+Uuzb1LrOpoqxhRTVHcLQcQXUX4qP
nZm2dv2UL8WWRZOqXG7T/qU4bY3+XXMpX4qfHfgpm19RvhTDvCvSPc5SfynC
te6bJY+n/jLMSVwQYPWa8mUoPDZBt2Ue9ZchpSBU51g57V+GVJPegX111F+G
4TUZfpW1jEtl+DD4RkbWLsZKGZZFm40aYjyW5cuw6YXF5CwNxhw5hmaaFD4w
Y2whR42Dp3XWfcqX4/7WtkdPdJgulENfVPRTdDXlyyHgN/4SOozppXLUpfr6
HLtI+XL4B9rmFz2j85dDyT95WD2d8uNxc9qbfFc3yo9H06TCBkn9GPwN26NZ
VA==
"]]}, {
Hue[0.44708763999663503`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0FlIVGEYh/HPolAiyKUsMNKSsIXcy7TyzX1JUzP35Wgu00VEUldanJsI
KvAiytKk04JJdNVyZciHZAstRIkiaJ5uLIqiCEJbaKH5hHkGZPj7m2feoxGN
B0ua5ymlHv/9+ff+//U59Utwz4Lmr8Hi/YX0r7qYeX10qXf7y+WKM+8WB5q9
RLpnxsITXod4d4hkPuirCnhhfLm0TiR5hl6ZHSYnbkfPui/NDpcH50YXfw8I
9e7VMjw0b37kQrMjpaDtRvz4gPn8Wnnq6YmamXueKDly4En3yo9mr5eR2IH2
2bdmb5SA45MpZ2+bvUn8p2vvDt8zO0bur+t4Uztkdqxc+jTo9L83O06Krpyf
+DVodrwkbwjtnbpj/j8Jok+lpI5MmJ0oQZ29gY1bl3n3Zjk9u6Yt9Ynpt0jE
oqTq55/MTpLsZ6c7Ze77t0rFsdJraWHm70+WyuhbP25Omp0iftbPRyrU7G1y
6Fte4odps7dLe9zRkq6H5v4O6SkOjMrzM54qF1Tf+FjQcu8WudoR3TV52Ltt
kd/ZfWMxK8znd8rUSb98z6z3+eyd8DR4Gjwdng7PgGfAM+GZ8Cx4Fjwbng3P
gefAc+G58Dx4Hjwfng/fBd8FL4AXwAvhhfDd8N3wIl+XIl+34RquitEXo4dr
uCpBX4IeruFqD/o96OEarkrRl6KHa7jai34veriGqzL0ZejhGq7K0Zejh2u4
qkBfgR6u4aoSfSV6uIarKvRV6OEarqrRV6OHa7iqQV+DHq7hqhZ9LXq4hqs6
9HXo4Rqu6tHXo4druLJ8PdzydYFbcBvuwDXchasG3G/AfbgFt+EOXMNduGrE
/Ubch1twG+7ANdyFq324vw/34RbchjtwDXfhqgn3m3AfbsFtuAPXcBeumnG/
GffhFtyGO3ANd+GqBfdbcB9uwW24A9dwF65acb8V9+EW3IY7cA134cqD+x7c
h1twG+7ANdyFq/24v3/O/wBRUWOx
"]]}, {
Hue[0.6831556174964248, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0FlIVFEcx/FTPWRJUKgVEVEuFRGppWWL+XfXxnXc167mCkGa0kNBXauH
oiTooR26YBSRpERSacEpCloeJPUhjOKW0EPRqvhQYAvNGfA7MAy/+Zzf/O6Z
FbV7vPUzlVLP/r7/ff5/fUsIjE/Z/NoNEt8XMuANv3bmTogvB0h6S1TH85cm
z5ew0sCu3qcmB4vn9EDuycFgX14sv/sjo899MHmp3GrtCj3wxpxfLsN9X0ff
dZscKsOXej7abQt9OVz2JkXGvvX3V0rH+X2PL88w51eL58nxmB/vTF4jaT37
j4QfNnmtjL5aNt6SY/I6kYKArNpsk6Mkr2e3G9RjcrQcq1lVP/O6uf96uXK+
80T/YZM3yMXm2RWnbi3w5Ri5/b7y081hk2Pl7Puw70e/mPMbpeNu1Vhbp8mb
pO1C/NC1bpPjZCrj0NwQ/+9vloiHk1V9j8x9t8hIgmfOvETzfFsl1f48+POB
8W3yK/Rq65dM4/HSm7vxzGL//bZLlj3RHn3E5AQ5ODnxam27ySKjjfdjeod8
2RY5u+mFzvP/X4kyVRh7L+6D8UQZvxExqzp4kc+TZGSZd8nqMd/z2EnwZHgy
PAWeAk+Fp8LT4GnwdHg6PAOeAc+EZ8J3wHfAPXAPPAueBc+GZ8Nz4DnwXHgu
PG+6S950t+EarvLRz0cfruHKi74XfbiGqwL0C9CHa7gqRL8QfbiGqyL0i9CH
a7gqRr8YfbiGqxL0S9CHa7gqRb8UfbiGqzL0y9CHa7gqR78cfbiGqwr0K9CH
a7iqRL8SfbiGqyr0q9CHa7iqRr8afbiGq53o70QfruHKmu7LrekucAtuwx24
hrtwVYP9GuzDLbgNd+Aa7sJVLfZrsQ+34DbcgWu4C1e7sL8L+3ALbsMduIa7
cFWH/Trswy24DXfgGu7CVT3267EPt+A23IFruAtXDdhvwD7cgttwB67hLlw1
Yr8R+3ALbsMduIa7cNWE/Sbswy24DXfgGu7CVTP2m/3+B0Xa6As=
"]]}, {
Hue[0.9192235949962146, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1H9MlVUcBvCT+QOmliUoWk3NQsJCjRIUxYeLgqDovVy48qt41QAhxFJz
LVueZjSNXdRiFljxasac4syllqlxLA30j6I0df7qRipOh7IRqSNmNd+vzedu
7O7D8z73OZzdMWLeovSCHkqpI//+/Pd+59U+pXLtiUXfxw6C8wvktXcczx4n
DkJu7eGLqcdCHQ9A069LUzcdFYcg4ePGxt7N4jDom0F9bjeJH0XI8e/6rywR
D0f9g9F1LZb4cdy7/wTth9N+BO1H0v7TGN2jaIS/JcRxFBZv9HUVtorH4ual
feELOsXjsCRyVOVfr0n/WYQdxurKu+ePRtEYV8GwYw87fg5DZ2Z3HsqX/HmU
RZZO8V8Sj8fk6l75UTvk/DF4YM/lt8sHDnYcizHny4+3PSb5BBxeXnxhG8QT
sXSZKY7JEceh0ndqSO774kkYPa5jk10onozkT0pHHfLL58cj9vybUdc+F0/B
hAMV2y5eFgONu2uX51WH3bEGBp2sytmR6FglIGJw5/oeR53ndQLCo/y7G4ZJ
7sKWjnPx11dI34UTdo17+zrJE9H+acjyD6okT0R02oaDyTGST0VLouX6/TPJ
p+Ln5jk/3mqV803DI2fTqnqVyf40BNf+tuuZkdJPwo37rLx5eyVPws6nSt2B
NyRPxsLxOqMkTPJkNF89dWXHGbmv6fB0vBIX2uVYT0ddU+uFhgnST0H/Raer
L0POl4K5a3ruD/1a8lScjB47seHu/aXioVHzl7gihjj5DKyI27fx3SzHegbW
hNa82qdb8pnweA6edn0k+UwkV8x5Kzte8jR4i6O/HZ4ieRpKrtt9d38j+SwM
iDlzNXiX5LNQf2SzZ2+O5LNRVd8QFF8m+WwkD7rdL32xnN+NhOq2zuBjzv3A
DV/brsprRv4eN4K712Ud7O30jRsVe/D6k13S96AgvCC0Yq2TwwO1um/1/R7Z
82Br897SszXO88aDDSU7tzYkyfnSUVx+Qwdvk346vjpwcmW9X/rp6Jqs2yI3
y3466iZub1oh96W8SMIkX9Mt6XvRVbewdpl3qNP34oufepUNjXNsvFiQlf1H
6SHpZ2DL3FTXyMFOjgz8sCozdn2R9DPwZ+Pq7l/80s/AmKyIlaE9HatMhHhb
MtqN7GfivVWTBhT+LfeXiSVWUNVa+f6YTOQHuaPsd+T77UPuyx/un33O+X8B
H66k7O8+sdCx9uHLfsW1/vqBTp+s5txrkDXZkFUW9cmabMgqm/pkTTZklUN9
siYbssqlPlmTDVnlUZ+syYasXqA+WZMNWb1IfbImG7LKpz5Zkw1ZWfd6OBlk
i6zJNtmQA2Q1l/bJIFtkTbbJhhwgq3m0TwbZImuyTTbkAFnNp30yyBZZk22y
IQfI6iXaJ4NskTXZJhtygKwKaJ8MskXWZJtsyAGyKqR9MsgWWZNtsiEHyKqI
9skgW2RNtsmGHCCrBbRPBtkia7JNNuQAWRXT/v/+B5f6WKM=
"]]}, {
Hue[0.15529157249600445`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzVlIlFEYh/GDhUVFaGl5kWVR0iJR6VTm9qbZuIzruGRun2OjFsW0XBRF
8F1EdRFIYBjd9NEmlQQREUXFgQg0Ig3SNqLPdooWCLIuogXnCD4Dw/Cf33l4
5wZC5cEIpVTvv+//35HPt6xlH65eHj8QLeE/pLFktn/c/unhPVG81YnPpzpm
R0nHxxM3u6/EhHeMePa9/TN43ew48Xu6LubdNHuWXA/0n5t0z+wE8TxrHX5z
Pja858nd1CUt8V1mz5djhz526gfmfaLs2dnwe/trsxfKz8c/bkVHmfeL5UfM
gpfJEWYnyYX4bXvvPzHvl8rQBTnSN7qXSfpgZFXpgNnLZdfn9xGx0aZfIWnJ
vd7YPuPJsvXTjUsvhqaFd4rszjzt3/HFbI+c2dcZWV9q+pUyOTjh3dPvpl8l
p5IKXl0ZNr5afh0cuLG/x3iqhHoeJNQenRHea6RjS8bEeUkzwztNutvvDBaP
ero8/Xo0tFWMZ0jIlxN3eJXZmRLbn3q2JmB2lpye8qjteL7ZIu3elDnxM+JG
ti1y4Pb09pMzja+VRb5rDy9mh7e9Fp4Nz4bnwHPg6+Dr4LnwXPh6+Hq4F+6F
58Hz4PnwfHgBvABeCC+E++A+eBG8CF4ML4aXwEvgpWNdSse6DddwVYa+DD1c
w1U5+nL0cA1XfvR+9HANVxXoK9DDNVxVoq9ED9dwVYW+Cj1cw1U1+mr0cA1X
G9BvQA/XcFWDvgY9XMPVRvQb0cM1XNWir0UP13BVh74OPVzDVT36evRwDVcN
6BvQwzVcNaJvRA/XcGWN9QRrrAvcgttwB67hLlw14X4T7sMtuA134BruwlUA
9wO4D7fgNtyBa7gLV82434z7cAtuwx24hrtwtQn3N+E+3ILbcAeu4S5cBXE/
iPtwC27DHbiGu3DVgvstuA+34DbcgWu4C1etuN+K+3ALbsMduIa7cNWG+224
D7fgNtyBa7gLV5txf/Oo/wUhQS4N
"]]}, {
Hue[0.39135954999579425`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0FlIVGEYh/Gv3S4icaxEjNwoiRbLzEzL16Ux921ccj2Ou5RCQRdFcFCk
rrwLNClOIUkRQRcFFeQXFCURkWEWEZzoIsg2KYwWsKL5BJ+BYfjPbx7emYny
d5e2LFRKjf19/nv9//iSllZxPiZ3xiOBN8Qz3Pl9+8tVgR0kMT+OhMeGmh0s
F0/2nTj8JjSwQ6UkaDhrcNx4mHybHpouem52hMTO+kK6J8yOlCvnQhYlrFgT
2NHypOnCSmu52bGS2DMSd/SO+fx68c8sGOmd+z5xcvZ40uahz2ZvlNTuyxnH
3pu9SSrf/jyTdMPsLbJkZm2wf9TsePH4EgZn7pm9TT6cfnBrw0ezt8uop/n+
wF2zE2TiXVNs4k3z/+yQmr6wtlnX7EQp7+z6dC1ldWDvlEf9yV3jj02fJPHL
Rt3cabN3yeuovq+vtNnJ4r24cOmhdeb375b3KY0Jz8LDAjtFeh9O+raGG0+V
gf6eyVMxxvdIyNSvwbA1xvfK9afRhQP5ZqdJZYTX8zvffF5Ep/mGJi4Fti3i
Heu7OrHBeLocfLG4/PZUoLfT4RnwDHgmPBOeBc+C74Pvg3vhXng2PBu+H74f
ngPPgefCc+F58Dx4PjwfXgAvgBfCC+FF8CJ48XyX4vluwzVclaAvQQ/XcFWK
vhQ9XMNVGfoy9HANVz70PvRwDVfl6MvRwzVcVaCvQA/XcFWJvhI9XMNVFfoq
9HANVwfQH0AP13BVjb4aPVzDVQ36GvRwDVe16GvRwzVc1aGvQw/XcFWPvh49
XMNVA/oG9HANV9Z8j7Tmu8AtuA134BruwlUj7jfiPtyC23AHruEuXPlx34/7
cAtuwx24hrtw1YT7TbgPt+A23IFruAtXzbjfjPtwC27DHbiGu3DVgvstuA+3
4DbcgWu4C1etuN+K+3ALbsMduIa7cNWG+224D7fgNtyBa7gLV+243477cAtu
wx24hrtw1YH7HXP+Bx5ofzg=
"]]}, {
Hue[0.6274275274955841, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0F9oTnEcx/FvJG4UM0u4GDHySDY2/8bzfWbz39iwjRnHeNhK+XMxiukr
F8udKzfWOjcu3LCU+VPqG2uz9CRyodBOj2tNUUrKnzy/9LxPnU6v8zmf8zmd
BZ1nmrOTRGTsz/n3+u/4kn7TNpLPPZqphRt6NtN+J9c7q+Bpeu5D+UjqZUnB
M/T2/YmxgdHgUn2+uOHe5Sfh+Tn6eryvaeqL0oLn643v6eH6H8HlmrvwtuLz
rdkFL9SfrUNzpw+WFbxIa7un9GceB1fo1ZZXS/p7gpfqtetfq7J9wct0aF7X
wJVn4X3L9Zenyr7dDV6hNZcm53s+hv2V2lvZ3pH+FL63Uk+/m8im8sFV+mC8
rufi0+BVmi85n6u8Gbxah6sHG98/DP+rGq6B18Br4XXwengDXAtvhDfBaViL
bbBkkMNShxyWzchhqUcOSwNyWLYgh2Urcli2IYdlO3JYdiCHZSdyWHYhh2U3
clgakcOyBzkse4utsMEOSxP6sMEOSzP6sMEOyz70YYMdlv3owwY7LAfQhw12
WFrQhw12WFrRhw12WNrQhw12WA6iDxvssBxCHzbYYWlHHzbYYTmMPmyww9KB
Pmyww3IEfdhgh+Uo+rDBDktU7HJY4Qg2OIYdTmA5hn1Y4Qg2OIYdTmDpxD6s
cAQbHMMOJ7Acxz6scAQbHMMOJ7CcwD6scAQbHMMOJ7BksQ8rHMEGx7DDCSwn
sQ8rHMEGx7DDCSynsA8rHMEGx7DDCSxd2IcVjmCDY9jhBJZu7P/3b6HRt8s=
"]]}, {
Hue[0.8634955049953739, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz0tsTHEUx/HTJhUqYpgWiTapRxBEMZ596KEdz3q0Wko9rhn1jEdiQULk
6KYWLEq6xF0REWGlIZEckUiIXRe64m5Z0C6l4hXzj8x3ksnkc7/zy5mZlTvX
3lMqIm//vP9+/nuNNFUPTeieODhFCw80c3ZOOs6nCx6v5fffjM7vC05peW3Z
+8xAcIVevHT5waPPUwueoVH2xt3GbEXBVfq1/l5rW2llwTXa/+vbuMqG4Nl6
5uP3O9MnTyt4ro4+O915qzp4nqZfp7pe5sP3F2hv1ZULw1dDX6gDufjToneh
L9affb0jD58HL9GO2zfPvxgKv2epZvu/NF8/FbxM00/qPjz9EbxcxyYNptpb
gjM6s2yspPZa+L8r9FVzvmT4cfBKeBW8Gl4Dr4Xr4Hq4AW6E18FNsBbbYFmP
DssGdFia0WFpQYcliw7LRnRYNqHDshkdli3osGxFh2UbOiyt6LBsR4dlBzos
O9Fh2VVshQ12WNqwhw12WNqxhw12WHZjDxvssHRgDxvssHRiDxvssOzBHjbY
YdmLPWyww9KFPWyww7IPe9hgh2U/9rDBDks39rDBDssB7GGDHZaD2MMGOyyH
sIcNdlgOYw8b7LBExa6BFY5gg2PY4QSWI7gPKxzBBsewwwksOdyHFY5gg2PY
4QSWPO7DCkewwTHscALLUdyHFY5gg2PY4QSWHtyHFY5gg2PY4QSWY7gPKxzB
Bsewwwksx3EfVjiCDY5hhxNYTuA+rHAEGxzDDiewnMT9//4NUvtBRQ==
"]]}, {
Hue[0.09956348249516367, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUtIVHEUx/FDEUQRjGVS4MIsKmqItLJ3HtPG7K09LO1xNc2ZjQXRpsLO
psAiMMRFRHArIXpQGyEIgrMxe7iJQLLVpW2LDNI2LSqaPzHfC8PlM19+9yxq
P9vUOU1E3v75/X3/eyaqU9/e9965VaT5P/RuxZM5QwNz856pfRemspOX5+Wd
0utTen6wO7hY07/6b365F7xAv1c8/Xq/vDjvUo2rXo23ZYLLdCB3pWbxy+By
7Vv483FXUUneS3SoZ0b3jWXBS/VHT8Ps3tH5eS/Xuv5nrZ+Hg1fop8rJgWxL
cFonRuuHH4yH76/S5szYw/5c8GotyT5PjZwLrtAP765eKp0V9pW68rZde/0x
9DU60vLm4vQXwWu1ozb9aHAseB1cBa+HN8Ab4U3wZngLvBXeBlfDWmiDpQYd
lu3osNSiw1KHDssOdFgy6LDUo8OyEx2WBnRYdqHDshsdlj3osOxFh2UfOiz7
0WE5UGiFDXZYGrGHDXZYmrCHDXZYDmIPG+ywHMIeNthhOYw9bLDDcgR72GCH
pRl72GCH5Sj2sMEOyzHsYYMdlhbsYYMdllbsYYMdluPYwwY7LCewhw12WE5i
DxvssJzCHjbYYYkKXQYrHMEGx7DDCSxtuA8rHMEGx7DDCSztuA8rHMEGx7DD
CSyncR9WOIINjmGHE1g6cB9WOIINjmGHE1g6cR9WOIINjmGHE1jO4D6scAQb
HMMOJ7B04T6scAQbHMMOJ7BkcR9WOIINjmGHE1hyuP/fvwGO1k+S
"]]}, {
Hue[0.3356314599949535, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzt9rzXEcx/H37MLSZNjkYmrTMqHlmF8znLcNwzDmxzjHme82G652oZQL
9b5SjmYckt3oe+PG2J1mNXm7IC4oN9ooffMXzA1qLpDzSXt+6tunx/fVq9en
tnews3+eiLz98/29/52ZdGqyeTZfWqHFH3p16MbItcHFRZfpVO2t0p/54ArN
LrwyOnJvSdGV+qKhfGz88tKil+ts/mZmeFFl0dXaNTrxo7wxuEanO77+Gqqv
KnqlZkpyM733g+v0Xe33talHwau0ruXT8ztPg1frx4b3K2wgeI0W0j2FN7ng
dVo/VvXq8Zew16DZh5/bvnUHr9f21w/yqQ/hvSldsKx6ojAdvEHvXnp2fXg8
uFEL88smm24Hb9SXrX0lU0+CN8Gb4S3wVrgJ3gY3w9vhHfBOOA3rXBssu5DD
0oIcllbksOxGDsse5LDsRQ5LG3JY9iGHZT9yWA4gh6UdOSwHkcNyCDksh5HD
0oEcliNzrbDBDstR9GGDHZZO9GGDHZZj6MMGOyzH0YcNdlhOoA8b7LCcRB82
2GHpQh822GE5hT5ssMNyGn3YYIclgz5ssMOSRR822GE5gz5ssMOSQx822GHp
Rh822GE5iz5ssMMSzXUNrHAEGxzDDiew9GAfVjiCDY5hhxNYerEPKxzBBsew
wwksfdiHFY5gg2PY4QSWc9iHFY5gg2PY4QSWfuzDCkewwTHscALLAPZhhSPY
4Bh2OIHlPPZhhSPY4Bh2OIHlAvZhhSPY4Bh2OIHlIvb/+zcHtkSl
"]]}, {
Hue[0.5716994374947433, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0E1sDAEYxvE3vbRxorZUQpSIICKtZYvSvvVZ39oupfUxytImFWzi5ODt
xUkkwgFJY2gcXVT21nhVIujBoSIhTcxGSOrETdJsfMQM2f8kk8lvnnnmmcyi
3vMduQoRefX7/HP9e3xrebf8UbFvdJbGN3Qk+HojNzg7dpWm2y4O599Ux56p
ze2v81PjiVOa/THx9ONo8nytZl80vu0aT8WeryP3JwsDpcR12lAYWFjxoCb2
Yp1ecLNj+uec2Es0M3Vp6ErV3NhL9cJEa/7q5SRfpv25W6mma4lX6NCzD+nu
l8n7VqqODd6++zjxKs2UKqu/F5P9en0+WXhoX5LvbdDKT/eun/uceLXWF+dV
vPfEaS2M9dQ+uZN4jQ7XzCjl//2vtXAGboTXwevhDXATvBHeBDfDLbCW22Bp
RQ7LZuSwbEEOy1bksGxDDst25LDsQA5LG3JYdiKHZRdyWHYjh2UPclj2Iodl
H3JY9iOH5UC5FTbYYWlHHzbYYelAHzbYYelEHzbYYcmiDxvssBxEHzbYYTmE
Pmyww9KFPmyww3IYfdhgh+UI+rDBDks3+rDBDksP+rDBDstR9GGDHZZj6MMG
OyzH0YcNdlhOoA8b7LAE5a6DFQ5gg0PY4QiWk9iHFQ5gg0PY4QiWXuzDCgew
wSHscATLKezDCgewwSHscATLaezDCgewwSHscARLDvuwwgFscAg7HMFyBvuw
wgFscAg7HMFyFvuwwgFscAg7HMHSh31Y4QA2OIQdjmDpx/5//wIKDUqg
"]]}, {
Hue[0.8077674149945295, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlAk41Xsexk9CaVG3iKxHXKKSuqHTwhuRNRz71jnnfxaH6eYmmbZb55au
UVqpFB4a0oKUapS2U25dHk2lXKVlQosKpaHrdEMz88zv2/PMeJ7zeD7n/b/f
97v8seKShXItHo9X/+/Pf37/96fHXVPd8eeF+wzAvsCH8zsyfk4jHgnuh3n5
mWMNGY+H67ThBnkdxAYQ9RV01n4gNsYbGB9+vGkSYzP0/VPu9vtkI8Z8HFg8
+HrAlHgKzF7VlM3fRc/boGxW7YrCQmJbvPzh9Mz6Z1R/KhpvTbdKrSN2wGmZ
YN2JAep3Oh7vLkn10CZ2RL/uIXfX4cRO8ND+HCrRJf8s/O/8s/9v/u8wtapr
QbCUeA4iTy+zfvuR2BmCdfOOdzpRPRfoPzk93uQ96a4w3+bsMUNvIuO5+Kvv
rVgfQ2IBXoZ6cH1y8s/D0dqJEs6SeD5OcuK1L+bQPhYgK9Mow2Ia6QuxO6Kj
9W/FpLtBoIhOPLWQ9uuOI0+v3z7xVQfUbX6i4hCmqwAn2cu/cMH0/CIseaR4
o7uG9EVQJ4oPhK0m3QO1vF/9c+YZM90DdV+O/eRH9XieOFVg71n+mvyeCLbL
OJh9lfIX4wLPgpOeYaxajJP39UcsOES6F6ZV+nm9OEq6FyzSUgq3aVF9b4xR
5EzPNaB8bxjMuDOOu82YtwR2662j07pIX4IFdm213zSR7gN53i8VHSMmM90H
ns5J2169Id0XnqtvDTtjSbovCleUpVhISfeDyYR5DpYPqT8/XBlZpFr5jPr3
h1uU0Ujr2aT747c/Th51Mic9AJZGh8JMPWg/AZggF7Sp7tH7EAhP1cY/TTBn
91UFwjH9VdhkY7r3Ujj0vDveQO+HainSi7Z22X9L9YPgLa2JMft6vyDszzOz
Tsql/QUDz0btGTGHzYNgNCwpFBp70bzBGKbX3pTSznR1MMxv580uDqD5Q7Ai
a//yrm7yh+ClQPDMfgr5Q6CbXRw6xJkwfwhq8+/X1+cwnSdE4NTcrBP7yS/E
Nf2QUx3XqV8hbny+WyDTpnwhfOuC0s1fU34odnaPO58pI38oLJvrNck/0r1D
wUV8vPr9KPKHQuvAh/AdW8gfBr4wYH6NM/nDcHyIizmmS/2HoSpS1Ow+jLE6
DO3ru3IGzKj/cBS+6690eEf+cHRWhLlq9VL/4dAurxrzPobyw3HyxenGiaso
PwIFBzUVi8zJH4GbJ3183cZS/xHYZnHF520B+SNwS2Z2beEg+SPhtm6yzHEp
y0MkgtQazcyv+49E6vDeM1O7qP9IeC3K2R0zQP4o7J3VNCN7DdMRheDOrnGy
H9m9VFEwqdujd+erPwo1l401Ke5M50Uja/OusWapjBGN1VZGs97vIX80hJom
RXUT3T8ai+73nBhwMWX+GARbPrZ81kP+GNx4u7O8VGHG/DF4U3p16w4Ve14d
gw3LM0tvl9D+Y3EoyTcy0Z/8sbjh/IufzkrKj8Ul/bnNZxspPxZJ5k09g3xW
nxeHIw0dN5/eZfURh7Q1vUO931F+HNLtAow74xir43Bz0/azgZnkj0fuT0/s
mtPIH4+LH9THzyUzVsXDPnnu582/Uf/xGLxY3DJoRv5lWNA46eyEO+RfhrZS
zcy8QvIvwxYT17shfdT/MgjtNgwEltP+Reg516ez05DmF6HM9PWoySl0fxGU
OVGa2jryi5Df/1DUqSa/GLoNRaH2QYz5YqhfjssYc5PqifHUz6oy1ob1IxbD
0Mvd+k437VcMocpN+/t3jIvEcDAoq+85T3li/L2iuzFiPONWMdIsJz0/Npby
JXAYtDP06Gb98iXg/Xqqv/o45UuQnhSz+aElY7EEuf778u2LKV+Ce48KlIfi
KF+C1KxPnkobypfg25IWTfleypeguFliYNNL+RxqzzSvrV7L5uNz+Lmko6p1
Kd2DwyZUl44fonwO/U56thsUdB8O+aOtcvwd2T2LOOgmq/0dvOl94bCxP35V
ejrjVg4Nj4IuNeyl+0vhYvm6ZcITxnwpEjdVjSnoYQwpnHOjK9vrGIulaKhM
KdKLM2f5Unx67t14OJtxkRSz0lpCvUYzVkuxf9jzlKPtlC/FpMS35ZotlC9D
r8f06yUXaX4ZRBrfNsEjml+Gdzd01F9K6P4y9K1qHrnYmeaXIbvCuuiCFs0v
g5RfLnvwhd53GYZcDuu0XGPcKsNYK/sNmfn09y+H0Pah7ZEIml+O2XGX93A+
NL8c32xJNOqOp/nlOLruQexSI5pfDj1/Pm9uMM0vxzXJdqNx/bR/OUa17otd
/gfNL4dzD5/LPkbzK1CWd/f5SD3m5yvgmDxpvUZE+QoctNl44R95lK/AkL2x
ojGE/j8okD06fMZVqlekgG1V0LnptyhfgQfiZNGlq5SvwF3TXjfXVJbHS0CP
yRVdfReaPwGBox/WOFI9JCByk0vQmSTKT8DG/YZJE5soPwGy1ssCb1PKT0CJ
YFtKAOj+CbCZWfhZFcW4NQGV+fd2vt1F+Uos/71qa0sNza/ErlEZxy6eZQwl
zJfIP35YbcHylVi5MdBFK4SxSgnXzPPjD1swLlLCt7Q1TlBN+UokZ9nqj66g
fCXKz34a3DJE+0/EuSk6bepHlJ8I3wxXi+1XzPEvUcxV3Q==
"]]}, {
Hue[0.04383539249432289, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0FlIVGEYh/EPCbEMkrSalgtbkIiIyVxKc3o1d20ctcxc8qjZYoG0gLQY
J+ymmyJoo6hOVFjQQkQXJtQHtmIYeKEWSEdaEMqyGyNaqOh8gs/AMPznNw/v
zMytayppCFNKPf/7/Pf6/zGyaldfVEvG66nivSGxB1NTarvMjpDH1+bvabwb
7e0o+RzsjPCdMTtGIhNq2n19Zvvkpc9/8OS9ad6eI8NDT29ED8R4O1YOB98P
jVw3Pk+GH86+2L13urcXSNbI6KmiVrPjZO7Sn/ceje2FEnn0evKPPWYvkkB/
zqXyZrMXy7dzg762QXNvifSE9XSPfDfbLwc+5LX7w8z9pXLbF7gZfch4vHSl
HameUGH2MkkszI9rKzA7QZrv3A7tHvv+ifIi8GCg65PZSRIf/zXmojY7WXZ8
vH9rYND8n8ulOXC5dOdns1fIlf2nw6tD5vMp8vpX7+gS1+xUCSW9SX/iN79v
pUSNXg3f3mE8TZqedcdWHjcekBONaRHzFs/w9iq5cayzNzjmIq++HG/aIZ7b
Ir/94UnnU8zn02VizNuWYIPxdJmZ+W5f4RSf5xnSlJUxqb3e23aGTO4+e8Ga
ZfrV0lLT2pHd730/ezU8E54Jz4JnwbPh2fAceA48F54Lz4PnwfPh+fACeAG8
EF4IXwNfAw/Cg/AieBE8NN4lNN5tuIarYvTF6OEarkrQl6CHa7gqRV+KHq7h
ai36tejhGq7WoV+HHq7hqgx9GXq4hqv16Nejh2u4Kkdfjh6u4WoD+g3o4Rqu
KtBXoIdruKpEX4keruGqCn0VeriGq2r01ejhGq42ot+IHq7hqgZ9DXq4hitr
vMda413gFtyGO3ANd+GqFvdrcR9uwW24A9dwF67qcL8O9+EW3IY7cA134aoe
9+txH27BbbgD13AXrjbh/ibch1twG+7ANdyFqwbcb8B9uAW34Q5cw1242oz7
m3EfbsFtuAPXcBeutuD+FtyHW3Ab7sA13IWrrbi/FffhFtyGO3ANd+FqG+5v
G/M/G+5COQ==
"]]}, {
Hue[0.27990336999410914`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0HtojXEcx/FfaHPJDCOxwmi524Zhw77O7GbG7G7Xxy7MPf+R25PLP2qI
WtLMQ2nmuuUWcvy0JBFN1iayRy5/yGVaLbmFPL/V3qdOp895nc/v85zf2NJN
GRW9lFIP/r7/ff5/dcRV3/v09Yp/sHhfSHx46om+50zuKzUDGuq6Gk0Oln55
224+2jPUyyHSFvYw4UO1ySPE9YfOX6tDvBwqb4u+vV9/fZiXx0jBrUN3v1eZ
HCZR1wMij5wyebxsbrpVNvKiyeES+rIje9C64V6eIDPrEptv+41PkjvVYR2H
txifIoGtgZ21H83+NNmYEORv+WJyhHQ5Z06/e2GeN1IqgnT0gWaTo6Rm8o+j
o5pMniHTX1fV3r9g8kzJiPaNq/9szpslEV1vjjedNx4tAZMGNhzZZ/Js2d+8
6/azKcFeniMxA4fvnhpi8lypq8qaXRc8xMsxciFqVGBro+nHSlxSn8d2tvm/
86Qop3306B3G54vfN+vpse7nWyBnX/Uvjb1qcpy0f7r0+9xlk0XGdqbtnNvm
ZVukvePkAV/3fS2UqSkT95756WV7oax309NzN5h9nzzZVRLcYnv3bfskc3vv
j+H15v7jZUf+1mvTnnu/t+Ml+k1E4MEb5vxF8mtkwIy99835i+AJ8AR4IjwR
ngRPgifDk+Ep8BT4YvhieCo8Fb4EvgSeBk+DL4UvhS+DL4On93RJ7+k2XMPV
cvSXow/XcJWBfgb6cA1Xmehnog/XcJWFfhb6cA1X2ehnow/XcJWDfg76cA1X
uejnog/XcJWHfh76cA1XK9BfgT5cw1U++vnowzVcFaBfgD5cw1Uh+oXowzVc
FaFfhD5cw1Ux+sXowzVclaBfgj5cw5XV08dYPV3gFtyGO3ANd+FqJfZXYh9u
wW24A9dwF65KsV+KfbgFt+EOXMNduCrDfhn24RbchjtwDXfhqhz75diHW3Ab
7sA13IWrCuxXYB9uwW24A9dwF65WYX8V9uEW3IY7cA134Wo19ldjH27BbbgD
13AXriqxX4l9uAW34Q5cw124WoP9Nd3+BxxlFwo=
"]]}, {
Hue[0.5159713474939025, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1H9MVWUcBvA3E4WpZQmIVlOzkLBAogRF8eGiICh6LxcuP4ujBggBlppr
2fJtptPYRS1moRVHM+YUZy60TIxDSaB/FIWp81c38td0KBuROmJW63xtPmyM
fXjOc5/3vru74xYuSS8coJQ6+s/vv3//++mekfBRa+ug9iDY/4C+5T/4TpvY
H4HHvx22ulQ8HPUPRtd1GuJAVG08seS72GDbIcjv7jmeEyV+FHm1LRdTO+T5
sWj7ZXnq9mPix3Hv/hO0H0r7YbQfTvtP034E7U+i/SjafxYTBxSP83YG2o7G
0m2evqLL4udw69Kh0MW94uexLHxC1Z+vSX8yQlqwvuru+WNQHOkoHNPxsO1Y
jJ6b03ukQPIpqAgvm+G9JJ6K6TV+BRF75fxxeODAlbfXjBhpexoiz6853vWY
5NPRsrLkwm6I47F8hVUSkyuegSrPqVF574mBiVE9280i2xpI/rhswhGvvH4C
Ys+/GXH9M9s6AVMOV+6+eEVyB1r3167MrwmxcweCT1bn7k20rRIRNrJ384Bj
0k9EaIR3f9MYyWdiZ8+5+BurpD8TJ8wtzj2bJJ+F7k8CV75fLfksRKdtbU6O
kTwJnYmG47dPJU/CT+1ZP9y+LOdLxiNn06r9KmQ/GQG1vzY8M176s3HzPiN/
4UHJZ2PfU2VO3xuSp6B8ss4oDZE8Be3XTl3de0buLxWunlfigvrk/lJR13b5
QtMU6c/BsCWna65AzjcHCzYMbAz6SvK5OBk9aWrT3fubi4cmLFrmCBtl52lY
FXdo29ps2zoNG4K2vDq4X/J5cLmaTzs+lHwekiuz3sqJl3w+3CXR34xNkXw+
Sm+YQ/Z/LbkTw2POXAtosA0n6o/ucB3MleedqK5v8o+vsG05kRx8Z2j6Ujm/
Cwk1Xb0BHfb9wAVPV0PVdUvejwsB/ZuymwdJ34XKA3j9yT7pp6MwtDCocqPs
p0OtH1Jzv0v207Gr/WDZ2S3281Y6tpbu29WUJOd3o2TNTR2wW/pufHn45Op6
r/Td6Juuu8J3yL4bdVP3tK2S+1IZSMI0T9tt6Wegr668doV7tN3PwOc/+lWM
jrNtZWBxds7vZUekn4mdC1Id40faOTLx/brM2M3F0s/EH63r+3/2Sj8Tkdlh
q4MG2lYeBLo7M7ot2ffg3XXThhf9JffnwTLDv3qjfH4sDwr8nRHmO/L5zkLe
yx80zj9nf18gC1dTGvtPlNvWWfhiaEmtt36E3Ser7HsNsiZbZJVDfbImW2SV
S32yJltklUd9siZbZJVPfbImW2T1AvXJmmyR1YvUJ2uyRVYF1CdrskVWxr0e
SwbZIGuySbbIPrJaQPtkkA2yJptki+wjq4W0TwbZIGuySbbIPrJaRPtkkA2y
Jptki+wjq5donwyyQdZkk2yRfWRVSPtkkA2yJptki+wjqyLaJ4NskDXZJFtk
H1kV0z4ZZIOsySbZIvvIajHtk0E2yJpski2yj6xKaP9//w3u21i0
"]]}, {
Hue[0.7520393249936888, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0EtIVGEYxvGXKJhlpd2FnDIRmy52sezmW6N5ydK8Tuo0J8tygiiwRbV6
E8qgoHZFEJ0sIshFgS2Cgm9RSAsXYi1aRGcXRaCrghC60HyF/wOHw+88POf5
OPGe0829s0Tkze/7z/PvNVX5Mv2hbvpGnuZeaCx1r+la6B3T4dnLbl3+OD/n
ubo0WFR3fcjn+TrxpWugfsJ7seZ9c+WDY/k5F+j9F7Eom/Iu1IfdiaJnLQty
XqFD1Y/fJ8oW5lykVW0Ng+0XvIu19lV/6nXCu0Q/1YxcTBd4l+r0qorR/nPe
Cc2u+XmpM+O/v1bPXjkT7xjzXq/2vWTl5Kh3mbaWLVn3ddx7gybfncofn/Tn
3ahTt4ve3vx3/k16Z+TuQCbjvVmvrk7PKf3hXa7Pix80fk56b9HhvvPxp+b/
z1Z9cnL56NijeTlXwNvg7fAOeCe8C66EdaYNlt3IYdmDHJYkcliqkMNSjRyW
vchhqUEOSy1yWOqQw1KPHJZ9yGFpQA7LfuSwHEAOSyNyWJpmWmGDHSwH0YcN
drA0ow8b7GBpQR822MHSij5ssIOlDX3YYAdLO/qwwQ6WDvRhgx0sKfRhgx0s
h9CHDXawdKIPG+xg6UIfNtjB0o0+bLCDJY0+bLCD5TD6sMEOlgz6sMEOlmCm
C2GFA9jgEHZwBMsR7MMKB7DBIezgCJYe7MMKB7DBIezgCJaj2IcVDmCDQ9jB
ESzHsA8rHMAGh7CDI1h6sQ8rHMAGh7CDI1iOYx9WOIANDmEHR7CcwD6scAAb
HMIOjmDpwz6scAAbHMIOjmDJYv+/fwHA8KBa
"]]}, {
Hue[0.9881073024934821, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz0tIFWEYxvEXJbtQ0OUUGiIaURYVZXUyzXy7eCm7ecpKS5uOHfMg5KlN
0erdaOAmWrQLm0WLCEECo7DC72wiqSCICIJ0iDYRiKsIim50PsL/wDD85pln
npmyZG8ilSci43/Ov9d/x3Tt8psF8bK7izR3Q++9rMgUZb3n6Hj+9GTbI++F
Wp143vdldHHOMW3LtNz/emtJzoX6ar1UpqtiORfraH5QsuC9d6mmJr89KLqz
NOcVWjPV1N/71Hulxodvl3+auyznVfr48/WBK/O8y7VB+upHRvzza7V9qkwG
rvp8ndb3DI619vh8gxYMxV4MJb036rVLs35mP/rv2aQlmYn5Nzq9K1QyeRPd
b/3/bNYOV12X/eC9RVePNT8bTvnnt+r3C42Fg7P9++Pa9S683PPG59t06MmP
X/0PvSt1TfHFdPjaeztcBVfDO+AaeCdcC+tMGyy7kMOyGzkse5DDshc5LHXI
YalHDksDclgakcOyDzks+5HD0oQclgPIYTmIHJZDyGE5jByWIzOtsMEOlmb0
YYMdLAn0YYMdLEfRhw12sBxDHzbYwdKCPmywg+U4+rDBDpYT6MMGO1hOog8b
7GBpRR822MHShj5ssIPlFPqwwQ6W0+jDBjtY2tGHDXawdKAPG+xgOYM+bLCD
JZjpUljhADY4hB0cwXIW+7DCAWxwCDs4giWJfVjhADY4hB0cwdKJfVjhADY4
hB0cwXIO+7DCAWxwCDs4giWFfVjhADY4hB0cwdKFfVjhADY4hB0cwXIe+7DC
AWxwCDs4gqUb+7DCAWxwCDs4giWN/f/+DXTyA14=
"]]}, {
Hue[0.22417527999326836`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz11oT3Ecx/Ev0bgR2VhsbTRiIfMwz/5fswczM/42z/Y/NvOQ8jBLWOrr
SsoFbbn8O7mRXSkhd9+h1VIUimg6N9yJsRvlAvn/aO9Tp9PrfM6nz/nNajuZ
7hgrIoO/7z/Pv9fX1Kn5P5sz/VM190LHlVcPv/8QPEELaj5VXH0dPFkvF9d3
lg0E5+vFtputM94GF+qYzmc9Q1/ycy7Shjn3LmXzCnIu1btPFpacOT8t59n6
LlM3qap4es5l+uPN/b6i9pDP1aorLwdv9IX+PB2akp2Z9yC4XE+PjFwo6Qrf
L9Bz2evfxz8O+SLtPfv8VVN3yBfri/TD3tp//1ehJworU93fgpfg/Etx/mU4
/3Kcv1K7jt/pn/goeIXe+njt6eee4JU6XNHiA7eDV8Gr4TXwWngdvB5OwTra
BssG5LBUIYdlI3JYqpHDUoMcllrksNQhh2UTcljqkcOyGTksDchh2YIclkbk
sGxFDksTcli2jbbCBjss29GHDXZY0ujDBjssO9CHDXZYmtGHDXZYWtCHDXZY
dqIPG+yw7EIfNthh2Y0+bLDDsgd92GCHZS/6sMEOyz70YYMdlv3owwY7LAfQ
hw12WFrRhw12WDLowwY7LNFol8IKR7DBMexwAstB7MMKR7DBMexwAksb9mGF
I9jgGHY4gaUd+7DCEWxwDDucwHII+7DCEWxwDDucwNKBfVjhCDY4hh1OYDmM
fVjhCDY4hh1OYDmCfVjhCDY4hh1OYDmKfVjhCDY4hh1OYDmG/f/+BfJuxIU=
"]]}, {
Hue[0.4602432574930617, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlAs01fkWx+nFqDB6UBSnMUYGPUmhvp7J4zgcb8dx3uegSWRS43GPipQy
M3eMR6OJXMOt9BjKo+k6MWXQVHeZzFIqdGWaSiij6THuzLq/3Vo3a1nWx/5/
/9/93Xufw5EkBsunaGlptf/5+9ff//2MbBhf/crjuNt8sH9gxpB0pHgFsS44
Fb8uH91PbAhn/g3n2o/nMZ4Ls4alD7b0E5tgZeOcfk4vsRkGbHOdHg8SW8Ah
oPycoQ7xEqTX1XllbpvL2BKFPWdNFnxCbIWk8tE0+3fpeWsc51qPylXENpBv
2elS9qYfW/gdTf2cG09sj9J4+6uWntT/cvRcG7vReJB4Bf4//8q38q96K//q
t/I7vJXfERlNJis0L6n/Ndg/0vDvOxPETsjSy39nXEbPr0XgQt71M3uI1yFj
MPaWopvYGRs/sxh6OGzE2AXNw9Iwk0Squ8LTlPdo8inxevQcKBTWNFG/GyBa
8kvL9evEgCTpdmruIGM18KwxsWxtANXd8KK+eut2BdXd0M13qrD7muruGPJx
WdyUTHV3PPfjRR4pMmZ1D1w+dfJq/inGag94G6TM8bYxYXVPcEIP3UxPYKz2
xO8Xp17wLSC9FwyetISMUP9qL1zP6d+NZvL3Ro+N1+Tpeqp7w7heaeo/RvWN
4Lt0HlUnUH0j4m+1i+yO0/t9sGhifvdnzeTvA4F/14FpKupvE8SngrJPf0H1
TdjF4U6pOk91X4S5vS62mLqA1X1R9oW2wEqfsZYfdOuKFGunU90PG/JKYpJN
qe6PpmM/OFUW0nz8Ifb2LJyZSv0FYFLPWpglpHoAln0dkffSkvJxcXppznbZ
GNu3mguXYyuffvDmvgIR5GU/19CI6oHY/exfg5wiug8eHM0aZ/04j70PPFy7
EWlvQPtX8/Dcd9qY9SeMNTxUXlxwffMp8g9CgPGPUdY6bB4Igs2gcc3WZzSv
ILw7a/Si4j7LqwmCI+/5iNBkIdMHo7Jrfe74bMYIRtvvrdXRasbqYNicnLBq
c2GsCcadjJ3n1s4kPR9NdvHzBS3kz4ehueXegmTy5+NBpHvTgjNsfho+Eu4n
C4N/pv2FYP3Aw53lDqw/hOA/5vtzKpJIH4IRR4fQ0VWMNSHQ23wnJmM26UMh
qzk5GZZD/qEwutTT8LyA9KE4kaTnuvgc6UNRXFqV8Gks6cOwb8g50+sB6cNw
a3lbSmQH6cMgaa765/1lNL8w+F7Iili4ie4nHKerhq04b/ThcA+vTB/YRPpw
8B6crZtO/WnC4ZHrd4/rR/4R2GuefjEunvQRuNCeHe74Fekj0Fdt0n7Mhfwj
YGYs2Byxg/wjcdSqu2xrNs0vEobxncPV82h/kdijagxbGkP7i0TXel2u5Bnp
o6AvP31g+l7afxQcppoWR6lIHwWlcE/g/Lukj8KjXgFH18mU6aOx+tJHlpJS
xohGTaCrf8oAY3U0FuTWrPN+yVgTjR8UN0O836f7EeA850n+dn3yF8CtwKIw
o4P8BTA6alrbKyG9AGuzzmRWpZJ/DFp73vHNDDdj+hgsSW0rFgYxVscgu8iu
ass+xpoYeA6JDxcOM9YSoqQp6MOKKaQXYif/hcd7edS/EPybr6w9aslfCG1l
/H1TQ9LHor1117LhJMofi3VrQqTa20gfi3LvKsHYNZpfLJyqevc4/kHzF2HA
YHla+kHGFiJ4vE42qr9M+xTh6ZcXdph1MxaJoG/WMVA+Sd9nInzK5Rrkn2Xv
LxNh0rZ8BneC/ER4XNjupNXMuE+EwL6amz+10fzFcI5w68r6mbGFGIOl18LH
S2gfYlxZZFSem07+YvyxeOBDiw/IX4x0G/1XabbkL8Yru5k6Im3yF0Ox4+q2
z4PIXwxDTf+qF9XkL4F76U2B6zryl6CmpDhq8wzylyABeWn3jBmLJJg2admU
fYTuQwLHheZ54kVs3mV/1juHKh4G074kcN7l2GkjZtwnwd88Hoz0K+l+pNgS
mPjktTbbp4UU/TqJRzL5dA9SmKi6f6mTMBZJEWDgv2N2KN2XFHbPovPmbGRc
JkXC7trzcY10b1K8XJOwZd9Txn1S9K55+Y/BCbofGQ4c8g3Xe28R85dBUr9w
/HtzxpDB7/jZx62d5C9DWN39lhsv6L5keJS6OvOjXym/DME584oSyim/DHcU
M2wb/075ZdBuuRcmv0T55fjOtPI3kT7ll2Ps5De5cfT5ghzenPGhK3TvIjn0
L5XNuORK+eVw6IjcEVBC+eW4nHhCt9aT8suR+sjH3e485ZejtTm1ZnwOy6el
gNqidWTAjfIrYJQ1kt4RQ/kVeNHGPy99SP4K3N3+etSex+pqBUzs09I36zMu
U+BC1KOWZG3GGgVS/R3FDd+TvwL+QUUdV2ieWkoU/MYz/7aG8isRmuFaF+dF
+1di2cd7Dpp9Rf5K9KacmFjjT/mVEKa0Leuk+yhTouub5vTD9D6NEldT4pMS
5rF++pQ4vJzz7Y3b5K+CAVda39NF/iroxxnqzlpP+VVImnP0p9nbGItUGAko
vd1dQflV6L98+JDOCcqvgnXtdy3P71J+FfQapLH5xouZvwr5K3qT9zfR/OMw
1umTE2fO6hZxyK7uKaisXYT/Ani3VOg=
"]]}, {
Hue[0.696311234992848, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0VlIVFEcx/FDCwXtOKlpi0lGRUZq2WLWX03NXadyX27qpEVQWNC0cqOM
KOghKmghL0UPrfQQBG2eFigrJYoWyocbEfRQEiWFFW10j+B3YBh+87m/85u5
d2LtWn+gn1Kq7e/73+f/16dF7pivoxJvhoj3hZT1D0sfeMnkwbI7fUJC8InJ
I+XztZB7F06Z7JOuE5vvH7xtcrg0jU8+fPabz8tjJfD01X53+GgvR8mLqd/7
R24J9XK0bKoZMSg2JszLk2R0R6evKNTkyVKQfP559lZz/RTZGiFOdLPJ06Q1
e6+/c7vJ02Xb41tpA9eZPEPKdzR82LLR5JmS6qwOW9Ntfl+cTOuo2jP3u8nx
sv7lufeNv01OkIvX3PyE3jxLWttv7GvuNHm2PM2r+G19MTlRso6sT2p6bO7H
HPkYrC8d2pvnyov2k20R3SbPk2DVvp0Rx01/vvScqB5W12NykjRN2pgXdEd5
eYHkfGmJHPDDeLL4G3Lfvhli7u9CsXyrU6LGm/+7SC529fw8ct9kkXGJR5M7
27zrbZHB19+eufrLnJcidw6lXfZFG0+RobMuxF95bc5PlX4bUiJvpRpPlY41
u5wrD8z5aRJ3LOZj/DMv22kS9IcXxiaZ57lYuosSmt8Fwj1fLC2Zjz7fPmD6
6XK36/T5h+Z52enwDHgGPBOeCV8CXwLPgmfBs+HZ8Bx4DjwXngvPg+fB8+H5
8AJ4Abywr0thX7fhGq6K0C9CH67hyo++H324hqul6C9FH67hahn6y9CHa7ha
jv5y9OEarorRL0YfruGqBP0S9OEarkrRL0UfruGqDP0y9OEarsrRL0cfruGq
Av0K9OEarirRr0QfruGqCv0q9OEarqrRr0YfruGqBv0a9OEarqy+HmX1dYFb
cBvuwDXchasV2F+BfbgFt+EOXMNduKrFfi324RbchjtwDXfhqg77ddiHW3Ab
7sA13IWreuzXYx9uwW24A9dwF64C2A9gH27BbbgD13AXrlZifyX24Rbchjtw
DXfhqgH7DdiHW3Ab7sA13IWrRuw3Yh9uwW24A9dwF65WYX9Vr/8BHYIIPg==
"]]}, {
Hue[0.9323792124926413, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzllIFlEYxvGXFAwqbHFJ8uIzLNoI02xR63vT0jY1lzQzbXJpuYoCuyo9
REF3FWQLEgwREkXd5VXBSUtaxSjRFGrqIlCM9CoJgormEP4HhuE3zzzznLSG
4+XNM0TkxZ/77/PfNRG93rByLLlnnoYvdKT3wduO8wtCz9TUK31xLe/nh56r
tbHfCyb6nRO0+9q3oqEn7vuFmp6aXznZlxA6Vc9d7S0elsTQEa3Im93f3um8
WJNiMivaY5NDp+ujL0Of4+c4L9WPj+tLc9qSQi/Ts9HIrU8XnVfo/cK48e7X
7n+rtGTkzoVFXc6rtbZlsiTvqztPhjbN6nlYNubOu0afLn9zOzrqnKnRZ4PZ
xZPu+yyNCU523jvjvFYvTZW9zKl3ztaqD6OnOqac1+nIjdKau/Fuf73+et42
mJHkvEHT48ezWk84b9SBJQM/f7xzztFXibk3Lw+4/+Xq6bThukiHO1+etlan
NKb0u3wTvBmOwjrdBpYtyGHJRw5LAXJYtiKHZRtyWAqRw1KEHJbtyGHZgRyW
nchh2YUclt3IYSlGDksJclhKkcOyZ7oVNrCFpQx92MAWlnL0YQNbWCrQhw1s
YalEHzawhWUv+rCBLSxV6MMGtrBUow8b2MKyD33YwBaWGvRhA1tY9qMPG9jC
Uos+bGALywH0YQNbWOrQhw1sYalHHzawheUg+rCBLSzedEdghT3YwD5s4QCW
Q9iHFfZgA/uwhQNYGrAPK+zBBvZhCwewNGIfVtiDDezDFg5gacI+rLAHG9iH
LRzA0ox9WGEPNrAPWziA5TD2YYU92MA+bOEAliPYhxX2YAP7sIUDWI5iH1bY
gw3swxYOYDmG/f/+DTv80OM=
"]]}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None, None}, DisplayFunction ->
Identity, DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, 3.741318822564824},
PlotRange -> {{0, 201.}, {3.80280869540063, 7.615180811220651}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, 3.741318822564824},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, None}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM all cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {3.80280869540063, 7.615180811220651}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlAtQlGUUhn9FzDEntTHUMNukvCaaJqZhvICmiAgsLLCAy7/LXkDzUrqW
2uRvjgw2SoC3aRTbRiWvkxkZmri/NwbwUnFJCS+/BMjFFZp2NMuGavbQzHeY
YZiH97zfe853vt2XLMv1tt6SJFX++/vfX99PV1h06OmgvOldbvoHRO7HeBDj
IYyHMR7BWMd4FOOXGY9mPJbxeMavYkNQTcfQgw+Jg/F4UslUU+Rj4snod7i5
/HLhfeLX0Na68/O919uIp+BRsLttZcI94qlMf53lTYM7Jr5uXdtvxCFMn44/
cdbVEtzjf4PVz0CANnPcoKVNxDMZv4n9yxrmP+Pq6ScU3rK1x91La4ln4WhH
d/++RzzEb7F+w9A84z23J6qRGGJ/CtC8xbByeYFGerg4vxKONdMqBhoD60iP
EFmJwIXg+ufPtpSTHimywliazXTG0hymz4G36pXik2tOkv62OI/CWJrL9LlY
79z2pd7bQPo8ps9j+4hi80exfcwX96nMh3FkjqfUr570aHE/SjTTF6B3cOuM
guoS0hlLMbje+G1Gxfrvw3x6DL6o23fg1LB9pC+Euvhgo7n7a9IXYtcw5/SP
JjhJj8XIoqFrwtVK0mOZHofylqr2YytUHyMOGxYttQ6Mov0rcWjfWheS56z2
sRqHd8tSO+wrbpA/Hg5H+ogK53nyx7P3wHSV6ZJePB96eN5fVbt+zxXy68V9
q3qxXylBnAcJ7D4T8KJ/TFVRzmXyJ7D3lSjuH4m4OGpI6ridZ8ifKPajJuKz
QrMuP38b+Q3ie4KBvVcDPukM8Dty+bjv/lUD6z9J3A+S4LnZ3efqnUu0ryTm
T8Ja67WcFO2cj6Vk5k/G/UM7BgQeuE5+xmoyxnp/GO00auRPERkpmLkzwtZc
/Cv5U5C9I7vwndK75E8R+5GMKPXzH5IUWkt+Iwafu1P94MyP5DciMLlkTL4f
nacyllJFRiqeMjeZpq5qJn8qanJ/MTTXN5E/Fbnx4Q9cocRSGjZPK02uOkH9
IQ23yw8/+ak/sZKGU5e2h7WmN5I/jfnTUbOlotf+J5SHdLww/OlvOk0986dj
TFjQBPXjavKn4+6mixO+W9Jz/4tEBmOFscpYMqFrnb+zeAfdF0y4232pK7G9
jvwmlm8S71vKYP4MWGqWrL6Vd5r8GSw/A49yIr3bzcfIL6Pig0bzhWX03nSy
6IeM/nmBW3I3XvWxLIv7V2TxfJeM3/+44A6OqaA8WexXYyyZxXl1jGFGWGv0
5oCfb1G+GX+VTdzYMO8O5ZvF9+kyi/tXWb3G6iWL+N51FvH9wSK+P9kCYx//
4UUFLZTP2MXOUy1insZYyhTn02WKOjLF8+RMNj+rd2XCW3Tj78Gz6imf1WuZ
4v1IVlHXWcXPC6wsn7FiRexub19P0D3Kt4r3obJ6zcq+f2xi/zob+z5gLLN6
xSbux2UTP8+qTexHs4n9SHaxXmfHhxHK2UgXzQPGsh3VV7rcs8e3Ub4d6Nxz
6+bEVsq349hXMZMCQtopn7FmxwnDeb2uqIPyHShRHg7wdt6nfIeow4GjSmTr
s5MfUL4Dh+TJA5tOeyifsYv5VXa+5sCNrc819JpN9VKWeL4uC9qn1ZWDVlM9
ssT+ZaYrjF1ZCNltX/R4T8/8Wags63e7cgH1o2Vh7+DEXbXDSZeyUbjs2pSJ
i+l+ddn/7+sf2yweLw==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd02tojmEcx/F/1grzwinm8GIOsZxtcz7s77EZxo7PDszhnvMklIkkroh3
JIdWi7otwgt5I8fWLlvKRjZebAztJky8cFg5hELPVbq/Tz09fZ7f9bv+V1f3
PWzNtoL13USk8e/332/s8yn9R8fvzx1D6urcHxp2d7g33B9OhIfCSfBweCQ8
Ck6Gx8DjtGJjftXm4sB5grakVUbyXnY6T9IXp4+27W294TxZd5/sGtD61k+P
OUUH7DyX2txV75yKPA37T9FjR/LHDq9+5DwV55mmJ77dGP0wes15OtbP0C3f
aw+M/9jg9p8Jz9J7cc/3HHxS6dbP1sNJmvz4TLvL52h8cFkrchtcPhdOh1UL
h9Wc3nKrI9Y3qj9zHkTiJ7a6/eYhn6dV/b4mXDnU4vKIPuk7bX/9LrfeRHRf
y0V5Wn3f5fPD68187ZGix0+cf+byDOQZyDPD928ycf8LkMOShTwrfF5ZiPMv
VOk4daxnSeDyRdpcPLh6zrbXLodlMXJYspFnY/8luN8lyJeGbZbqzcqkQXGN
r1yeg34O7i8X/VycL0/PZjckNN1+E7PmadaK0u1e5L1bn6dptZ2fEme5eRaW
/PB+Cpt8XVTet37q9U7Xh6UgbIUNbGEpRL8Q5y/UGZe8Phd+fXB9WKJha1T3
3O3a0b71netHtbx9V/G5speuHw3ftxSFn3ct0sTSgSOa0mpcv0ivfhl/p1db
W+x9s7AUh62wgS0sJejDBrawlKIPG9jCsgx92MAWluXowwa2sJShDxvYwrIC
fdjAFpaV6MMGtrCsQh82sIVlNfqwgS0sXthJsMIebGAftnAASznmwwp7sIF9
2MIBLGswH1bYgw3swxYOYFmL+bDCHmxgH7ZwAMs6zIcV9mAD+7CFA1jWYz6s
sAcb2IctHMCyAfNhhT3YwD5s4QCWjZgPK+zBBvZhCwewbMJ8WGEPNrAPWziA
pQLz//sPrU9wDg==
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.7946117974981064, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.030679774997896203`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.266747752497686, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.5028157299974758, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.7388837074972656, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.9749516849970554, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}, {
Hue[0.21101966249684523`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlH9MlHUcx5+UORepGY4wiM5sJkSagZCa8VYxUAGB4zh+89zvY82yTFtL
6lm2moKhYilpdANxJdYg8Qe6vEewQBCJEYJgcggKiEqISjJr2e7DH9/Pbbfb
697f9+fH9/N5nlnGdxIsEyRJOvfo+/+v+/NXeM286iPa34ac9AdEnsz4ScYz
GPsw9mOsYfw84xcYz2E8l3Eg4yDG8xi/wngB41eRV9JhjdTeJw7GtGc2ft1z
52/iEBzrbDozNDJIvBC3PHq9rwQPEIciVPfz1byy68RhTH+N5VsEz8qCEtee
YeLFTF+Cuu8n6nP29hO/zs4vhbPHZ0dYYw/xG4zD8aHv4QuWSX3EQKtqu/9n
cIubFcC87tDj4VNvkb5MrFdZhrr88ylRB7tJXy7WpyzHtJc27dt7s4v0FWL/
ygpoi3aORjdRPilCZCUCW/Nj839IOEv6SpEVxtKbTGcsRTI9Ev695b7GtypI
jxL7URhLq5i+CtYt67YFVHaQvprpq9k81rD+17B5RIvzVKLh9fKUQx4tbaTH
sPnEMD0Wqrl4JHZCOemMpbXI+eq79VW+arhbX4vSxf3NPoUFpMfBklb5XsGV
Y24dcdjrf7f1iu92Oh+H8sA/7iSHnHezynQpHoeTot7uu3bKHQ/x8JpSF/li
BM1ficeaS7WZt8Oa3azG458an6qxgPH6E6CLOjNUOuokfwLbB6arTJe0Ynxo
0V0etiXkqXrya8V5q1qxXilR7AeJ7D4TUdMwwzPJ/xz5E9l+6cT5Q4eDl7w9
21qPk18n1qPq0OZb/GxA2Ry6vyRxn5DE9jUJ/e/uidh/9SjdfxKrXy/OB3pk
GoIWx0bX0fz0zK/HhbL5p2ojzlL+ZOZPRtO2L1IrOtrJz1hNxqdLYjt3D7vI
nyIyUvCwp3dFCHrJn4J6x1iMXnuV/CliPVIqeuWKo4UftJI/FQP+347phpvJ
n4rrD0NOb9/XQ37GUprISMOA3yJng+d18qeh/ctp7aHrr5E/DZ9dLGkvaqb6
pHSEFMyoGouk+pCOojRnb+aBbvKnI/ubp4s/HxmvP535M5C73363K5/yIQOT
750onHiH6lEy4N1oL/3xZAv5H53PuGGMHawhf6bIYKwwVhlLWfCY3tdacpHu
C1n4fdLGuOq5beTPYvmzxPuWZNGvkfHLrOf27/7YSfFkMZ8soytKs3PD1iMU
X0beoeoD++7VutnB/KqM1oTZKb/+2+Rml8zmbxDjawxo2bxhZNPpespvEOuV
GSsGsV8HY9UAj+ATbTOf6KL8BiSMjUZfxvj+GsX91BjF+cMonpfZecUo7rvD
KO6fahT3z2XEzIHL02fP6aP8JpE1JjEeTGI+mbFiEvtzMF1l8Vwm1r+Z9W+G
2ZLr1bixg/KbWf9m9nww3WFmz4uZ5WcsWeDVGb26omq8f4t4H7CI52WL+L5R
LGL9Dgt7XzB2sfOSVZyPxsqeZ6tYj2xl7zd23mHFg60PQwsX9FN+xi4rplbe
/Ci3aoDy27Cs7dqu91XSNTakpq+sr6+9QfkZyzZ84l2avSPoJuW34YHe7/jQ
5luUn+mqDVGB+fNNJ29Tfht8nKalnhHEkl1kjV30wy7Gl+3Y1a1bONpArNjF
+A474rtyfup+jHTVLtbvYrqULbImG91OQ45H4GD4f2suR/o=
"]]}, {
Hue[0.44708763999663503`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVGIQkRDERzQxGvea+H4bjRqNyefq+sBCrGxv
pWJhk0bEYkQUkjJIhIDmghYrFotoaTFYaGOhCNYq+4Hsf2AYfnO+M2dWV2+O
1Nokvft7/3s2rx+VX49vP5jrnq3kF9bqdrgDXgovh1fAnXAXvAZeC6+Du+Ee
eD28Ad4Ib7KOxuLXd55/XGh6s70fn6zXb3zJ7rWJ2pK7938+zee3WFvPoqGH
L+vZW63Svqw69e1Tdh/yfnx/m92rT80Mf53PHsD/bLfZ6ZW9fc8e5XwHzg/a
3PeFmVeND/n8Trhi89Or3jT6X2Sb/X77ZHD01uem3fD9Xa12WEPIYQ0jh7Ub
Oaw9yGHtRQ5rH3JY+5HDOoAc1kHksA4hh3UYOawjyGEdRQ7rGHJYx1ttsMMB
6wT6sMMBawR92OGAdRJ92OGAdQp92OGANYo+7HDAOo0+7HDAOoM+7HDAOos+
7HDAGkMfdjhgnUMfdjhgnUcfdjhgjaMPOxywLqAPOxywJtCHHQ5Yk+jDDges
1OpO2OAEO1zAAZewLmIfNjjBDhdwwCWsKvZhgxPscAEHXMK6hH3Y4AQ7XMAB
l7AuYx82OMEOF3DAJawa9mGDE+xwAQdcwrqCfdjgBDtcwAGXsK5iHzY4wQ4X
cMAlrGvYhw1OsMMFHHAJ6zr2//sP+VLRvQ==
"]]}, {
Hue[0.6831556174964248, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVGIQkRDERzQxGvea+H4bjRqNyefq+sBCrGxv
pWJhk0bEYkQUkjJIhIDmghYrFotoaTFYaGOhCNYq+4Hsf2AYfnO+M2dWV2+O
1Nokvft7/3s2rx+VX49vP5jrnq3kF9bqdrgDXgovh1fAnXAXvAZeC6+Du+Ee
eD28Ad4Ib7KOxuLXd55/XGh6s70fn6zXb3zJ7rWJ2pK7938+zee3WFvPoqGH
L+vZW63Svqw69e1Tdh/yfnx/m92rT80Mf53PHsD/bLfZ6ZW9fc8e5XwHzg/a
3PeFmVeND/n8Trhi89Or3jT6X2Sb/X77ZHD01uem3fD9Xa12WEPIYQ0jh7Ub
Oaw9yGHtRQ5rH3JY+5HDOoAc1kHksA4hh3UYOawjyGEdRQ7rGHJYx1ttsMMB
6wT6sMMBawR92OGAdRJ92OGAdQp92OGANYo+7HDAOo0+7HDAOoM+7HDAOos+
7HDAGkMfdjhgnUMfdjhgnUcfdjhgjaMPOxywLqAPOxywJtCHHQ5Yk+jDDges
1OpO2OAEO1zAAZewLmIfNjjBDhdwwCWsKvZhgxPscAEHXMK6hH3Y4AQ7XMAB
l7AuYx82OMEOF3DAJawa9mGDE+xwAQdcwrqCfdjgBDtcwAGXsK5iHzY4wQ4X
cMAlrGvYhw1OsMMFHHAJ6zr2//sP+VLRvQ==
"]]}, {
Hue[0.9192235949962146, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd01lIVFEcx/E/RdD20IbZ8mAWJe2ZLWbmv2kxW3TGdLK0urYbkUGGIVGH
ot6KaCGQgpsU1UP0Eq1EJyVoI60HNSu8RmXUQ4vQQgUVHoj7HRiGz/zO7/wP
h3uHrSnPX99FRO7//f777fx8yvrR+vtz65Dbt90fGnZ3uA88AE6Eh8JJcDI8
Ah4Jp8Cj4bHweHgiPAlO1bKNsROb44HzZG1Iq4hE29qd0/TlyUNNuxqvOU/R
ncc6Ehrf+lmdnqoJO85Mru+odZ6GfDr2T9fDB2NjkqufOM/AeTL06Ldrox4X
XHGeifWZuuX7rb3jPta5/WfBWXqv64uqfc0Vbr3qgSRNeXqqpTM3qt2Ci1qW
V+fy2WEbWCK6dFjNyS03Wl0/oj9zH0W6TWh08+Ygn6Mn+n/tdWl/g8vnanO/
aXtqK916M1d3N5yXZ9UPXT4vvN7M0x6peuTo2ecun498PvLs8P2bbNz/AuSw
5CDPCZ9XFuL8C1Vajx/uuSxw+SKtjw+uzix/7XJYFiOHZQnyJdg/F/ebizwv
bJOn1yuSBnW9/8rl0XBfo+H7M9Fw30ZxvpieXlTX68HNN64f0+ySom1e5L3r
xzTtVvunxAw3z8KSH95PYZOvOaX9aqdebXd9WJaGrbCBLSwF6Bfg/AWafsHr
e+7XB9eHpTBsLdSqux3bW7a+c/1CLW2pjJ8pbnP9wvB9Szz8vGtcE4sGDn+Q
VuP6cb38Zdyd3k1Nne+bhWVZ2Aob2MJShD5sYAvLcvRhA1tYVqAPG9jCUow+
bGALSwn6sIEtLCvRhw1sYVmFPmxgC8tq9GEDW1i8sJNghT3YwD5s4QCWUsyH
FfZgA/uwhQNY1mA+rLAHG9iHLRzAshbzYYU92MA+bOEAlnWYDyvswQb2YQsH
sKzHfFhhDzawD1s4gGUD5sMKe7CBfdjCASwbMR9W2IMN7MMWDmDZhPmwwh5s
YB+2cABLGeb/9x9RgHTS
"]]}, {
Hue[0.15529157249600445`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVGIQkRDERzQxGvea+H4bjRqNyefq+sBCrGxv
pWJhk0bEYkQUkjJIhIDmghYrFotoaTFYaGOhCNYq+4Hsf2AYfnO+M2dWV2+O
1Nokvft7/3s2rx+VX49vP5jrnq3kF9bqdrgDXgovh1fAnXAXvAZeC6+Du+Ee
eD28Ad4Ib7KOxuLXd55/XGh6s70fn6zXb3zJ7rWJ2pK7938+zee3WFvPoqGH
L+vZW63Svqw69e1Tdh/yfnx/m92rT80Mf53PHsD/bLfZ6ZW9fc8e5XwHzg/a
3PeFmVeND/n8Trhi89Or3jT6X2Sb/X77ZHD01uem3fD9Xa12WEPIYQ0jh7Ub
Oaw9yGHtRQ5rH3JY+5HDOoAc1kHksA4hh3UYOawjyGEdRQ7rGHJYx1ttsMMB
6wT6sMMBawR92OGAdRJ92OGAdQp92OGANYo+7HDAOo0+7HDAOoM+7HDAOos+
7HDAGkMfdjhgnUMfdjhgnUcfdjhgjaMPOxywLqAPOxywJtCHHQ5Yk+jDDges
1OpO2OAEO1zAAZewLmIfNjjBDhdwwCWsKvZhgxPscAEHXMK6hH3Y4AQ7XMAB
l7AuYx82OMEOF3DAJawa9mGDE+xwAQdcwrqCfdjgBDtcwAGXsK5iHzY4wQ4X
cMAlrGvYhw1OsMMFHHAJ6zr2//sP+VLRvQ==
"]]}, {
Hue[0.39135954999579425`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVGIQkRDERzQxGvea+H4bjRqNyefq+sBCrGxv
pWJhk0bEYkQUkjJIhIDmghYrFotoaTFYaGOhCNYq+4Hsf2AYfnO+M2dWV2+O
1Nokvft7/3s2rx+VX49vP5jrnq3kF9bqdrgDXgovh1fAnXAXvAZeC6+Du+Ee
eD28Ad4Ib7KOxuLXd55/XGh6s70fn6zXb3zJ7rWJ2pK7938+zee3WFvPoqGH
L+vZW63Svqw69e1Tdh/yfnx/m92rT80Mf53PHsD/bLfZ6ZW9fc8e5XwHzg/a
3PeFmVeND/n8Trhi89Or3jT6X2Sb/X77ZHD01uem3fD9Xa12WEPIYQ0jh7Ub
Oaw9yGHtRQ5rH3JY+5HDOoAc1kHksA4hh3UYOawjyGEdRQ7rGHJYx1ttsMMB
6wT6sMMBawR92OGAdRJ92OGAdQp92OGANYo+7HDAOo0+7HDAOoM+7HDAOos+
7HDAGkMfdjhgnUMfdjhgnUcfdjhgjaMPOxywLqAPOxywJtCHHQ5Yk+jDDges
1OpO2OAEO1zAAZewLmIfNjjBDhdwwCWsKvZhgxPscAEHXMK6hH3Y4AQ7XMAB
l7AuYx82OMEOF3DAJawa9mGDE+xwAQdcwrqCfdjgBDtcwAGXsK5iHzY4wQ4X
cMAlrGvYhw1OsMMFHHAJ6zr2//sP+VLRvQ==
"]]}, {
Hue[0.6274275274955841, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaWFhYVFFBEJKpqocc/rHjVucd9fo3EpJLdwriPV3IBX
YOGpBBvB1mpsrCy8BJUE5HsGhuGZH3/OjuXVpZVNEfHl7/vvu/78nv/1fe3z
3MLH+Y0fbdKb8Ra8FW/D2/EU3ol34d14D57Ge/F+fAAfxDNt9sO+nJn+9mnd
s/hQ+7r48/3a6o8NH8ZH8Bw+io/h4/gEPolP4dN4HrdJJ44zdBxn6TjO0XGc
p+O4QMdxkY7jEh3HAh3HZTqOK3QcV+k4Fuk4rtFxXKfjuEHHcXPSDScuHLfY
48SFY4k9Tlw4brPHiQvHHfY4ceG4yx4nLhz32OPEheM+e5y4cDxgjxMXjofs
ceLC8Yg9Tlw4HrPHiQvHE/Y4ceF4yh4nLhzP2OPEheM5e5y4cPRJT+GGO048
4MIjjhfcxw13nHjAhUccy9zHDXeceMCFRxwvuY8b7jjxgAuPOF5xHzfcceIB
Fx5xrHAfN9xx4gEXHnG85j5uuOPEAy484njDfdxwx4kHXHjE8Zb7uOGOEw+4
8IjjHff/+w/DF6l5
"]]}, {
Hue[0.8634955049953739, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaWFhYVFFBEJKpqocc/rHjVucd9fo3EpJLdwriPV3IBX
YOGpBBvB1mpsrCy8BJUE5HsGhuGZH3/OjuXVpZVNEfHl7/vvu/78nv/1fe3z
3MLH+Y0fbdKb8Ra8FW/D2/EU3ol34d14D57Ge/F+fAAfxDNt9sO+nJn+9mnd
s/hQ+7r48/3a6o8NH8ZH8Bw+io/h4/gEPolP4dN4HrdJJ44zdBxn6TjO0XGc
p+O4QMdxkY7jEh3HAh3HZTqOK3QcV+k4Fuk4rtFxXKfjuEHHcXPSDScuHLfY
48SFY4k9Tlw4brPHiQvHHfY4ceG4yx4nLhz32OPEheM+e5y4cDxgjxMXjofs
ceLC8Yg9Tlw4HrPHiQvHE/Y4ceF4yh4nLhzP2OPEheM5e5y4cPRJT+GGO048
4MIjjhfcxw13nHjAhUccy9zHDXeceMCFRxwvuY8b7jjxgAuPOF5xHzfcceIB
Fx5xrHAfN9xx4gEXHnG85j5uuOPEAy484njDfdxwx4kHXHjE8Zb7uOGOEw+4
8IjjHff/+w/DF6l5
"]]}, {
Hue[0.09956348249516367, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaWFhYVFFBEJKpqocc/rHjVucd9fo3EpJLdwriPV3IBX
YOGpBBvB1mpsrCy8BJUE5HsGhuGZH3/OjuXVpZVNEfHl7/vvu/78nv/1fe3z
3MLH+Y0fbdKb8Ra8FW/D2/EU3ol34d14D57Ge/F+fAAfxDNt9sO+nJn+9mnd
s/hQ+7r48/3a6o8NH8ZH8Bw+io/h4/gEPolP4dN4HrdJJ44zdBxn6TjO0XGc
p+O4QMdxkY7jEh3HAh3HZTqOK3QcV+k4Fuk4rtFxXKfjuEHHcXPSDScuHLfY
48SFY4k9Tlw4brPHiQvHHfY4ceG4yx4nLhz32OPEheM+e5y4cDxgjxMXjofs
ceLC8Yg9Tlw4HrPHiQvHE/Y4ceF4yh4nLhzP2OPEheM5e5y4cPRJT+GGO048
4MIjjhfcxw13nHjAhUccy9zHDXeceMCFRxwvuY8b7jjxgAuPOF5xHzfcceIB
Fx5xrHAfN9xx4gEXHnG85j5uuOPEAy484njDfdxwx4kHXHjE8Zb7uOGOEw+4
8IjjHff/+w/DF6l5
"]]}, {
Hue[0.3356314599949535, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaWFhYVFFBEJKpqocc/rHjVucd9fo3EpJLdwriPV3IBX
YOGpBBvB1mpsrCy8BJUE5HsGhuGZH3/OjuXVpZVNEfHl7/vvu/78nv/1fe3z
3MLH+Y0fbdKb8Ra8FW/D2/EU3ol34d14D57Ge/F+fAAfxDNt9sO+nJn+9mnd
s/hQ+7r48/3a6o8NH8ZH8Bw+io/h4/gEPolP4dN4HrdJJ44zdBxn6TjO0XGc
p+O4QMdxkY7jEh3HAh3HZTqOK3QcV+k4Fuk4rtFxXKfjuEHHcXPSDScuHLfY
48SFY4k9Tlw4brPHiQvHHfY4ceG4yx4nLhz32OPEheM+e5y4cDxgjxMXjofs
ceLC8Yg9Tlw4HrPHiQvHE/Y4ceF4yh4nLhzP2OPEheM5e5y4cPRJT+GGO048
4MIjjhfcxw13nHjAhUccy9zHDXeceMCFRxwvuY8b7jjxgAuPOF5xHzfcceIB
Fx5xrHAfN9xx4gEXHnG85j5uuOPEAy484njDfdxwx4kHXHjE8Zb7uOGOEw+4
8IjjHff/+w/DF6l5
"]]}, {
Hue[0.5716994374947433, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaWFhYVFFBEJKpqocc/rHjVucd9fo3EpJLdwriPV3IBX
YOGpBBvB1mpsrCy8BJUE5HsGhuGZH3/OjuXVpZVNEfHl7/vvu/78nv/1fe3z
3MLH+Y0fbdKb8Ra8FW/D2/EU3ol34d14D57Ge/F+fAAfxDNt9sO+nJn+9mnd
s/hQ+7r48/3a6o8NH8ZH8Bw+io/h4/gEPolP4dN4HrdJJ44zdBxn6TjO0XGc
p+O4QMdxkY7jEh3HAh3HZTqOK3QcV+k4Fuk4rtFxXKfjuEHHcXPSDScuHLfY
48SFY4k9Tlw4brPHiQvHHfY4ceG4yx4nLhz32OPEheM+e5y4cDxgjxMXjofs
ceLC8Yg9Tlw4HrPHiQvHE/Y4ceF4yh4nLhzP2OPEheM5e5y4cPRJT+GGO048
4MIjjhfcxw13nHjAhUccy9zHDXeceMCFRxwvuY8b7jjxgAuPOF5xHzfcceIB
Fx5xrHAfN9xx4gEXHnG85j5uuOPEAy484njDfdxwx4kHXHjE8Zb7uOGOEw+4
8IjjHff/+w/DF6l5
"]]}, {
Hue[0.8077674149945295, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlHlMVFcUxp9oXWJMW2MMVmsHK7QqtVK3KsX5cFCKgDgzzLDjmx0UxTYS
ba3to3GpxSpJF7WGZqpVwQaIaEltXZ67GMV9QawdQQSrFkXRmhrswvGPcyaZ
TH7z3e9+595z3gtx5ls8QYqi1Pz7/e+383PX+PDB+s/jB7TupT/AuafgFwT3
ExwseJBgg+AhgocKDhP8uuDhgsMFjxQ8SnCE4LcEjxY8RvBYweOQsDWtPelJ
O/F4tG1J+HSe/y/itxHePGtWrPkW8QT0/bK396WVLcQTsaI1Pb/gaRNxpNDf
EXlReM96qNwUc494ktCNOF7eI6+qo5kYfL0GPA07VrRqWCPp0Zy1aCybdeX6
mNwbpE+G7XLNhj1tp0mfjKUD7q44MOc26SZer2ZC7eOTa7Z0BEiP4fVpMdih
tuwaWXmV9Cn8/NoU3Kwt0YcsOkP6VM7aVOz4Md63oWIf6bGcNcHKu0IXrMQJ
PQ7Y374uZHEp6dP4eTTBSrzQ4xH3zVFDbl4d6QlCTxD9SxTnTxT9mc77qU1H
r5bExML1F0hPEv1JEvoMLFiyLXLFG5s7GYK1Gcg/EFtsXLLf+D/rM+CKONKU
WWYivxkDSmevnV/3a6cOM3Z/HbVx1ZzvO1kzY4066KStupb8Qlcs6Lvp2+pz
x6sp34L8Pi+Pb73zG+Vb8OKmstSappOdrFvQZaK3pLL+POVb8eDa4u4LbvxC
fquYB6HrQleS+f5IRl7j+3nehUfIn8z7rSfzehUbPw9s4v5scPc7NS+69DD5
bWK+7Lz/sGPmwbruXf+uIr+d16Pb8WhUaYY9+yu6vxQ+T0gR85qCgdbgjSOC
qT96iqg/lfcHqfhu0UW37fAx6l+q8KeiZ8Ujq736MOWnCX8aTuwP7XGm/2Xy
C9bT0DY4aPvOldfIn84Z6ShunlDw2ZXr5E9HxL7G/nPuNZA/ndejZCA35VaP
mp0XyJ+BrIJpb5rDz5I/A9XPFWZ9PI720wUrmZyRiUvLF101br5B/kxUDnM0
mHsR65kIWnkC1twm8mdh0IgF9Q9/p/qQhZISc3a3aGItC12KYxu6fdFI/izh
z4Z1odfyQ2gz+bOx5GzD9Krlz86fjfrQcnfm43Pkz4b/4WvnCz94dv8zOUOw
JlgXrKhwFgV33BxM92VQMfBguNE09xLtp/J8VeX3rQm/X8Wkbfe2uqY8e1+o
PC+g4vm5YW0fLv6Z8h0Y/cRx2ldE82ZwcD8cuFjwkckQc5ryHbz/moPv73dg
+N7apMKoE5Tv4PUGBCtOfl6DYDixfVnM6LihAcp3os3bEbs2QKw5+Xz6nbz/
ulgfEOsVF593g4vPH1x8/lQXLGUXP4nZTfOiCfaL/XQXzwsIVtz8fAY31+Hm
+6lucX6x3u9G3CvdHZE/1VO+WB9w8/tRPFw3ePjzAo/IF6x5EHnmqulVSwvl
e/h96GJ9wCPeP15ev8Er3geCVbFe8/L++L38eda9vJ6Al9ej+Ph6gw9jQ+rX
mg7ReSBY9eHUgUumO9P+oHwfgj0h6fNtNynfh4z76lI94xblCw740Odpa1CX
PbcpPwcRocrqDb3/pPwcriMHe4v67Oo/tZXyc1DZtX12YS2t1wT7hV8X+wdy
cL/i6LowG7GSy/c35KJ3Xcgw++o7xn8AgA0vTw==
"]]}, {
Hue[0.04383539249432289, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjloFWEUxfFDCkklEQQtVKKISAjiEk1c4rt5cd+NxjUmn0/jgoVY2d5K
xcImjYjFiCgkZZAIAc0FLZ5YPERLi8FCGwtFsFbJBzL/gWH4zfnOnFnZuDk0
3ibp3d/733P++lH79fj2g5mu6Vp+YVW3wx3wYngpvAzuhFfBq+E18Fq4C+6G
18Hr4Q3wRngT3ANvhrdYR2vh6zvPP87Nu9fej4w1mze+ZPfZ6Piiu/d/Ps3n
t1pb94L6w5fN7G1Wa1/SmPj2KXs78h34fr/da05MDX6dzd6J/6nZ9OTynt5n
j3Ju1fNuNvN9bupV60M+P1C1D9js5Io3rb4XOa/b77dP+odvfc55Hd8frNph
7UIOazdyWHuQw9qLHNY+5LD2I4d1ADmsg8hhHUIO6zByWEeQwzqKHNaxqg12
OGAdRx92OGANoQ87HLBOoA87HLBOog87HLCG0YcdDlin0IcdDlin0YcdDlhn
0IcdDlhn0YcdDljn0IcdDljn0YcdDlgj6MMOB6wL6MMOB6xR9GGHA9YY+rDD
AStV3QkbnGCHCzjgEtZF7MMGJ9jhAg64hNXAPmxwgh0u4IBLWJewDxucYIcL
OOAS1mXswwYn2OECDriENY592OAEO1zAAZewrmAfNjjBDhdwwCWsq9iHDU6w
wwUccAnrGvZhgxPscAEHXMK6jv3//gO0dNPN
"]]}, {
Hue[0.27990336999410914`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjloFWEUxfFDCkklEQQtVKKISAjiEk1c4rt5cd+NxjUmn0/jgoVY2d5K
xcImjYjFiCgkZZAIAc0FLZ5YPERLi8FCGwtFsFbJBzL/gWH4zfnOnFnZuDk0
3ibp3d/733P++lH79fj2g5mu6Vp+YVW3wx3wYngpvAzuhFfBq+E18Fq4C+6G
18Hr4Q3wRngT3ANvhrdYR2vh6zvPP87Nu9fej4w1mze+ZPfZ6Piiu/d/Ps3n
t1pb94L6w5fN7G1Wa1/SmPj2KXs78h34fr/da05MDX6dzd6J/6nZ9OTynt5n
j3Ju1fNuNvN9bupV60M+P1C1D9js5Io3rb4XOa/b77dP+odvfc55Hd8frNph
7UIOazdyWHuQw9qLHNY+5LD2I4d1ADmsg8hhHUIO6zByWEeQwzqKHNaxqg12
OGAdRx92OGANoQ87HLBOoA87HLBOog87HLCG0YcdDlin0IcdDlin0YcdDlhn
0IcdDlhn0YcdDljn0IcdDljn0YcdDlgj6MMOB6wL6MMOB6xR9GGHA9YY+rDD
AStV3QkbnGCHCzjgEtZF7MMGJ9jhAg64hNXAPmxwgh0u4IBLWJewDxucYIcL
OOAS1mXswwYn2OECDriENY592OAEO1zAAZewrmAfNjjBDhdwwCWsq9iHDU6w
wwUccAnrGvZhgxPscAEHXMK6jv3//gO0dNPN
"]]}, {
Hue[0.5159713474939025, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd03tozlEcx/FvpNz+cIu5/LEhhLmOue/rcZnZbHs2ezb339wnoUwkcSL+
I7mkFvUjwh/yjxhaji3FyMYfG0P7ESb+cFm5hEI7pfN+6unp9XzO53xPp98v
ZeXmgjXtROTe3++/37bPp4wfzb8/N/e/dcv9ob47wt3gXnASPABOhgfCg+Eh
8DB4ODwSHgWPgcfC4+DxcBo8AZ6oZeviJzYkIud0rU8rj+W/bHGepC9OHmrc
1VDpPFl3HGvt3fA2zGjzFO297ez4utZq56nIp2H/6Xr4YHzEwIpHzjNwngw9
+q1y6MOFV53VX29UN36v2pv6scbtP9O3mal32z/fue9JuevH9ECyDnt8qsnl
Me0QXdKyvBqXz/JtYJmthSlnTm680ez6s/Vn7oNYh9ENbv4c5HP0RM+vXS7v
r3f5XH3SI31P9Xa33szV3fUX5GnFfZdn+utNpnYap0eOnnvm8nnI5yHP8u/f
ZOH+5yOHJRt5tn9eycH5c1Sajx/uXBy5fIHWJfpVTN/82uWw5CKHJQ95HvbP
9+9X8/3cwDZfr5cn921/75Xrx9GP+/dn4ujHcb4CPZ1d06X25hvXL9DMpSVb
gth71y/QtKqWT0lT3TwLS6G/n8KmULNKe1RPvNbi+rAs9K2wgS0sRegX4fxF
Ovli0P38rw+uD0vCtyZ0553WrU2b3rl+QkubtifOLnnp+gn/vqXYf961WJNK
+gyqTTvj+sV65Uvq7a6NjW3vm4WlxLfCBrawLEIfNrCFZTH6sIEtLEvQhw1s
YVmKPmxgC8sy9GEDW1iWow8b2MKyAn3YwBaWwHcyrHAAGziELRzBUor5sMIB
bOAQtnAEy0rMhxUOYAOHsIUjWFZhPqxwABs4hC0cwbIa82GFA9jAIWzhCJY1
mA8rHMAGDmELR7CsxXxY4QA2cAhbOIJlHebDCgewgUPYwhEs6zEfVjiADRzC
Fo5gKcP8//4DxJN5lg==
"]]}, {
Hue[0.7520393249936888, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzctuTnEUxuEVI2YSBgYdlIgI0jjVme+vdT77nGnZWkVHbmGN3AOjHUMj
A3Nr6gaamO1wAy4BaRP5np3s7Dz7lzdr59K78cqmiPj+9/33XX9+j2b3//wx
/vBptPGjTXoz3oq34x14Ck/jXXg33oP34n34AJ7BB/EhfBgfwUfxLD7W+q9f
tn3esvZt3cfxifZ+bfXjwvKvDZ/Ep/BpfAafxefwCLdJJ47zdBxzdBzzdBwX
6Dgu0nFcouO4TMdxhY7jKh3HNTqO63QcN+g4btJx3KLjuE3HcWfSDScuHHfZ
48SFY8weJy4c99jjxIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOB6zx4kLxxP2
OHHheMoeJy4cz9jjxIVjgT1OXDgW2ePEheM5e5y4cLxgjxMXjm7S07jhDifu
ceEBx0vu44Y7nLjHhQccS9zHDXc4cY8LDziWuY8b7nDiHhcecLziPm64w4l7
XHjAscJ93HCHE/e48IDjNfdxwx1O3OPCA4433McNdzhxjwsPON5yHzfc4cQ9
LjzgWOX+f/8BxUpehQ==
"]]}, {
Hue[0.9881073024934821, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzctuTnEUxuEVI2YSBgYdlIgI0jjVme+vdT77nGnZWkVHbmGN3AOjHUMj
A3Nr6gaamO1wAy4BaRP5np3s7Dz7lzdr59K78cqmiPj+9/33XX9+j2b3//wx
/vBptPGjTXoz3oq34x14Ck/jXXg33oP34n34AJ7BB/EhfBgfwUfxLD7W+q9f
tn3esvZt3cfxifZ+bfXjwvKvDZ/Ep/BpfAafxefwCLdJJ47zdBxzdBzzdBwX
6Dgu0nFcouO4TMdxhY7jKh3HNTqO63QcN+g4btJx3KLjuE3HcWfSDScuHHfZ
48SFY8weJy4c99jjxIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOB6zx4kLxxP2
OHHheMoeJy4cz9jjxIVjgT1OXDgW2ePEheM5e5y4cLxgjxMXjm7S07jhDifu
ceEBx0vu44Y7nLjHhQccS9zHDXc4cY8LDziWuY8b7nDiHhcecLziPm64w4l7
XHjAscJ93HCHE/e48IDjNfdxwx1O3OPCA4433McNdzhxjwsPON5yHzfc4cQ9
LjzgWOX+f/8BxUpehQ==
"]]}, {
Hue[0.22417527999326836`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzctuTnEUxuEVI2YSBgYdlIgI0jjVme+vdT77nGnZWkVHbmGN3AOjHUMj
A3Nr6gaamO1wAy4BaRP5np3s7Dz7lzdr59K78cqmiPj+9/33XX9+j2b3//wx
/vBptPGjTXoz3oq34x14Ck/jXXg33oP34n34AJ7BB/EhfBgfwUfxLD7W+q9f
tn3esvZt3cfxifZ+bfXjwvKvDZ/Ep/BpfAafxefwCLdJJ47zdBxzdBzzdBwX
6Dgu0nFcouO4TMdxhY7jKh3HNTqO63QcN+g4btJx3KLjuE3HcWfSDScuHHfZ
48SFY8weJy4c99jjxIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOB6zx4kLxxP2
OHHheMoeJy4cz9jjxIVjgT1OXDgW2ePEheM5e5y4cLxgjxMXjm7S07jhDifu
ceEBx0vu44Y7nLjHhQccS9zHDXc4cY8LDziWuY8b7nDiHhcecLziPm64w4l7
XHjAscJ93HCHE/e48IDjNfdxwx1O3OPCA4433McNdzhxjwsPON5yHzfc4cQ9
LjzgWOX+f/8BxUpehQ==
"]]}, {
Hue[0.4602432574930617, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlAtQVGUUx29iZjUwylAxZri1jENSQKQobcABVFZ5yC7ssgvs7t33gqZR
lpZNXjVt6GGIzhTaNFsbWUqRpDAMQbcGgpWH6AACaq0GrECwIiUZkz2Gs818
hxmG+fH//vd/znfOvY+atimt8ziOc//7+9/fuZ8bSXDydGS7ffI7/AewvJDw
IsIhhEMJLyUsIfwY4XDCywlHEF5B+AnCUYRjCD9FOJbw04RXEl5FOI7wasJr
CMcTfga4huPlIa7fkWWwcvjP4vH0P5CfBcsRldl1Ygw5AYLELaPLPF7kRCit
fmjHraxh5CSiA5snAJS9fHPkrckbqCcTPRnMLaNfGYx+fwp7XkiBaptiYnjP
NdRTWRZSQbbtjUhlm7+etfC8zFoXeKIb9bUwcyghyOYeR30dW6+wDhZ/H3S9
X+lBfT2pbz20bR+Iziq+gnoa27+QBlAcHv1i2HnU5SwLclhTsju+eboR9Q0s
C4S5jUQnzKUTPR0evhL9s771GOoZbD8CYS6T6JlQlBY2fHppP+pZRM8i89tE
+t9E5pPNzhOy4XaY9IGhwl48n83ORyQ6pwBvX4JPLvsA/YQFBUTuDfh29HZz
0pxfAa0HhgKElvI55pQw+NoPHYd3inMMSvjbY5YPdZ+cY0EJvTkGq9nVjX6i
czlQffTu4PYjpzA/B96Z+qL+/vcuY34ORBy/cys2oxPrz4HMzfFa6f4erD8X
DG/u19TUnkF/LtkHootE51Ts80EFh6UHF2i6mtGvYuctqth6OTXbD6jJ/alh
vnehxS3F54lqsl957PwhD8pcHQsS7q1Cfx5bj5gH1qbYnfX7PsX707D7BBqy
rxpIDNY0e+JwPqKG1K9l5wNaCHdXdDqyOnF+WuLXwqnXt5TsWeXG/Hziz4cz
aqm7VnsJ/YTFfJj1RdXOrLiG/gKWoQDueWnc8NuuYfQXQKXmoKul/Bf0F7D1
cIWwbIOuNyKgH/2FENFkUDyytQf9hRBzSV3xQs8Q+glzOpZBBxm+qKAPU73o
10FvVfEIVI6gXwcVH5c4fwxA5vQwfegVvv1VrA/0EL+3StXvwX4EPWQuifm8
5HF/vp74DaDe1bX1ZiPmgQFKZbs33yXx92+Aq/clmgKT+tBvgBqd76PpB/33
z7MsIQyEecICD18XVl5s9d+Xk4eIz3ShkoYBzOPZfA/P3jdnZP0SI4RMjnTm
DuL3Aowk3whxLu/Z2XcbMd8Ik813hPMxuG9O4heN0CX7Sykvu4D5RjJ/E+nf
BA3vf7J94Ow5zDex9fKEBRPbr5OwaILQlsV1gy0ezDeBwRcf0rTvKuab2f2U
mNn5g5k9z5Pzgpndd6eZ3T/RzO6fxwx1wVNN8/OuY76FZYmFfR5Y2DyesGBh
+3MSXSTP81hI/1bSvxWgbYfx6OxlzLeS/q3k/SC600reFyvJJ8zZgO8LTJZP
+Pu3sfcBNvY8b2O/N4KNrd9pI98Lwh5ynrOz85HYyftsZ+vh7eT7Rs477fC2
/txVWcEo5hP22KG4y7RR+9MY5jtgeUdm9sVfUZc4oGlAPz02NY75hHkH1DxX
pc1XTGC+A1KenLfae2wS84kuOkD+zZIvZy74MN8B0vrSRUH5yFwRy5Ki//3/
AAgmKGE=
"]]}, {
Hue[0.696311234992848, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzk1LFWEYxvGLFhFE0KJFQotjiMVBwt7fTp3bo6W9d0zT1OzJ8lQUtAmi
TdybPkERtBv6AOGupXdBkBBRuyiECapFVGSE0C7DgZj/wDD85prruaZ96ubg
9ApJc0v3v+fy9bN+v6vW/7HWqhcvrOxV8Fp4Hbwe3gBX4I1wB9wJb4arcBe8
Be6Gt8Lb4O3wDngnvAveDe+B98L7bH7Thx/vh97NLnu/+aMbbbeHPxWu2YM7
HfceXr9V+IDdXT0w/vXls6J/0J6mz9994U3hOnIrn+9m/dXWq3a9KM7rKf+P
91h3Nvr7eeNxkTfK33vDmivb1nR+eV2c31u299rE7NtvI/UnRd5nleqvsbnm
fJH32eKfxYXJmZni/ENlO6zDyGH1I4c1gBzWEeSwjiKHdQw5rOPIYZ1ADusk
clinkMM6XbbBDgesJvqwwwFrEH3Y4YB1Bn3Y4YA1hD7scMAaRh92OGCdRR92
OGCNoA87HLBG0YcdDljn0IcdDlhj6MMOB6xx9GGHA9YE+rDDAes8+rDDAWsS
fdjhgHUBfdjhgJXKrsAGJ9jhDA44h3UR+7DBCXY4gwPOYU1hHzY4wQ5ncMA5
rEvYhw1OsMMZHHAO6zL2YYMT7HAGB5zDmsY+bHCCHc7ggHNYLezDBifY4QwO
OId1BfuwwQl2OIMDzmFdxT5scIIdzuCAc1jXsP/ffwFs0jei
"]]}, {
Hue[0.9323792124926413, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlZ0WFhYWUURERNx3zRv3fYn7/hqNS6WXcDq19QJkSGHh
TXja3ICFIExjL0isVQzI9wwMwzM//pz1c69m51dExOKf9+/33/Njeunjz6WF
9x8+L/9ok16JV+M1eC1eh6fwBrwRb8Kb8Ra8FW/D2/EOvBPvwrvxHrwX78P7
8QF8sH1a9eXb63dfl30IH26/Ft++WZj5vuwj+Ciexm3SiWOGjuMYHcdxOo4T
dBwn6ThO0XGcpuM4Q8dxlo7jHB3HeTqOC3QcF+k4LtFxXKbjuDLphhMXjqvs
ceLCMcseJy4c19jjxIXjOnucuHDcYI8TF46b7HHiwnGLPU5cOG6zx4kLxx32
OHHhuMseJy4c99jjxIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOPqkp3DDHSce
cOERx2Pu44Y7TjzgwiOOOe7jhjtOPODCI44n3McNd5x4wIVHHE+5jxvuOPGA
C4845rmPG+448YALjziecR833HHiARcecTznPm6448QDLjzieMF93HDHiQdc
eMTxkvv//RvJV/gK
"]]}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None, None}, DisplayFunction ->
Identity, DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, -1.7657299303594596`},
PlotRange -> {{0, 201.}, {-1.7219167113563734`, 0.9945028668349574}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, -1.7657299303594596`},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, None}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy all cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {-1.7219167113563734`, 0.9945028668349574}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0k1rU0EUxvGDuqgKIiJYX6BXEdGiRVu1am17rEb7YtM2aUzSxJtJmjSV
LtzU/fQLuPIDXNCFW9dSGFyIgn4AEeTi0pVI3Am+YEI5/0AIvzxz5sw9d042
Hudau0Tk/d/vv9//n++Tn38ff13ZPKLdP9S6Dz4IH4b74RNwBJ+CT8Nn4LPw
IHweHtJwYHT7zaGeLyK/BA/DI/Bl+Ap8FR6Fr8HXdXPk7fiTjz3fQD4G38T6
ceQT8CSs1h6WW3Z/D8sU8imNB392Ngb6u/ltaw/LHeSwZJDDchf9YbmHHJZp
5NO4HzOYzwzqZ5HPIp/D+ecw3/vIYZnXvVPvvmU3evk88izyLPIF5AvIF611
EfOAAyxLqF9CPRxgyVlrDvOAAyx5+3yaR/886pHLMvrDHg7L6F9AfQHnL9jz
BeTyAOeHPRxgKaK+qJm+3b86r3r1cCjqha1P8f5Or75krSX98bwcBoaPduvh
UEL/st1fYV+2+4ey3U9WrHVFP2zHX/e86PVHHmCpoH/F9vMV1MNSRf8q6quY
PywPMX/YwwGWGOeP0T9GPSw11NfQv4b7D4uz6yNYYefwfuHEoR/qU6yXun3e
CNa6Xe/quJ9wAgc4rdv7JQ3rCNaGrXfIPZzAAU6xn6zi+VdxH2GH9R55gjwg
T2FpWkewNu35Heyb+nTs2bmtfce6/ZEHOIWlhfnDCrsW3j/yBHlAnsKyhv6w
wg72cLJm5xHgFJa2Dk1kvrxsdx21ba7IHXKPPIEDnKJe1tEfVtjBHk7gAKfr
6P/IOtrxH6uKV2A=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzrtqFlEUBeCNlaVglCAWMUgQEe/3RHPUeI8a4yXekkxiorFKExAFYeML
+ACCTmVvb3E6Se0LjG8gllYq5kf+b2AYvllnzZpdi6vTy5siYv3P/ff57/ox
PnWgHV4bHCgbL8qbD9++bP++dcOb8RY8gAfxTjyEh0v//u7yctv7ePepl4/g
PfT34n2c31/WX02MLY30fJD8EP3D5e3Xmdlfk73/OUJ+lP4xfJzzJ8rnnzs+
vl7p+SQ+xfnTeJTvj/F/Z8jP4nFc+p04zpHjOE+O4wI5jglyHBfJcVwix3GZ
HMcVchxXyXFcI8dxnRzHJDmOG+Q4bpLjuEWOY6rfBSeuOG7Tx4krjmn6OHHF
cYc+Tlxx3KWPE1cc9+jjxBXHffo4ccUxQx8nrjge0MeJK46H9HHiiuMRfZy4
4nhMHyeuOJ7Qx4krjln6OHHFMUcfJ6445unjxBVH0+8hXHCDE7e44g7HAvu4
4AYnbnHFHY5F9nHBDU7c4oo7HE/ZxwU3OHGLK+5wLLGPC25w4hZX3OFYZh8X
3ODELa64w/GMfVxwgxO3uOIOx3P2ccENTtziijscK+zjghucuMUVdzhesP/f
vwHzSOXL
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz7lqlHEUxuGDlaVglBQWMUgQEffdaP5q3KPGuMQt+hkTl8pGEAvh4A14
AYJ8lVdhcTpJ7Q183oG1lYoJkmdgGJ75zTtnZvvi67nlDRGx8uf59/Xf4+fU
7N5+/M3oSFt9o633RrwJj+BRvA2P4XG8o73//P3r1h+bVz2Bd+JdeHd7u+VT
fPyy5j1t5d305NLEmvfR97M/0D58m1/4NbP2ew7SD7E/TD/C/znK54/h4+xP
sD/J5yf5fafop/m+KXpb78Rxho7jLB3HOTqOaTqO83QcF+g4LtJxXKLjuEzH
cYWO4yodxwwdxzU6jut0HDfoOGbXu+HEheMme5y4cMyxx4kLxy32OHHhuM0e
Jy4cd9jjxIXjLnucuHDMs8eJC8c99jhx4bjPHicuHA/Y48SF4yF7nLhwPGKP
ExeOBfY4ceF4zB4nLhxP2OPEhaNb7zHccIcT97jwgOMp93HDHU7c48IDjkXu
44Y7nLjHhQccz7iPG+5w4h4XHnAscR833OHEPS484FjmPm64w4l7XHjA8Zz7
uOEOJ+5x4QHHC+7jhjucuMeFBxwvuY8b7nDiHhcecLzi/n//Blos2LA=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1L1rU3EUxvEHlzo6tNLBIVYRkVLfq9Vqj6n2xUaNbWLsm/21Wl9AcHFy
Ojg4uIqbwgVxEzfB8TiJ+DcIFwRxKOicQVTMRX7fQAifPOf5nQv3Jrs3Hsxv
bpP06c/77+e/18+Jl+/Hl5+97bfeF5Z7O7wD7ocH4V1wDR6C99rjj53VbqPy
Png/5g/Aw5gfsebBYujhYOVDyA+jf8RGt759edM30PNR5MfQPw6PYv4E8pPw
GOZPwafhcVzfGZx3Fp5A3/K+wzqHHFYdeR3nTyKftNrXgeevFqv+eeSwLiCH
NYV8CudP5/Zp+9z9/vTJ6yqfQT6DfNZ+jHV/1Ud29vJZ6/uw58XwVpVfzO2w
5pDP4fwG9jfQv5TPO6zL6MO6gj6sZm5r4nqb+XmBeV3N5w12OGDNow87HLAW
0F+wdyuPUud+db/ggNXK76+1sL+VP18Bq50/79bOf2/ezv9vAta13AY7HLA6
6MMOB6zr6MMOB6xF9GGHA9YS+rDDAWsZfdjhgLWCPuxwwFpFH3Y4YN1AH3Y4
YK2hDzscsFLuGmxwgh0u4IBLWOvYDxucYIcLOOAS1gb2wwYn2OECDriEdRP7
YYMT7HABB1zCuoX9sMEJdriAAy5hbWI/bHCCHS7ggEtYt7EfNjjBDhdwwCWs
O9gPG5xghws44BLWXeyHDU6wwwUccAnrHvb/929h+No2
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzztvjnEYx/ErJqNESQdDNSIi4nxW+nc+FVWHosqt1GGySEySK96AwSjk
noxmg+HaxOwN3N6B2YRoI/00efLk83z/v1zpxoXnM4urIuLbn8/f739/Pyen
d/TjL0ZH2tIPbaVX4zV4pL3+Ojv/a2rZo/QNeAyP403t1YfvX9b/WLvkzXgL
77fibbzf3l6uexdvPi57J30X+938P3voe9nvo+/HB3h/EB/i3mF8hPcT7f3n
ibm3n5b7UfoxPInbSieO43QcJ+g4TtJxnKLjOE3HcYaO4ywdxzk6jvN0HBfo
OC7ScUzRcVyi47hMx3GFjmN6pRtOXDiusseJC8cMe5y4cFxjjxMXjuvsceLC
cYM9Tlw4brLHiQvHLHucuHDcYo8TF47b7HHiwnGHPU5cOObY48SF4y57nLhw
zLPHiQvHPfY4ceG4zx4nLhzdSo/hhjucuMeFBxwPuI8b7nDiHhcecCxwHzfc
4cQ9LjzgeMh93HCHE/e48IDjEfdxwx1O3OPCA45F7uOGO5y4x4UHHI+5jxvu
cOIeFx5wPOE+brjDiXtceMDxlPu44Q4n7nHhAccz7v/3bxQrtCM=
"]]}, {
Hue[0.8503398874989481, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzztvSHEYBvA3JqNESQdDNSIi4n5X+ne/FVWXospR6jJZJCbJG1/AYBRy
JqPZYHg3MfsCxzcwmxBtpL+TnJz8zvN/zpOzceH5zOKqiPj25/77/Hf9nHz9
dXb+19RIW3rRVnp1m97Rj78YXfYaPML5UbyB82N4HG/Cm/EWvBVvw9vby3Xv
4s3HtUve2V59+P5l/Y9l7+L87vb+88Tc20/L3sP/7KW/j/5+fAAfpH+I7x9m
/wj9CfKj5MfwJG4rnTiOk+M4QY7jJDmOU+Q4TpPjOEOO4yw5jnPkOM6T47hA
juMiOY4pchyXyHFcJsdxhRzH9Eo3nLhwXKWPExeOGfo4ceG4Rh8nLhzX6ePE
heMGfZy4cNykjxMXjln6OHHhuEUfJy4ct+njxIXjDn2cuHDM0ceJC8dd+jhx
4ZinjxMXjnv0ceLCcZ8+Tlw4upUeww13OHGPCw84HrCPG+5w4h4XHnAssI8b
7nDiHhcecDxkHzfc4cQ9LjzgeMQ+brjDiXtceMCxyD5uuMOJe1x4wPGYfdxw
hxP3uPCA4wn7uOEOJ+5x4QHHU/Zxwx1O3OPCA45n7P/3b+u5dQo=
"]]}, {
Hue[0.08640786499873876, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtvjnEYBvA7JqNESQdDNSIi4nxW+nc+FVWHosqj1GGySEySO76AwSjk
mYxmg+HexOwLPL6B2YRoI/29yZs3v+e6r+d6Ny48n1lcFRHf/nz//v77/Jx8
/XV2/tfUSFt60FZ6dZve0Y+/GF32GjzC/SjegMfwON7E+zfjLXgr3oa3t5fr
3sWbj2uXvLO9+vD9y/ofy97F/e72/vPE3NtPy97D/9vL/T68n/sD5AfZP8T9
YfaPkE+QH+X9x/AkbiudOI6T4zhBjuMkOY5T5DhOk+M4Q47jLDmOc+Q4zpPj
uECO4yI5jilyHJfIcVwmx3GFHMf0SjecuHBcpY8TF44Z+jhx4bhGHycuHNfp
48SF4wZ9nLhw3KSPExeOWfo4ceG4RR8nLhy36ePEheMOfZy4cMzRx4kLx136
OHHhmKePExeOe/Rx4sJxnz5OXDi6lR7DDXc4cY8LDzgesI8b7nDiHhcecCyw
jxvucOIeFx5wPGQfN9zhxD0uPOB4xD5uuMOJe1x4wLHIPm64w4l7XHjA8Zh9
3HCHE/e48IDjCfu44Q4n7nHhAcdT9nHDHU7c48IDjmfs//dvg+N6hQ==
"]]}, {
Hue[0.3224758424985268, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzTtvT3EYB/AnJqNESQdDNSIi4n5X+nO/FVWXospR6jJZJCbJE2/AYBRy
JqPZYHg2MXsDxzswmxBtpJ+T/HPy+X+f7/luXHg+s7gqIr79+f19/3t+Tr7+
Ojv/a2qkLf3RVnp1m97Rj78YXfYaPML9KN6Ax+iPk28i34y34K30t5Fvby/X
vYs3H9cueWd79eH7l/U/lr2L+93t/eeJubeflr2H7+/lfh/ez/0B8oPsH+L+
MPtHyCfIj/L9Y3gSt5VOHMfJcZwgx3GSHMcpchynyXGcIcdxlhzHOXIc58lx
XCDHcZEcxxQ5jkvkOC6T47hCjmN6pRtOXDiu0seJC8cMfZy4cFyjjxMXjuv0
ceLCcYM+Tlw4btLHiQvHLH2cuHDcoo8TF47b9HHiwnGHPk5cOObo48SF4y59
nLhwzNPHiQvHPfo4ceG4Tx8nLhzdSo/hhjucuMeFBxwP2McNdzhxjwsPOBbY
xw13OHGPCw84HrKPG+5w4h4XHnA8Yh833OHEPS484FhkHzfc4cQ9LjzgeMw+
brjDiXtceMDxhH3ccIcT97jwgOMp+7jhDifuceEBxzP2//s3DwN6hQ==
"]]}, {
Hue[0.5585438199983166, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUuLT3Ecx/FvVuzklmQxJklI7ozb/Nzvt3Eb92MYxspSKfV9AvIAFGdl
L1vpu7X2ABzPQB4BMpP+r1On0+u8+/RdN/N8anZRRHz98/79/nt+Tr569+3z
qh/L2/yPNurFeClegVfjtXgMj+P1eEN7sfJtvPmw4I30TfQt7eOvNe9fzi14
K97WXn9asvnL92Xz3o534J14F96N9+C9eB+ewPvxAXwQH8KH8SRuo04cR+g4
jtJxHKPjOE7HcYKO4yQdxyk6jtN0HGfoOM7ScZyj4zhPx3GBjuMiHcclOo7L
o244ceG4wh4nLhxT7HHiwnGVPU5cOK6xx4kLx3X2OHHhuMEeJy4cN9njxIVj
mj1OXDhusceJC8dt9jhx4bjDHicuHHfZ48SF4x57nLhw3GePExeOB+xx4sLR
jXoMN9zhxD0uPOB4yH3ccIcT97jwgGOG+7jhDifuceEBxyPu44Y7nLjHhQcc
j7mPG+5w4h4XHnDMch833OHEPS484HjCfdxwhxP3uPCA4yn3ccMdTtzjwgOO
Oe7jhjucuMeFBxzPuP/fvwE6xWQv
"]]}, {
Hue[0.7946117974981064, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzduKT3EYx+E3R5wJSXIwJAnJfs/87Pe7sR3bn2EYR86Vem/ALbBuQU6l
99SxC7DcgVwBMtL/WbVaPevTt3f93KuZ+SUR8eX3++f79/kx/ebd10+rv69s
iz/apJfi5XgVXoPX4Sm8AW/Em/BmvAVvax9+rn3/euGft+Md7e3HZVs/f1ux
6J14F96N9+C9eB/ejw/gg/gQPoyP4KP4GJ7GbdKJ4zgdxwk6jpN0HKfoOE7T
cZyh4zhLx3GOjuM8HccFOo6LdByX6Dgu03FcoeO4SsdxbdINJy4c19njxIVj
hj1OXDhusMeJC8dN9jhx4bjFHicuHLfZ48SF4w57nLhw3GWPExeOWfY4ceG4
xx4nLhz32ePEheMBe5y4cDxkjxMXjkfsceLC8Zg9Tlw4+qSncMMdJx5w4RHH
E+7jhjtOPODCI4457uOGO0484MIjjqfcxw13nHjAhUccz7iPG+448YALjzjm
uY8b7jjxgAuPOJ5zHzfcceIBFx5xvOA+brjjxAMuPOJY4D5uuOPEAy484njJ
/f/+BUoXZrk=
"]]}, {
Hue[0.030679774997896203`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlqFmEUhtGLI4eCIiIOokgIImLfxuRTY9/Hvv+MicaRYwXhrkRrC84d
3GnGbqDcgbgCFQ3yn4KiOPXwcncuvVtc2RARa7/fP9+/z4/5j5++fd36fXP7
96NNeiPehLfgbXgHnsK78G48jWfwHry3ffm5/fOH1XXvw/vb2vuF2eXpdR/A
B/EhfBgfwUfxMXwcn8An8Sk8i0/jOTyP26QTxxk6jrN0HOfoOBboOM7TcVyg
47hIx3GJjuMyHccVOo6rdBzX6Diu03HcoOO4Scdxa9INJy4ct9njxIVjkT1O
XDjusMeJC8dd9jhx4bjHHicuHPfZ48SF4wF7nLhwPGSPExeOR+xx4sLxmD1O
XDiesMeJC8dT9jhx4XjGHicuHM/Z48SF4wV7nLhw9ElP4YY7TjzgwiOOl9zH
DXeceMCFRxxL3McNd5x4wIVHHK+4jxvuOPGAC484lrmPG+448YALjzhWuI8b
7jjxgAuPOF5zHzfcceIBFx5xvOE+brjjxAMuPOJY5T5uuOPEAy484njL/f/+
Ba3g2EI=
"]]}, {
Hue[0.266747752497686, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqEGEUhuGDlaVglCAWMUgQEffdaH417luM+z7GRGNlI4iCcO7ACxB0
Knt7i9Om9gbGOxCvQMUEyTMwDM+8fJwtc69mF9ZExNKf9+/33/NzamZXP/56
dKQt/2jvP33/tvHH+mWvxevwCB7Fm/EYHsdb8QTehrfjHe3Nho/x4cuKd7av
vzZ9fre44t1t6e305PzEivfgvXgf3o8P4IP4ED6Mj+Cj+BiexMfxCTyF22on
jpN0HKfoOE7TcUzTcZyh4zhLx3GOjuM8HccFOo6LdByX6Dgu03FcoeO4Ssdx
jY5jZrUbTlw4rrPHiQvHLHucuHDcYI8TF46b7HHiwnGLPU5cOG6zx4kLxx32
OHHhuMseJy4c99jjxIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOB6zx4kLxxP2
OHHh6FZ7DDfc4cQ9LjzgeMp93HCHE/e48IBjjvu44Q4n7nHhAccz7uOGO5y4
x4UHHPPcxw13OHGPCw84FriPG+5w4h4XHnA85z5uuMOJe1x4wPGC+7jhDifu
ceEBxyL3ccMdTtzjwgOOl9z/7998qdWN
"]]}, {
Hue[0.5028157299974758, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqF2EUh+GDlaVglBQWMUgQEffdmHxq3LcYjfsyiYlLZSOIhXDuwAsQ
ZCqvwuK0qb2B8Q68BCMmyP8ZGIZnXn6c3cvvF1a3RMTa+vv3++/5PTt/sJ/8
MD7WNn60z99+/tj5a/uGt+JteKyN7sfpu/AEnsR78BTei/fh/e3jjq/x5fum
D+BDbe3T3PTK1KYP4yP4KD6Gj+MT+CQ+hU/jM/gsnsbn8AyexW3UieM8HccF
Oo6LdBxzdByX6Dgu03FcoeO4SsdxjY7jOh3HDTqOm3Qct+g4btNx3KHjmB91
w4kLx132OHHhWGCPExeOe+xx4sJxnz1OXDgW2ePEheMBe5y4cDxkjxMXjkfs
ceLC8Zg9Tlw4nrDHiQvHU/Y4ceF4xh4nLhzP2ePEheMFe5y4cLxkjxMXjm7U
E7jhDifuceEBxxL3ccMdTtzjwgOOZe7jhjucuMeFBxyvuI8b7nDiHhcecKxw
Hzfc4cQ9LjzgWOU+brjDiXtceMDxmvu44Q4n7nHhAccb7uOGO5y4x4UHHG+5
jxvucOIeFx5wvOP+f/8BzlLS2A==
"]]}, {
Hue[0.7388837074972656, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlqFWEUhuGDI4eCUTJwEIMEEbHvjcmvxr6L0dg3lZjYjJwI4kA4O3AB
gtTIVTg404zdQLkDl2DEBLnPheLy1FcvZ/fy+4XVLRGxtv78/f/3+z37+dvP
Hzt/bW8bL9qot+JteKzNH+wnP4yPbXgc7+L7CTyJ99BPse/F+/D+9nHH1/jy
fdMH8KG29mluemVq04fxEXwUH8PH8Ql8Ep/Cp/EZfBZP43N4Bs/iNurEcZ4d
xwV2HBfZccyx47jEjuMyO44r7DiusuO4xo7jOjuOG+w4brLjuMWO4zY7jjvs
OOZH3XDiwnGXHicuHAv0OHHhuEePExeO+/Q4ceFYpMeJC8cDepy4cDykx4kL
xyN6nLhwPKbHiQvHE3qcuHA8pceJC8czepy4cDynx4kLxwt6nLhwvKTHiQtH
N+oJ3HCHE/e48IBjifu44Q4n7nHhAccy93HDHU7c48IDjlfcxw13OHGPCw84
VriPG+5w4h4XHnCsch833OHEPS484HjNfdxwhxP3uPCA4w33ccMdTtzjwgOO
t9zHDXc4cY8LDzjecf+//wCOsdEF
"]]}, {
Hue[0.9749516849970554, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlqFlEUBeCLI4eCUYI4iEFEgtj3XV7se2Ps+zImmoycCIIg3B24AEFr
5Ny5gzt17AbKHYgrUDFB/q+gKL4677yzZf7V3OKaiPj25/37/ff8nJ7d1U++
Hh9rKz/aqNe2dx+/f934Y/2K1+Exzo/jzZyfwJOc34q34e14Cu9obzZ8iPef
V+/fiXe3L782fXq7tOo9eC/eh/fjA/ggPoQP4yP4KD6Gj+MT+CSexm3UiWOG
HMcpchynyXGcIcdxlhzHOXIc58lxXCDHcZEcxyVyHJfJcVwhx3GVHMc1chzX
yXHMjrrhxIXjBn2cuHDM0ceJC8dN+jhx4bhFHycuHLfp48SF4w59nLhw3KWP
ExeOe/Rx4sJxnz5OXDge0MeJC8dD+jhx4XhEHycuHI/p48SF4wl9nLhwPKWP
ExeObtQTuOEOJ+5x4QHHM/Zxwx1O3OPCA4559nHDHU7c48IDjufs44Y7nLjH
hQccC+zjhjucuMeFBxyL7OOGO5y4x4UHHC/Yxw13OHGPCw84XrKPG+5w4h4X
HnAssY8b7nDiHhcecCyz/9+/AWBVdfY=
"]]}, {
Hue[0.21101966249684523`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd081LVGEUx/FDtbCCiAiyF/AWESUlpZWpqSdzerFS82V0HOf6zJujuGhj
+8d/oFV/wIVatG0dwqGFGNQfEEFcWraKmHZBL3Rv8HwHhuEzv3Puee7z3Hu6
9mSmuUdE3v35/v399/k2+unXyTflzWOa/aGhO+DD8FG4Ez4FR/AZ+Cx8Dj4P
d8MX4R74MnwF7oX71A71b789kvsq8mvwdbgfvgEPwIPwEHwTHoZH4FFYdbNv
Z/jph8xekd8K7WEZQw7LbVwflnHk4xp3/2hvdHVmeSG0h+UOcljuIoflHubD
ch85LBPIJ/B8PEAOy0PsHyyP0A/LJO4PlindP7b7dXIjz6eQT4e5TuN6sMHy
OFyPwh42WGbQD3vYYJlF/yzWDxvqZS7MdQ7zkRtymcd82MM2j/0ror+I9RfD
8zHksoDzW0A/coNlEf2wX9RCx96f7dd5PywlvbT1MT7YzvtL+v1Fybp6j2f9
yK2E+Uvh9RT2S+iHpRzO07K+346/7HuZz0dusCxj/bCHbRn9FcyvoL+C/Ycl
xv7HOD/kBssK9g/2K+iHxYWOYHXhehzsUZ/ABqewVMP1RlW8j9Ww3qHew0kV
54U8RS610FEN54ncIfe18HlLYEN9ilzqoSNYYVfH/Hq4vgS5IU9haYT1UQPv
A3IHeziBDU4buP+mPht6fmHrwIlsfhP3D7sm5iNPYINT9Msq9n8V54/cwR71
CXKDU1hamN8K90NhB3s4ga2lPSOFz69amVPkshbm0RrmI3fIPfIENtSnyGUd
89f/1/8GlMRX/A==
"]]}, {
Hue[0.44708763999663503`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzstuD2EYBvA3VpYSJY1YVCONiDiflX6oc1F1qFN1Wi21spEIieSNG3AB
EmZlb2/x7aRrNzDuQCytEP1H5jfJZPKb53vmmW2Lz2eW10XE6p/77/Pf9WPi
zYdvXzZ/31jWXpTpPe3oi+GhNa8v/XwDHuL8MPlWPIJH8XY8hnfgnezvKi83
vY93nwb5bryX/j68n/MHyuqryfGlsYEPkh+if7i8/To792tq8D9HyI/SP4aP
c/5E+fxzy8fXKwOP45OcP4Un+H7p/18W8tN9J44z5DjOkuOYJMdxjhzHeXIc
F8hxXCTHcYkcx2VyHFfIcUyR47hKjuMaOY7r5Dim+y44ccVxgz5OXHHM0MeJ
K46b9HHiiuMWfZy44rhNHyeuOO7Qx4krjln6OHHFcZc+Tlxx3KOPE1cc9+nj
xBXHA/o4ccXxkD5OXHHM0ceJK45H9HHiimOePk5ccTR9j+CCG5y4xRV3OBbY
xwU3OHGLK+5wLLKPC25w4hZX3OF4zD4uuMGJW1xxh2OJfVxwgxO3uOIOxzL7
uOAGJ25xxR2OJ+zjghucuMUVdzieso8LbnDiFlfc4VhhHxfc4MQtrrjD8Yz9
//4NTw7pDA==
"]]}, {
Hue[0.6831556174964248, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz7lqVVEUBuCFlaVglBQWMYiIiPNsNDsa5ynGIU7RY0wcKhtBLISFL+AD
CHIqn8JidWLtCxzfwNpKxQS534XD5bv//u+/z9alV/Mr6yLi25/n7/e/z8/p
uT395Ovxsbb6Qxv1+vbu0/cvm39sXPUGPMb5cbwFT+BJvA1vxzvwTryL++3G
e/E+vL+92fQxPnxe84H27e3s1PL2NR8kP0T/cHv/dWHx15W1+xwhP0r/GPlx
3ucE56fwSfqn6E9zvo3eLxv5zOj/5Qz56VEnjjPkOGbJcZwlx3GOHMd5chwX
yHFcJMdxiRzHZXIcV8hxXCXHcY0cx3VyHHOjbjhx4bhBHycuHPP0ceLCcZM+
Tlw4btHHiQvHbfo4ceG4Qx8nLhwL9HHiwnGXPk5cOO7Rx4kLx336OHHheEAf
Jy4cD+njxIVjkT5OXDge0ceJC8dj+jhx4ehGPYEb7nDiHhcecDxhHzfc4cQ9
LjzgWGIfN9zhxD0uPOB4yj5uuMOJe1x4wLHMPm64w4l7XHjAscI+brjDiXtc
eMDxjH3ccIcT97jwgOM5+7jhDifuceEBxwv2ccMdTtzjwgOOl+z/928kgNoe
"]]}, {
Hue[0.9192235949962146, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1LtrVFEQx/HBJpYWiaSwWKOISIjvaDSaSUw0b3djdte89BiNDxBsrKwG
CwtbsVM4IHZiJ1iOlYh/g3BAEIuA1luIinuR+S4sy2d/8ztz4d7dvZsPlrZ2
iMinP++/n/9eP8devh9de/a2V7tfaPROeBfcC/fDe+AaPADvhw/AB+FD8KA+
/tje6MxXHoKPYP4ofAzzx7V+OA887K98AvlJ9Id1ePvblzc9fV2fQn4a/RH4
DObPIh+Fz2H+PDwGa7w+U5w3Hm3j6E+gD8sF5LBMIp/E+VPIp7T2te/5q5Wq
fxE5LJeQwzKNfBrnz0TbjH7ufH/65HWVzyKfRT6nP0Y6vyaGdnfzOe35sO/F
4HaVz0cbLAvIF3D+IvYvon85zhss9dhX2Opx3mFpRGsD19uI5znmZSnOK2yw
w3IFfdhgh2UZ/WV9t/4ote9X9wt2WJrx/moT+5vx+XJYWvF51xZ+b634f+Ow
tKMVNthhuYo+bLDDsoI+bLDDsoo+bLDDsoY+bLDDso4+bLDDsoE+bLDDcg19
2GCH5Tr6sMEOS4quwQon2OAMO1xguYH9sMIJNjjDDhdYNrEfVjjBBmfY4QLL
TeyHFU6wwRl2uMByC/thhRNscIYdLrBsYT+scIINzrDDBZbb2A8rnGCDM+xw
geUO9sMKJ9jgDDtcYLmL/bDCCTY4ww4XWO5h/3//Brca37Y=
"]]}, {
Hue[0.15529157249600445`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz7tvzXEYx/EnJqNESQdDNSIi4n5X+nW/FVWXospPqctkkZgkT/wDBqOQ
32Q0GwzPJmb/wM9/YDYh2khfJzk5eZ3375PnnI0Lz2cWV0XEtz/vv5//Xj8n
p3f04y9GR9rSF22lV7dXH75/Wf9j7ZLX0EfwKN6Ax/B4e/11dv7X1LI30Tfj
LXgr3sbv3Y538vwuvJvn97SX697Fm4/L3kvfx34//+cA/SD7Q/TD+AjPT+Cj
3DuGJ3m+tfefJ+beflrq2ejHVzpxnKDjOEnHcYqO4zQdxxk6jrN0HOfoOM7T
cVyg47hIxzFFx3GJjuMyHccVOo7plW44ceG4yh4nLhwz7HHiwnGNPU5cOK6z
x4kLxw32OHHhuMkeJy4cs+xx4sJxiz1OXDhus8eJC8cd9jhx4ZhjjxMXjrvs
ceLCMc8eJy4c99jjxIXjPnucuHB0Kz2GG+5w4h4XHnA84D5uuMOJe1x4wLHA
fdxwhxP3uPCA4yH3ccMdTtzjwgOOR9zHDXc4cY8LDzgWuY8b7nDiHhcecDzm
Pm64w4l7XHjA8YT7uOEOJ+5x4QHHU+7jhjucuMeFBxzPuP/fvwEtxq6q
"]]}, {
Hue[0.39135954999579425`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzzuPTWEUBuAVlVJiyBQKRERE3O+G+dxvgzEugzFsw7hUGolKsuIPKJRC
dqVUKxSrE7U/sP0DtQoxEznPSXZ2nvOu97w5GxaezyyuiIhvf56/73+fn5Ov
v87O/5oaa0tftFGvbNM7+o0vxpe9Co9xP47Xcb8eb+R+E97M/Ra8FW/D2/FO
vAvvxnvayzXv4s3H1Uve2159+P5l7Y9l7+N+f3v/eWLu7adlH+D/HKR/iP5h
fARP0D/K7x9jf5J+G82zkR8fdeI4QY7jJDmOU+Q4TpPjOEOO4yw5jnPkOM6T
47hAjuMiOY4pchyXyHFcJsdxhRzH9KgbTlw4rtLHiQvHDH2cuHBco48TF47r
9HHiwnGDPk5cOG7Sx4kLxyx9nLhw3KKPExeO2/Rx4sJxhz5OXDjm6OPEheMu
fZy4cMzTx4kLxz36OHHhuE8fJy4c3ajX44Y7nLjHhQccD9jHDXc4cY8LDzgW
2McNdzhxjwsPOB6yjxvucOIeFx5wPGIfN9zhxD0uPOBYZB833OHEPS484HjM
Pm64w4l7XHjA8YR93HCHE/e48IDjKfu44Q4n7nHhAccz9v/7N7Ezd/Y=
"]]}, {
Hue[0.6274275274955841, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.8505, 0.4275, 0.13185],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqVWEUhuGFlaVglCAWMUgQEefZaH41zlOM87yNicbKRhAFYd2BFyDo
ruztLVab2hvY3oF4BSomSJ4Dh8Nz3v9jbZl7NbuwJiKW/nz//v77/Jya2dWP
vx4dact/tNVe295/+v5t44/1y15HH8GjvN9MH6OP07fiCd5vw9t5v4O+E+/G
e/De9mbDx/jwZcX72tdfmz6/W1zx/rb0dnpyfmLFB/BBfAgfxkfwUXwMT+Lj
+ASewm21E8dJOo5TdByn6Tim6TjO0HGcpeM4R8dxno7jAh3HRTqOS3Qcl+k4
rtBxXKXjuEbHMbPaDScuHNfZ48SFY5Y9Tlw4brDHiQvHTfY4ceG4xR4nLhy3
2ePEheMOe5y4cNxljxMXjnvsceLCcZ89Tlw4HrDHiQvHQ/Y4ceF4xB4nLhyP
2ePEheMJe5y4cHSrPYYb7nDiHhcecDzlPm64w4l7XHjAMcd93HCHE/e48IDj
Gfdxwx1O3OPCA4557uOGO5y4x4UHHAvcxw13OHGPCw84nnMfN9zhxD0uPOB4
wX3ccIcT97jwgGOR+7jhDifuceEBx0vu//dvGFTOHA==
"]]}, {
Hue[0.8634955049953739, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.499929, 0.285875, 0.775177],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFnEUxuGDlaVglCAWMUgQEffdaP5q3LcY932MicbKRhAF4dyBFyDo
VPb2FqdN7Q2MdyBegYoJkmfgY3i+d36cLXOvZhfWRMTSn9/f97/n59TMrn78
9ehIW/6jrfba9v7T928bf6xf9jr2ETyKN9OP4XG+34on8Db67ew78E6+3433
4L3tzYaP8eHLive1r782fX63uOL9bent9OT8xIoP4IP4ED6Mj+Cj+BiexMfx
CTyF22onjpPsOE6x4zjNjmOaHccZdhxn2XGcY8dxnh3HBXYcF9lxXGLHcZkd
xxV2HFfZcVxjxzGz2g0nLhzX6XHiwjFLjxMXjhv0OHHhuEmPExeOW/Q4ceG4
TY8TF4479Dhx4bhLjxMXjnv0OHHhuE+PExeOB/Q4ceF4SI8TF45H9Dhx4XhM
jxMXjif0OHHh6FZ7DDfc4cQ9LjzgeMp93HCHE/e48IBjjvu44Q4n7nHhAccz
7uOGO5y4x4UHHPPcxw13OHGPCw84FriPG+5w4h4XHnA85z5uuMOJe1x4wPGC
+7jhDifuceEBxyL3ccMdTtzjwgOOl9z/79/p1Mp2
"]]}, {
Hue[0.09956348249516367, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.12490296143062507`, 0.63, 0.47103259454284074`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlqFWEUhuGDI4eCUTJwEIMEEbHvjcmvxr6L0dg3lZjYjJwI4kA4O3AB
gtTIVTg404zdQLkDl2DEBLlPwaV47stXZ/fy+4XVLRGxtv77+/73/J6dP9hP
fhgfaxt/tFFvbZ+//fyx89f2DW+jj+FxvAtP8L1J+h48hffifXg/PoAPcf8w
PtI+7vgaX75v+ig+1tY+zU2vTG36OD6BT+JT+DQ+g8/iaXwOz+BZ3EadOM7T
cVyg47hIxzFHx3GJjuMyHccVOo6rdBzX6Diu03HcoOO4Scdxi47jNh3HHTqO
+VE3nLhw3GWPExeOBfY4ceG4xx4nLhz32ePEhWORPU5cOB6wx4kLx0P2OHHh
eMQeJy4cj9njxIXjCXucuHA8ZY8TF45n7HHiwvGcPU5cOF6wx4kLx0v2OHHh
6EY9gRvucOIeFx5wLHEfN9zhxD0uPOBY5j5uuMOJe1x4wPGK+7jhDifuceEB
xwr3ccMdTtzjwgOOVe7jhjucuMeFBxyvuY8b7nDiHhcecLzhPm64w4l7XHjA
8Zb7uOEOJ+5x4QHHO+7/9x/Xi8Qb
"]]}, {
Hue[0.3356314599949535, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.823948950768196, 0.29474475384097976`, 0.19291741323314934`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz0lqFWEUhuGDI4eCUTJwEIMEEbHvjcmvxr6L0dg3lZjYjJwI4kA4O3AB
gtTIVTg404zdQLkDl2DEBLlPwaV47svHoXYvv19Y3RIRa+u/v+9/z+/Z+YP9
5IfxsbbxRxv11vb5288fO39t3/A2+hgex7vwBJ7Ee/AU3ov34f34AD6ED+Mj
7eOOr/Hl++b3HsXH2tqnuemVqU0fxyfwSXwKn8Zn8Fk8jc/hGTyL26gTx3k6
jgt0HBfpOOboOC7RcVym47hCx3GVjuMaHcd1Oo4bdBw36Thu0XHcpuO4Q8cx
P+qGExeOu+xx4sKxwB4nLhz32OPEheM+e5y4cCyyx4kLxwP2OHHheMgeJy4c
j9jjxIXjMXucuHA8YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4c
3agncMMdTtzjwgOOJe7jhjucuMeFBxzL3McNdzhxjwsPOF5xHzfc4cQ9Ljzg
WOE+brjDiXtceMCxyn3ccIcT97jwgOM193HDHU7c48IDjjfcxw13OHGPCw84
3nIfN9zhxD0uPOB4x/3//gOj2b6i
"]]}, {
Hue[0.5716994374947433, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.42126358105951733`, 0.33224185136428963`, 0.9],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqF2EUh+GDlaVglCAWMYhIEPd9yxf33Rj3fYyJJpWNIAjCuQMvQNCp
7O0tTmvtDYx3IF6BignyfwaG4ZmXH2fL/Ku5xTUR8e3P+/f77/k5Pburn3w9
PtZWfrRRr8Xr8Bgex5vxBJ7EW/E2vB1P4R14J96N9+C97d3H7183/li/4n3t
zYYP8f7zqve3L782fXq7tOoD+CA+hA/jI/goPoaP4xP4JJ7GbdSJY4aO4xQd
x2k6jjN0HGfpOM7RcZyn47hAx3GRjuMSHcdlOo4rdBxX6Tiu0XFcp+OYHXXD
iQvHDfY4ceGYY48TF46b7HHiwnGLPU5cOG6zx4kLxx32OHHhuMseJy4c99jj
xIXjPnucuHA8YI8TF46H7HHiwvGIPU5cOB6zx4kLxxP2OHHheMoeJy4c3agn
cMMdTtzjwgOOZ9zHDXc4cY8LDzjmuY8b7nDiHhcecDznPm64w4l7XHjAscB9
3HCHE/e48IBjkfu44Q4n7nHhAccL7uOGO5y4x4UHHC+5jxvucOIeFx5wLHEf
N9zhxD0uPOBY5v5//wY6gmov
"]]}, {
Hue[0.8077674149945295, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.7239916650994997, 0.6554435183443889, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd009LVFEYx/GHamEJERFlJniLiJKK0srKzMdJ7Z+NOprjzOj1OOPMGC7a
2P74Blr1Ai4U7WsrwqFFFNQLiBZdgjatIqZd0B+6QzzfARk+/u7vPueec+do
9WGhvkNE3v75+/v97/NtJOwd3H61/5Bm/1DrDv3468hWZaPtfcgPwF1wD/oR
8mPwcfgE+ieR98Gn4bPon0N+Hu6HB+AL8EX4EjyoW19e9nx6fjDzZeRX4Kvw
EHwNHoavwyOwWnvF/oxa+1H0c8hzyG8gh2UM+Rj648hhmdCNgdfDj9638wmN
+3601nu7svwmclhuIYflNnJY7mB9sNxFDssk8kk8/z3ksORxfnnkU1j/FPJp
myvsp+1+BuQyY3OFPRxm0C9gPuwLdr0Blln0YQ+HWfTnrHUOfTjAch/zYQ8H
WOYxH/bz6MNSRL+I+UXsP3JZwPnBfkF35958za+3+8ilhH7JXu/hUNLxjp0/
Wy/a/bK1lvXM5oe4s9Xuw6Fs7ycVa4V9BX1YFq11Ud9tx593PTuc9ZEHWJaw
/iWsHw6wxPr9aSn09mfzNLb38zHOD5Zl7D/s4bCM/XPWEaywgz2cwMHZ+anD
+7eC+St4HuQO9nCCfkCewlK1+x3BCrsqzhdOqvY8A/IUudSso5p9/xS5gz2u
T+CA69Ma3r9V6whW2MEeTlbtfgXkKSx1PH8d85G7On6fcAIH9FNYGpgPa8Pe
zzXw/MgT9APyFLk0MR9W2DXx/HACBzht6uOhJ6c293Rn89esI1hhB3s4gQOc
rtn1yAPM/+/fvttJ7Q==
"]]}, {
Hue[0.04383539249432289, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.6746366424582266, 0.252, 0.45055901160272827`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz7lqFWEYx+EXK0vBKEEsYpAgIu670Uz2fd+Xk0ySc7JUNoIoCIM34AUI
OpW9vcXXSWpvYLwDsbRSMRHmCYTwz/P9zptc2nk+1zoVEUd/vv/+/Pf1o2fm
Rtn5or0tO/5FVt+n2WfYbex29kV2B7sze/t1ufFr4mRfxrvYV9hX6a/h19k3
2bfYt7M3H759Of/97PG+w77L+3vs+7x/kB29Guhudp3sh9nLc+/j3aeT/Yj3
j/l/nvD53fRP6Z+xe3ifZZ9/Xvj4+uB4Fxnve+u76KXvq/99RR/eT9+PD+AD
+CA+iA/hQ/gwPoyP4CP4KD6Kj+Fj+Dg+jk/gE/gkPolP4VP4ND6Nz9Q9m6l7
gSc8Zuln6fGExxz9HD2e8Jinn6fHEx4L9Av0eMJjkX6RHk94LNEv0eMJj2X6
ZXo84bFCv0KPJzxW6Vfp8YTHGv0aPZ7wWKdfp8cTHhv0G/R4wqNB36DHEx6b
9Jv0eMJji36LHk945HXvyOue4Tle4CWe8AqPbe5vcx/P8QIv8YRXeOxwf4f7
eI4XeIknvMJjl/u73MdzvMBLPOEVHk3uN7mP53iBl3jCKzxa3G9xH8/xAi/x
hFd47HF/j/t4jhd4iSe8wmOf+/vcx3O8wEs84RUeB9w/4D6e4wVe4gmv8Djk
/uF//w1ADT5k
"]]}, {
Hue[0.27990336999410914`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.12582006271512805`, 0.5293439498278976, 0.7809840752581536],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzzuPDmEYBuAnKqXEki0UayMiIs5ni9c6s1jrsFjLOFNpJCrJE39AoRQy
lVKtUDydqP2B8Q/UKsRu5LsmmUyuud977sz6+8/nHq2IiG9/7r/Pf9fPo7Pb
+skX42Nt6UUb9Uq8Co/hcbwOT+DJ9vrr/OKvmWVvIN+IN+HN9LeQb8Xb8Q68
s7368P3L2h+rl7wL7+b8HryX8/vayzXv4s3HZe8nP0D/IP9ziHyK/mHyI/go
59uos7F3bNR5jP50e/95auHtp+V8mvw438dxghzHSXIcp8hxnCbHcYYcx1ly
HOfIcZwnxzFDjuMCOY6L5DgukeOYHXXDiQvHZfo4ceGYo48TF44r9HHiwnGV
Pk5cOK7Rx4kLx3X6OHHhmKePExeOG/Rx4sJxkz5OXDhu0ceJC8cCfZy4cNym
jxMXjkX6OHHhuEMfJy4cd+njxIWjG/UEbrjDiXtceMBxj33ccIcT97jwgOM+
+7jhDifuceEBxwP2ccMdTtzjwgOOh+zjhjucuMeFBxyP2McNdzhxjwsPOB6z
jxvucOIeFx5wPGEfN9zhxD0uPOB4yj5uuMOJe1x4wPGM/f/+DW9spwE=
"]]}, {
Hue[0.5159713474939025, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[
0.8604677779867332, 0.4773388899336664, 0.10673699943582014`],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1L9rk1EUxvGDSx0dWungEGsRkVJ/V1tbe0y11Ta1aWrztk2rt9X+AsHF
yeng4OAqbgoXxE3cBMfjJOLfIFwQxKGgcwbRYl7kfgMhfPKc554X3jc5uvGw
sXlARD7/fe9//nv9Gn/1YbT1/F23dr7Q3AfhQ3A33AsfgStwH9wPH4dPwCfh
AXgQPg2fgc/qk0/FWrtW+hx8HvMX4CHMX9T6qdj3qLf0JeTD6I/o0N73r2+7
ejq+jHwU/TH4CubHkWtuU8xfzW2wVPPrsyrOn8D5E+hfQx+W68hhmUQ+ifOn
kE9p5VvPi9fLZf8GclhuIodlGvk0zp/JbTP6pf3j2dM3ZV5DXkM+qz+H27+r
g4c7+ax2fTz2cmCvzG/lNljmkM/h/Hq+X+uYr+fzDss8+rDNow9LI7c2sL+R
n+eYl4V8XmGDHZbb6MMGOyyL6C/q+9XHoXhQ3i/YYWnm91eb2N/Mny+Hpcif
dy3weyvy/xuHZSm3wgY7LMvowwY7LCvowwY7LC30YYMdllX0YYMdljX0YYMd
ljvowwY7LHfRhw12WELuCqxwgA2OsMMJlnXshxUOsMERdjjBsoH9sMIBNjjC
DidY7mE/rHCADY6wwwmW+9gPKxxggyPscIJlE/thhQNscIQdTrBsYT+scIAN
jrDDCZZt7IcVDrDBEXY4wbKD/bDCATY4wg4nWHax/7//AKwt5TY=
"]]}, {
Hue[0.7520393249936888, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.790588, 0.201176, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqEGEUhuGDlaVglBQWMUgQEffdaH417lFjXOIWHWPiUtkIYiEcvAEv
QJCpvAqL00lqb2C8A2srFRMkz8AwPPPycbYvvp5b3hARK3/ev99/z8+p2b39
+JvRkbb6o633RrwJj+BRvA2P4fH24dv8wq+ZNe+gT+CdeBf73fQ9eB/ejw/g
g/gQPtzef/7+deuPzas+0t5u+RQfv6z5KD7WVt5NTy5NrPk4PoFP4kl8Cp/G
U7itd+I4Q8dxlo7jHB3HNB3HeTqOC3QcF+k4LtFxXKbjuELHcZWOY4aO4xod
x3U6jht0HLPr3XDiwnGTPU5cOObY48SF4xZ7nLhw3GaPExeOO+xx4sJxlz1O
XDjm2ePEheMee5y4cNxnjxMXjgfsceLC8ZA9Tlw4HrHHiQvHAnucuHA8Zo8T
F44n7HHiwtGt9xhuuMOJe1x4wPGU+7jhDifuceEBxyL3ccMdTtzjwgOOZ9zH
DXc4cY8LDziWuI8b7nDiHhcecCxzHzfc4cQ9LjzgeM593HCHE/e48IDjBfdx
wx1O3OPCA46X3McNdzhxjwsPOF5x/79/A+vJv5Y=
"]]}, {
Hue[0.9881073024934821, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.192157, 0.388235, 0.807843],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqEGEUhuGDlaVglBQWMUgQEffdaH417lFjXOIWHWPiUtkIYiEcvAEv
QJCpvAqL00lqb2C8A2srFRMkz8AwPPPycbYvvp5b3hARK3/ev99/z8+p2b39
+JvRkbb6o633RrwJj+BRvA2P4fH24dv8wq+ZNe+gT+CdeBf73fQ9eB/ejw/g
g/gQPtzef/7+deuPzas+0t5u+RQfv6z5KD7WVt5NTy5NrPk4PoFP4kl8Cp/G
U7itd+I4Q8dxlo7jHB3HNB3HeTqOC3QcF+k4LtFxXKbjuELHcZWOY4aO4xod
x3U6jht0HLPr3XDiwnGTPU5cOObY48SF4xZ7nLhw3GaPExeOO+xx4sJxlz1O
XDjm2ePEheMee5y4cNxnjxMXjgfsceLC8ZA9Tlw4HrHHiQvHAnucuHA8Zo8T
F44n7HHiwtGt9xhuuMOJe1x4wPGU+7jhDifuceEBxyL3ccMdTtzjwgOOZ9zH
DXc4cY8LDziWuI8b7nDiHhcecCxzHzfc4cQ9LjzgeM593HCHE/e48IDjBfdx
wx1O3OPCA46X3McNdzhxjwsPOF5x/79/A+vJv5Y=
"]]}, {
Hue[0.22417527999326836`, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[1., 0.607843, 0.],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUBuCDlaVglCAWMYiIiPu+5XPfosa4xC06RqOxshEEQTh4A16A
oFPZ21ucTqy9gfEOxNJKxQTJM/AzPP973nk3zD2fnl8REV///P6+/z0/Jt58
mZn9NTnSFv9oy72yTW3vx1+MLnkV+QgexevxGN8bJ9+IN3G/GW/hfivexv0O
vJP7XXg393vwXryvvX7/7fPa76sXvb+9XPMu3n5c8oH26ee6D68WlnwQH8KH
8RF8FB/DE7gtd+I4To7jBDmOk+Q4TpHjOE2O4ww5jrPkOM6R4zhPjuMCOY6L
5DgmyXFcIsdxmRzHFXIcU8vdcOLCcZU+Tlw4punjxIXjGn2cuHBcp48TF44b
9HHiwnGTPk5cOGbo48SF4xZ9nLhw3KaPExeOO/Rx4sJxlz5OXDju0ceJC8cs
fZy4cNynjxMXjgf0ceLC0S33GG64w4l7XHjA8ZB93HCHE/e48IBjjn3ccIcT
97jwgOMR+7jhDifuceEBx2P2ccMdTtzjwgOOefZxwx1O3OPCA44n7OOGO5y4
x4UHHE/Zxw13OHGPCw84FtjHDXc4cY8LDziesf/fvwHzHXX3
"]]}, {
Hue[0.4602432574930617, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.596078, 0.109804],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd00trE1EYxvEXdVEVRES0aqGjiGhR0VatWmtf08a7sU1vadJOJpdJIl24
qfvTL+DKDzCguNdtKRxciIJ+AHHhILhxJRJ3ghecIO8/UMKvz3nOZc7kcP1h
Md4iIm///P39/vf5NuF3jW6+2rNfs3+odR+8G94L98MDcAAfgY/Cx/Tjr0Mb
lbWejyMfgk/Cp9E/g/wsPAyPwOfg8/AFeBS+CF+CL8NjuvHl5cCn5/syX0E+
Dl+FJ2C1drBcQw5LDnkOz3fS2k2iP4V8Cnke8+cx/3XksNzA/LDc1LWR1+OP
3vdyWG4hh+U2cljuIIflLvYHyz3ksBSQF3D++8hhmbbjdRrjYQ/LjD2Pwm5G
w6Ef3dXB/qyPXIo21yL6sIdlFuvPYv+wh2UOfdjNoQ/LvLXOow97WBaw/gL2
j9zDsoj1YbeIPiwl9EvYfwn3h1yWcH+wgz0sZfTLuj335mthtdeHfVnzfVt/
dl/0+hVrreip9Q/hzm6vD/sK1l+28yvslu38HpYVO7+u6LvN8PO2ZweyPnIP
S4j9ww72IfpVrF9Fv4rnD0tkHcAKR7CL7PNKYA+n6EvN5gGsNaxfw/uJPIE9
nGJ+qWP9Os4PRxjv6vZ5J7CHU1ga9v4CWOEIdg39/nTJDw5n71vSsO+fR54i
l6Z1AGvT9qMm1ocT2MNpE+ePcf4YvwfkEXKHPIF9jPPHOH8L52/Z8QpHsEM/
Qe6Rpy38ftt2fNDG/bdtP8J4Byewh1PMJx2s38H9w1FHH489ObG+42C2PpzA
Hk5heWAd/Pdv+r1KTg==
"]]}, {
Hue[0.696311234992848, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0.567426, 0.32317, 0.729831],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz0tvDmEYBuAnVpYSJV1YVCMiIs5npW8PzkXVoWjLKKVWNk26kjzxByws
hczK0trC4t2JtT8w/oG1FaJfZK5Jvkyu7577vWd2Lr+cW9kUEd/+/P7e/10/
x19/nV/6NTNUNv4ofW/GW/AQHsY78AgexbvwbrwH78X78H58EB/Ch/GRMnug
HV0bHvgo+THy4+XVh+9ftv/YuuET5CfxKXya/pmyvu1dvPk48BjPn8XnyvvP
YwtvPw08zvuW/vlZ6E/0nTgm6U9y/lTfOUV/uv9+Oc33nud8HBfIcVwkx3GJ
HMdlchxXyHFcJccxQ47jGjmO6+Q4bpDjmO274MQVx036OHHFMUcfJ644btHH
iSuO2/Rx4orjDn2cuOK4Sx8nrjjm6ePEFcc9+jhxxXGfPk5ccTygjxNXHAv0
ceKKY5E+TlxxLNHHiSuOh/Rx4orjEX2cuOJo+h7BBTc4cYsr7nA8Zh8X3ODE
La64w7HMPi64wYlbXHGH4wn7uOAGJ25xxR2Op+zjghucuMUVdzhW2McFNzhx
iyvucDxjHxfc4MQtrrjD8Zx9XHCDE7e44g7HKvu44AYnbnHFHY4X7P/3byWY
sp8=
"]]}, {
Hue[0.9323792124926413, 0.6, 0.6],
Directive[
PointSize[0.002777777777777778],
RGBColor[0., 0.588235, 0.705882],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzctuTnEUxuEVI0OJRhoxKBEREeez0r/zqag6FFW2UmpkYiSRrLgFY+wr
kJgZGKyZGLuB7Q7E0AjRRvp8yc6XZ//2m7Vx/vn0wqqI+Prn+fv/7/dj4vWX
mblfkyNt6UVb6dV4DR7Bo3gDHsOb2ttP47NvPix7M30L3oq34e14B97Vpnb2
m16MLns3fQ/ey/f76PvpB/BBfAgfxkfaq3ffPq/7vnbJR/F4+/hz/fuXi8s+
ho/jCdxWOnGcoOM4Scdxio7jNB3HGTqOs3Qc5+g4ztNxXKDjuEjHcYmOY5KO
4zIdxxU6jqt0HFMr3XDiwnGNPU5cOKbZ48SF4zp7nLhw3GCPExeOm+xx4sJx
iz1OXDhm2OPEheM2e5y4cNxhjxMXjrvsceLCMcseJy4c99jjxIVjjj1OXDju
s8eJC8cD9jhx4ehWegw33OHEPS484HjIfdxwhxP3uPCAY577uOEOJ+5x4QHH
I+7jhjucuMeFBxyPuY8b7nDiHhcecCxwHzfc4cQ9LjzgeMJ93HCHE/e48IDj
Kfdxwx1O3OPCA45F7uOGO5y4x4UHHM+4/9+/Afcreio=
"]]}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None, None}, DisplayFunction ->
Identity, DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, 4.5818490226910304`},
PlotRange -> {{0, 201.}, {4.613902690882107, 6.601230118728877}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, 4.5818490226910304`},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {None, None}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compress all cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {4.613902690882107, 6.601230118728877}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}]},
"RowDefault"]], "Output",
CellChangeTimes->{
3.706798893478465*^9, {3.706798924959137*^9, 3.706798944670067*^9}, {
3.706799731083605*^9, 3.706799798163759*^9}, 3.706799829181085*^9, {
3.706799909710371*^9, 3.706799946535643*^9}, {3.7068000056207952`*^9,
3.706800012855591*^9}, {3.7068000489505367`*^9, 3.7068000660342693`*^9},
3.706800393650983*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Row", "[",
RowBox[{"{",
RowBox[{
RowBox[{"ListLogPlot", "[",
RowBox[{"bdmcollidingruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<BDM collapsed cases\>\"", ",", "14", ",", "Black"}],
"]"}]}]}], "]"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{"entropycollidingruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{"\"\<Entropy collapsed cases\>\"", ",", "14", ",", "Black"}],
"]"}]}]}], "]"}], ",",
RowBox[{"ListLogPlot", "[",
RowBox[{"compresscollidingruns", ",",
RowBox[{"PlotRange", "\[Rule]", "All"}], ",",
RowBox[{"PlotTheme", "\[Rule]", "\"\<Business\>\""}], ",",
RowBox[{"AspectRatio", "\[Rule]", "1"}], ",",
RowBox[{"ImageSize", "\[Rule]", "250"}], ",",
RowBox[{"Joined", "\[Rule]", "True"}], ",",
RowBox[{"PlotLabel", "\[Rule]",
RowBox[{"Style", "[",
RowBox[{
"\"\<Compression collapsed cases\>\"", ",", "14", ",", "Black"}],
"]"}]}]}], "]"}]}], "}"}], "]"}]], "Input",
CellChangeTimes->{{3.706799859005795*^9, 3.706799862836803*^9}, {
3.706800311489006*^9, 3.7068003630545797`*^9}}],
Cell[BoxData[
TemplateBox[{GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJw9kwk01Xkfxi9RIlQUUxGNhBYlS0V5uohSlnstEe5+XWVUc6Qm0m20J0Th
UFGUIt62aRkl9aaZooYiW8rWKpVCadE7c97fd5zjOB/P//k9v+f7/f9Nxat5
MlUOh3P7799//v7/552z20+CtMh0fbB/YGMB/1HZemINnOKt/TFDZwzjkUjb
ENse84JYH+bhlUmH3hMbYmniw4aRNmMZT4BWkOYPazuJTeCic1zbwo14ErKk
ASq528hvhp3fh5S2PSc2R+lsvyi1ZLqPBWRxpuese0i3Qon/l+7RvcTTUMox
3DLzGfEM9Ji15cUEUN5MzEr17ktaRTwLWzBPck9CbIN1o/fLdSqJZ+OsQEMR
/YsBY1u85ConeWaRbodd0tjgEaMozx7ny+esXGFGugO66s2DT/eRPgfSV5Xp
DoHEc7FqX8Uw9yZ6fh7GXLcdlfXvvBzh+iFnV+piyndC7qYKvTvrDRnPx7D9
Z3S+80lfgNKSgrxPx8jvjLcrv/X7LiMdOPgkSr3BhrESuH11U70vl/SF0BZz
/GbUkb4Q6pHaVtmtpHOxtveveWeHs3wlF79pFnBu69F9XNCv8kSj7jDpLig3
fPqsLoZ0V4R1tVy8XEq6K6pX2la65ZPuBi/rsFPaj0h3Q1xm7htV7R+Yvgg5
9T7tuyLofovwTtfVsOYz9XWHdFCy9EUjY6U7jnhWlwoNSPdAuf32AflrNn+l
B350S3g8Y4Der8WobhlWP7GG9MV4kvTSI+4j7WsJTm4UXMwZTecvwdSsAxf4
naR7IqBy6y1PK9I9ER+VWtHURPpSNEq+5hSfoPsvRfKlLtPt36n/MrSvuSaI
sx3H9GX4FGI/VFPImOMFzY2i/8xoY/NQemGvv5Mw25F0b5Qk1EtrB0j3xqii
Mdcq82l+Prg2nzv8XBvLgw/SeXfT+uLpeR8kObnP/JLN9HIfDDE76nTmFd3P
F/EDb4718dnz8EXLT7H6Oa20L180quy3jOshvy+OtyfkdT0jPw/PXd1cUnZS
Pg9L+5f8GatO+Tx8aCvkHcwjPw/ql/S7/eTk50Mn8f7kWRnk52N32aJDjnS+
ko8s7ucn7mvYeeV8xAbyTKRZ1N8Pv5w0tg2tJP/fXJGy1uMr7cMPefMi04xi
Kd8P97VOZ5T5Ub4/Pqg5u+zJIb8/OrX7GzxU6P7+mHpXsyNxA+X748bRud3n
LSg/AHuLOyY4/0rzC8CbzScsk/eSPwBfTd/YZVWRPwCZWgfVnq8kfyB0Y9sS
Npxl+0Yg9FxsBjOT6H0JhNd12bpllYzLA2EfKlCcxHjmX44q6Sprl1LGWI7J
Q7amdG5jrFwO5zGrI89NncD8y7E+aMHRgUJ6v4Iwr/vP6sY9lB+Em4Wbeztq
KD8IVyap23i9pvwgWFsGJfEKKT8Yoo7aEMdvlB+M2px7YV1ylqcMRoV/pUnl
XcoPxvjB2Cm26Yw5KzA8onZk9hbyr0BHmWBwx2O6/wr0jVxn2wHyr0BixZpP
iwPIH4I5Zc9PnCIdIdBf4+492ZP8ITA95jj4tJ7uH4JIR9X9q6dQ/1AMdbiZ
Yc+h/qGIfvBA8bqA9hcKgx1qVz6+o/2F4m7zxbSiL7S/MAQ+KvAqsiN/GKrM
m6abpdD8wpBw1iDJ+Tjlh8F1RNyWDNonR4Bav/Nbo/nkFyD1bQlXNZ78Amgt
DGvS/Uj5Asw2Pu+RcoXyhbDKCrkcEMeeNxFi7ONdBRNn0nlC9FkN9Ja4MxYK
EXWzd5NKHp0vxAsjG9M/jjDOFULtovx44h3KE8Ln46FRxuFMbxWCa1//V/VV
ur8IL92iDzssYPM2EcEyx+HKsQTapwgHBi9Ipt2gfBEmzM18OTCd9iPCVE1V
wR/VjHNFSH7f+D15Ge1bBN2T3aJ84lYRbjVk9VqMp/2LkbMr5uw2f8YmYlgk
eBblDzFi+WIURUT32OowForB93Kck6xkrBTDtyctntPL/LliKFr8m52mM71c
jN+/7MuPqaF8Mbhcy9kNvvT+S6Dj1jzNw5n6S5Dm/Zn3ewX1l6DTaOKNfT2M
hRJc81J7eDiUvg8Jvhm+TK37TP0l6L/vsGPYOsblEtwa6vK+2ZPyJTDJuyPd
eZr6S/FOb5w8Zxz1l6K/NSEvJZO+BykKF3kbFEyg/lIUD2nptpRTfym6v6U5
H31L/aU4ZS24bWlJ/aXgXn7KzzZn3CqFe1SdqhkxR4bQp+4awd6MTWSI2OE0
tuk55cugr3Kh77o+5cvw9qHx/SWHqb8MMdoWM+7upnwZfIu9N9j9+73L0DFl
YdWvU6i/DHq6reZ2X2j+ckx7VtKYLaH+cqyPSJ+olUD5cgSEVsVsUad8OQKv
Du5WPUP5chzmSprO/5fy5cjcvCeX85ny5RD+/Hhl8SPKl+NCxER94yDqHw6x
3Q1Xo93UPxyyTIOo1c30/oUj5fpoPTnfmOWHo/SWaF/waMbKcFSla3sXOzHO
Dce9cfY1iddp/uFoD+JrLXxF8w9HYNWlew8/UL4C++cPu5Fnw/wmCpyQNu+Z
yWUMBXRGvCuK/kr9FYidujU/SIfyFUiddOCDty3lK6Dbtb2uzJpxuQJux9bG
1/oxblVgx4Pcny84MOZEQLbm0W8aZ6h/BAQ85bZ1R4zwPxwAWZk=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdz1lIVGEYh/HPglAiSFs0MNCSsIXcslwqX/d9G/f9uI8XEUldaXFuIijB
q7IS6VAhEV1lXRnyIWmFFVGiCIqnG4Mi6SqyhRaaT5hnYBj+85tn3pnIttOe
zg1KqRd/n/9e/z++pGVPj9YHvdkhvjekezHJO/nO7EC5NBaz5r41e6tMX5vb
8j0o1Le3y9Tkho1Rm8wOk+Le+wkL4+bz4fLSOxz9bc7sCDl3aubm7s9m75HZ
uPG+tQ9mR0nQxaXUq2Nm75PAlabHU0/Mjpan+/vfN02afUBurU449z6afUjK
bl9f/DVh9mFJORg6svxom2/Hir6Smja7aHachAyOBLcl7/TteBlY29ubNmP6
BIncnNTwetXsI5L7amBQ1r8/UWovVN7NCDf//6jUxTz88WDJ7GMSYP18rkLN
TpIzXwsSP62YnSx98ec9Q8/M/RQZLg+OLggwnio31OjCfEiYbx+XO/0xQ0tn
zT4hv3NH52N3mc+flOXLAYXeNfP70uDi77bA0+Hp8Ax4BjwTngnPgmfBs+HZ
8Bx4DjwXngvPg+fB8+H58AJ4AbwQXggvghfBi+HF8BJ4CbwUXgov83cp83cb
ruGqHH05eriGKw96D3q4hqsK9BXo4RquKtFXoodruKpCX4UeruGqGn01eriG
qxr0NejhGq5q0deih2u4qkNfhx6u4aoefT16uIarBvQN6OEarhrRN6KHa7hq
Qt+EHq7hqhl9M3q4hqsW9C3o4RquLH+PsPxd4BbchjtwDXfhqhX3W3EfbsFt
uAPXcBeu2nC/DffhFtyGO3ANd+GqHffbcR9uwW24A9dwF646cL8D9+EW3IY7
cA134aoT9ztxH27BbbgD13AXrrpwvwv34RbchjtwDXfhqhv3u3EfbsFtuAPX
cBeuvLjvxX24BbfhDlzDXbjqwf2edf8DnEdjrg==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1H9MlVUcBvCT+QOmFiUoWk3NQsJCjRIUxYeLgqDIvVxAfhWvGiCEWGqu
ZcvTzCaxi1rMQitezZgTHLnUMjWOpYH+UZSmzl/dSMXpUDYidcSs1vut+dzt
3d3nPue537Ozs3f0giXphX2UUkf/fv75/vfTOT3+w+bm/q0hcH6AvhUw4E6L
OADBJ74ZvLpUHISG+6Pq2ixxMKrWn1zybcxQx6HI7+w6kTNR/DDyao9cSjku
60eh5eflKVuPiR/F3fMfw7g+xaN9bcGOw7B0S1ZPUbs4HLcu7w9b1C2OwLKI
sVV/vCL9JxF6BBVV/+0/EsXjXYUjjz/oeAJGzMnpPlwg+USUR5RN910WP41p
Nf0KIhtl/1G4b++VN9cMGeb4GYy/sOZExyOSP4sjK0su1kM8CctXmJLoXHE0
qrJOD897VxyDcRO7ttpF4slI+qhs7GGf/P8UxFx4PfL6p+JYTD5YWX/pingq
mvfUrsyvCXU8DUNPVec2JojjED6se2OfY7J+OsIifXuaRkoObO86H3djlWMN
nLQ3uXdukDwenR8Hr3yvWvJ4RKVuPpQULbkLbQmW69dPJHfhx9Z5399ul3kJ
eOhcanW/csc6AYG1v+x+aoz0Z+DmPVb+gn2Sz8CuJ8rc/tckn4nFk3RGaajk
M9F67fTVxrNyXonwdL0UG9LjWCeirqX9YtNk6Sdh8JIzNVcg+0vC/HV9D4R8
KfksnIqaMKVJzk/PwgNjFy5zhQ938mSsit2/5e1sxzoZ60I2vTygV/IUeDyH
zrg+kDwFSZXz3siJk3w2vCVRX49Klnw2Sm/YA/d8JfkcBEWfvRa4W/I5aDi6
zbMvV/JUVDc0BcSVS56KpKF3BqUvlf3PRXxNR3fgcTmfucjq2F113UiehsDe
DdmH+ks/DZV78erjPZK7URhWGFK53snhhqoYWHOvR9a7saN1X9m5Tc5648bm
0l07mhJlfx6UrLmpA+ul78EXB0+tbvBJ34OeabojYptj40HdlJ0tq+S8VDoS
MTWr5bb009FTt7h2hXeE00/HZz/0Kx8R69ikY1F2zm9lh6Xvxfb5Ka4xw5wc
Xny3NjNmY7H0vfi9uaL3J5/0vRifHb46pK9jlYFgb1tGp5H5GXhn7dSgoj/l
PmRgmRVQvV7uj8lAQYA70n5L7ncm8l58/0Daeed9gUxcTT7Qe3KxY52JzweV
1Poahjh9ssq62yBrsiGredQna7Ihq2zqkzXZkFUO9cmabMgql/pkTTZklUd9
siYbssqnPlmTDVk9R32yJhuyep76ZE02ZFVAfbImG7Ky7vYoMsgWWZNtsiH7
yWo+zSeDbJE12SYbsp+sFtB8MsgWWZNtsiH7yWohzSeDbJE12SYbsp+sXqD5
ZJAtsibbZEP2k1UhzSeDbJE12SYbsp+simg+GWSLrMk22ZD9ZFVM88kgW2RN
tsmG7CerRTSfDLJF1mSbbMh+siqh+f/7L9JtVhY=
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUlIlVEYh/GDC5NqoeW0SDKpaJCo1MycXud5nufP6xyGDYsiCb5FVItA
hMJ2fWQlabRpEUrFgQg0Qg3SMog+G6FogEBrEQ10j3CfC5fL//7Ow7vJ01fe
4aeUmvr7/ff7//MtNa7/3e/58WDx/iEVcSNjuXfNDpBxz+z11Y/MDpS4F13L
b2+EeHewPEzY2RkxYna4XDz7cUhPm/cb5MTR5l+H35gdKT+eLd0LCjTvo2Qp
eMurGD+zN8toxKGTj5+b91tlcVTOz6zsbZI0719dOmf2Djn2+YNfSJDpoyUx
ZionZMb4Lun9NHHr5eI6794tx1OGK458MXuPXO0f8m8qNf1eWdOx6v3Cd9PH
yJXo/Ne3l43Hys8zcxOnJo3HSd/kdGTDYKh375MLB5MDoqLDvDtebg48mC9e
8f2y8HWwr1eMJ0hfYUb4uXizD0jIbMK1Oo/ZiTK89mn3pTyzk2QgJ3ZjRGi4
dyfL6fvrBy6HGU+R7YV3noylm50KF1+3BZ4GT4Onw9PhGfAMeCY8E54Fz4Jn
w7PhOfAceC48F54Hz4Pnw/PhBfACeCG8EF4EL4IXw4vhJfASeKmvS6mv23AN
V2Xoy9DDNVyVoy9HD9dwVYG+Aj1cw1Ul+kr0cA1XVeir0MM1XFWjr0YP13BV
g74GPVzDVS36WvRwDVd16OvQwzVc1aOvRw/XcNWAvgE9XMNVI/pG9HANV03o
m9DDNVw1o29GD9dw1YK+BT1cw5Xl65GWrwvcgttwB67hLly14n4r7sMtuA13
4BruwpUH9z24D7fgNtyBa7gLV22434b7cAtuwx24hrtw1Y777bgPt+A23IFr
uAtXHbjfgftwC27DHbiGu3DVifuduA+34DbcgWu4C1dduN+F+3ALbsMduIa7
cNWN+924D7fgNtyBa7gLVz2437PifwDwPC2w
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzr1LVQEYx/EflwiXwEqhoUGjIqJXTUsrfSp7UTPLMqurdbqlvQ0NOdny
0BJBY1gQwvkHCqLJpR5qMN1CGqrlNHWHyITAIYiK7in8HrgcPvfLj+fUl272
DRckTf/+/Xn/fb613xoYXdZ6d6VV/rCn18tzc+O5q+z7THG+PLui4mrb/Kbz
1cKjvNfY4/rCxLqZ3KvsU3F+yZPXNRWvttkfd24M9uSus58FH3nRUVvxGlsY
m/pQO517rTVNfal6/s/rre1zsnX8be4NdvtB48TDl7k32r3eybHyUO5N9m6y
5eNod35vi5XeL3xd6vn3bbNnzdUNXfeXV7wdboAb4R1wE9wM74R3wS1wK7wb
3gPvhdvgdtgW22HtQ4e1Hx3WAXRYHeiwDqLDOoQO6zA6rCPosDrRYXWhw+pG
h3UUHVYPOqxj6LB60WEdX2yDHQ5YJ7CHHQ5YfdjDDgesk9jDDgesU9jDDges
fuxhhwPWaexhhwPWAPawwwHrDPawwwHrLPawwwHrHPawwwGriD3scMAaxB52
OGANYQ87HLDOYw87HLAuYA87HLCSxa6DDU5gh1M44AzWRdyHDU5gh1M44AxW
CfdhgxPY4RQOOIN1CfdhgxPY4RQOOIN1GfdhgxPY4RQOOIM1jPuwwQnscAoH
nMEawX3Y4AR2OIUDzmBdwX3Y4AR2OIUDzmBdxX3Y4AR2OIUDzmBdw/3//gVb
W5xP
"]]}}, {{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJw9k3k41ekbxo+thVBRTCEaiRZKlopyO4hSlnMsWc9+HNWo5kJNpGNUUkJI
LiqKUolpm5ZRUr80U9SoSGgh7VIplBb9+uN9xnWdPz7u7/3e7/0836+ZeCVP
psbhcK79+Kn8+Kly6O+di8cvgpwVefpg/8C6Mv796jXEw3CUt/rnXTpjGI9E
ztqEx/EviPVhEVWXsec9sSEWp9+9N9J2LGMjaIVo/rT6CbEp3HQOalt6EE9E
gTRIpXgT+c2x5btaVcdzYgtUzQqIUc+k+1hClmh20qaH9CmoDPzSPbqXeBqq
OIbJM54RW6PHvKMkPojyZmBmtm9fxnLimUjGXMlNCbEt4kbnynXqiGfhhGCY
IvY3A8Z2eMlVTvQuIN0eadKE0BGjKM8Bp2pmLwszJ90RXc0Wocf6SJ8N6au6
PMdg4jlYvqN2qGcrPT8XYy7ZjSr4b15OcP9QlJa9kPKdUby+Vu/6GkPG8zA0
97jOdz7p81FVWVby6QD5XfB22bd+/yWkA7sfxWjcs2WsBK5dWN/szyXdFdpi
ToB1E+mu0FihPaWwnXQuVvf+O/fEcJav5OJPzTLONT26jxv6VR4Na9pLuhtq
DJ8+a4on3R2RXQ/OnKsi3R0Ny+zqPEpJ94CPTeRR7fukeyAxv/iNqvZPTF+A
oma/x2nRdL8FeKfrbnjrM/X1hHRQsvhFC2OlJ/Z5N1QJDUj3Qo3D5gH5azZ/
pRd+9kh5aD1A79dCNDwY2jzhFukL8SjjpVfiR9rXIhxeJzhTNJrOX4SpBTtP
85+Q7o2guo1XvaeQ7o2kmOza1lbSF6NF8rWo4hDdfzEyz3aZbf5O/Zfg8aqL
gkS7cUxfgk/hDkM0hYw5PtBcJ/rDuoPNQ+mD7YHOwkIn0n1RmdIsbRwg3Rej
ysdcrCul+fnh4jzu8JMdLA9+yOPdyOlLouf9kOHsOeNLIdNr/KBmvt/5+Cu6
nz+SBt4c6OOz5+GPB78k6Be107780aKSa5XYQ35/HHycUtL1jPw8PHf3cMva
Qvk8LO5f9E+CBuXz8KHjCG93Cfl50Dir3x0gJz8fOum3J83cRX4+tlYv2ONE
5yv5KOB+fuS5ip1Xw0dCMM9UWkD9A/DbYRO7iDry/+DarNVeX2kfASiZuyLH
OIHyA3Bb69iu6gDKD8QHdRe3bUXkD8QT7f57Xip0/0BMvaHZmb6W8gNxef+c
7lOWlB+E7RWdRi6/0/yC8GbDIavM7eQPwlezN/YF9eQPQr7WbvXny8gfDN2E
jpS1J9i+EQw9N9vB/Ax6X4Lhc0kWt6SOcU0wHCIEisMYz/xLUS9dbuNWxRhL
MUltY9aTTYyVS+EyZuWKk1ONmH8p1oTM3z9whN6vEMzt/qehZRvlh+DKkQ29
nbcoPwTnJ2rY+rym/BDYWIVk8I5QfihEnY3hTt8oPxSNRTcju+QsTxmK2sA6
07oblB+K8YMJk+3yGHPCMDy6cWRhMvnD0FktGEx9SPcPQ9/IOLtOkD8M6bWr
Pi0MIn84Zlc/P3SUdIRDf5Wn7yRv8ofD7IDT4NNmun84Vjip5q6cTP0jMMTx
yi4HDvWPQOydO4rXZbS/CBikqp//+I72F4EbbWdyyr/Q/iIRfL/Mp9ye/JGo
t2idbp5F84tEygmDDJeDlB8J9xGJybtonxwBGgNObYzlk1+A7LeVXNUk8gug
5RrZqvuR8gWYZXLKK+s85QsxpSD8XFAie95UiLEP08omzKDzhOibMtBb6clY
KETMld71KiV0vhAvjG3N/t7HuFgI9TPyg+nXKU8Iv497RplEMb1dCK5D878N
F+j+Irz0iN3rOJ/N21QEqyLH8wdSaJ8i7Bw8LZl2mfJFMJqT/3JgOu1HhKma
qoK/GxgXi5D5vuV75hLatwi6h7tFpcTtIly9V9BrOZ72L0ZRWvyJTYGMTcWw
TPEuL1UzZvlilEfH9tjpMBaKwfdxmp2pZKwUw78nJ4nTy/zFYigeBLY5T2d6
jRh/fdlRGn+L8sXgcq1m3fOn918CHY+2aV4u1F+CHN/PvL9qqb8ET4wnXN7R
w1gowUUf9bt7I+j7kOCb4cvsps/UX4L+246pQ+MY10hwdYjb+zZvypfAtOS6
dMsx6i/FO71x8qJx1F+K/vaUkqx8+h6kOLLA16DMiPpLUaH2oNtKTv2l6P6W
47L/LfWX4qiN4JqVFfWXgnvuKb/QgnG7FJ4xTarmxBwZIp56Dgv1ZWwqQ3Sq
89jW55Qvg77K6b5L+pQvw9u7JrcX7aX+MsRrW1rf2Er5MvhX+K61/+97l6Fz
smv975Opvwx6uu0W9l9o/nJMe1bZUiih/nKsic6boJVC+XIERdTHJ2tQvhzB
Fwa3qh6nfDn2ciWtp/5H+XLkb9hWzPlM+XIIf324rOI+5ctxOnqCvkkI9Y+C
2P6yu/FW6h8FWb5BzMo2ev+ikHVptJ6cb8Lyo1B1VbQjdDRjZRTq87R9K5wZ
F0fh5jiHW+mXaP5ReBzC13J9RfOPQnD92Zt3P1C+Arnzhl4usWV+UwUOSdu2
zeAyhgI6I96Vx36l/gokTN1YGqJD+QpkT9z5wdeO8hXQ7drcVG3DuEYBjwOr
kxoDGLcrkHqn+NfTjow50ZCtuv/nsOPUPxoCnnJT3D5j/B8/DFmb
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdz0lIlGEcx/HHhFAiSFs0MNCSsIXcslwq/+77Nu776z4eIpI6afFeIijB
U1mJ9FIhEZ2yToY8SFphRZQoguLbxaBIOkW2UB7mEeY78B5+85nv/Gei2s95
ugKVUq83noCNZ4syr+/pOTNjDcHvd4vvDelZSvZOfTQ7SK6Ox667H8zeITM3
57f/Cg7z7V0yPbUlMHqr2eFS0vcocXHCfD5C3nhHYn7Omx0pF8/O3tn3zez9
Mhc/0b/+2exoCb6ynHZj3OyDErTa/Gz6udkx8uLQwKfmKbMPy921SefhF7OP
Svm9W0t/J80+JqlHwkZXnu707TjR19PS55bMjpfQodGQ9pQ9vp0gg+sH+tJn
TZ8oUduSG9+tmX1c8t4ODsnm9ydJ3eWqB5kR5v+fkPrYJ78fL5t9UgKsP69U
mNnJcv5HYdLXVbNTpD/hkmf4pbmfKiMVITGFAcbT5LYaW1wIDfftU3J/IHZ4
+YLZp+Vf3thC3F7z+TOyci2gyLtufl86XPzdFngGPAOeCc+EZ8Gz4NnwbHgO
PAeeC8+F58Hz4PnwfHgBvABeCC+EF8GL4MXwYngJvAReCi+Fl8HL4OX+LuX+
bsM1XFWgr0AP13DlQe9BD9dwVYm+Ej1cw1UV+ir0cA1X1eir0cM1XNWgr0EP
13BVi74WPVzDVR36OvRwDVf16OvRwzVcNaBvQA/XcNWIvhE9XMNVE/om9HAN
V83om9HDNVy1oG9BD9dw1Yq+FT1cw5Xl75GWvwvcgttwB67hLly14X4b7sMt
uA134BruwlU77rfjPtyC23AHruEuXHXgfgfuwy24DXfgGu7CVSfud+I+3ILb
cAeu4S5cdeF+F+7DLbgNd+Aa7sJVN+534z7cgttwB67hLlz14H4P7sMtuA13
4BruwpUX9724D7fgNtyBa7gLV72437vp/wG/U2Ow
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxd1H1MlVUcB/DjO0wtS1C0mpqFhIUaJSCKXy4KgqL3cgF5Kx41QAix1FzL
FqcZTmMXtZiFVjyaMac4c6llahxLA/2jKAmdb93It+lQNiJ1xMw/nl/N77M9
f3zu93zv7+zs7BmzcGlaQR+l1In7b6/7b28lT8f0+E8aG/s3B8P5AfpOwIB7
TeIABLV8P3h1iXgI6h+OrGuzxEGo2tC69IfoYY5DkNfR2ZI9Sfw4cmuPX045
JetHo+m3FSnbToqfxIPzn8L43kVjfG1BjkOxbGtmd+FVcRjuXDkUurhLHI7l
4eOq/n5D+s8i5DjWVf23/wgUTXAVjDr1qOOJGDknu+tYvuSTUBZeOt13Rfw8
ptX0y4/YI/uPxEMHrr1bMXS44xcw4WJFS/sTkr+I46uKL+2CeDJWrDTFUTni
KFRlnhmR+4E4GuMndW6zC8UxSPq0dNwxn/z/FERffDvi5hfiWMQcqdx1+Zp4
Khr3167KqwlxPA3DTlfn7EkQxyFseNem3idl/XSERvj2N4ySHNjReSHuVrlj
DbTam927N0oej47PglZ9WC15PCJTtxxNipLchbYEy/XH55K78Evz/J/uXpV5
CXjsfGp1vzLHOgGBtb/ve26s9Gfgdi8rb+FByWdg7zOlbv9bks/Eksk6vSRE
8plovnHm+p5zcl6J8HS+Fhvc7Vgnoq7p6qWGGOknYfDSszXXIPtLwoL1fQ8H
fyP5LJyOnDilQc5Pz8Ij4xYtd4WNcPJklMce2romy7FOxvrgza8P6JE8BR7P
0bOujyVPQVLl/Hey4ySfDW9x5HejkyWfjZJb9sD930o+B0Oizt0I3Cf5HNSf
2O45mCN5KqrrGwLiyiRPRdKwe4PSlsn+5yK+pr0r8JScz1xktu+rumkkn4fA
no1ZR/tLfx4qD+DNp7sld6MgtCC4coOTww21bmBNH4+sd2Nn88HS85ud9caN
LSV7dzYkyv48KK64rQN3Sd+Dr4+cXl3vk74H3dN0e/h2x8aDuim7m8rlvFQa
EjE1s+mu9NPQXbekdqV3pNNPw5c/9ysbGevYpGFxVvafpcek78WOBSmuscOd
HF78uDYjelOR9L34q3Fdz68+6XsxIStsdXBfxyodQd629A4j89Px/tqpQwr/
kfuQjuVWQPUGuT8mHfkB7gj7PbnfGch99aPD8y443wtk4Hry4Z7WJY51Br4a
VFzrqx/q9Mkq80GDrMmGrOZTn6zJhqyyqE/WZENW2dQna7IhqxzqkzXZkFUu
9cmabMgqj/pkTTZk9RL1yZpsyOpl6pM12ZBVPvXJmmzIynrQo8kgW2RNtsmG
7CerBTSfDLJF1mSbbMh+slpI88kgW2RNtsmG7CerRTSfDLJF1mSbbMh+snqF
5pNBtsiabJMN2U9WBTSfDLJF1mSbbMh+siqk+WSQLbIm22RD9pNVEc0ng2yR
NdkmG7KfrBbTfDLIFlmTbbIh+8mqmOb/738B9XlWGA==
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], {0., 0.}], CompressedData["
1:eJxdzUlIVWEYh/EvA5NqoeW0SDKpaJCo1MycXud5nufjdQ7DhkWRBGcR1SIQ
obBdh6ykjDYtQqn4IAKNUIO0DKJjIxQNEGgtolzcT7jPhbN47+97+G/x9JV3
rFZKTS5/q5Y/P2V+P1Pj+j/+mxsLFu8fUhE3Mpr7wNwBMuaZubn2qbkDJe51
19KHWyHeO1ieJOzujBgxd7hcPv9lSE+Z95vk1PHmv0ffmztSfr9cfBgUaN5H
yWLwtrcxfubeKrcjjpx+9sq83y4Lt+Xi9Mq9Q5Lm/KtLZ829S058++wXEmT6
aEmMmcwJmTa+R3q/jt99s7DBe++VkynDFce+m3ufXO8f8m8qNf1+Wdex5tP8
L9PHyLXo/Hf3lozHyp9zs+NnJozHSd/EVGTDYKj3PiCXDicHREWHee94uTPw
eK54xQ/K/I/Bvl4xniB9hRnhF+LNfUhCZhJu1HnMnSjD6190X8kzd5IM5MRu
jggN997JcvbRxoGrYcZTZGfh/eej6eZOhYuv2wJPg6fB0+Hp8Ax4BjwTngnP
gmfBs+HZ8Bx4DjwXngvPg+fB8+H58AJ4AbwQXggvghfBi+HF8BJ4CbzU16XU
1224hqsy9GXo4RquytGXo4druKpAX4EeruGqEn0leriGqyr0VejhGq6q0Vej
h2u4qkFfgx6u4aoWfS16uIarOvR16OEarurR16OHa7hqQN+AHq7hqhF9I3q4
hqsm9E3o4RqumtE3o4druGpB34IeruHK8vVIy9cFbsFtuAPXcBeuWrHfin24
BbfhDlzDXbjyYN+DfbgFt+EOXMNduGrDfhv24RbchjtwDXfhqh377diHW3Ab
7sA13IWrDux3YB9uwW24A9dwF646sd+JfbgFt+EOXMNduOrCfhf24Rbchjtw
DXfhqhv73diHW3Ab7sA13IWrHuz3rPh/E1ctsg==
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdzr1LVQEYx/FftwiXwEqhoUGjIqJXTUsrfSp7UTPLXqyu1snS3oaGnGx5
aImgMSwI4fwDBdHkUg81mG4hDdVymnKITAjuEEQO9xT3e+AMn/Plx3Pqh+70
DS+VNL34Lll8C8qfn+13+0dXtD5YbeUP9uLW3Pz8eO4q+zVTXJibXVV2tW19
3/m29DTvNfasvjCxYSb3GvtaXFj2/F1N2Wtt9vf92wM9uevsT8FHXnfUlr3O
SmNTn2unc6+3pqnvVa/+eaO1fUu2j3/IvcnuPW6cePIm92Z72Ds5NjeYe4t9
nGz5Mtqd39tmQ59KP5Z7/n877GVzdUPXo5Vl74Qb4EZ4F9wEN8O74T1wC9wK
74X3wfvhNrgdtko7rAPosA6iwzqEDqsDHdZhdFhH0GEdRYd1DB1WJzqsLnRY
3eiwjqPD6kGHdQIdVi86rJOVNtjhgHUKe9jhgNWHPexwwDqNPexwwDqDPexw
wDqLPexwwDqHPexwwOrHHnY4YJ3HHnY4YF3AHnY4YF3EHnY4YBWxhx0OWAPY
ww4HrEHsYYcD1iXsYYcD1mXsYYcDVlLpOtjgBHY4hQPOYF3BfdjgBHY4hQPO
YA3hPmxwAjucwgFnsK7iPmxwAjucwgFnsK7hPmxwAjucwgFnsIZxHzY4gR1O
4YAzWCO4DxucwA6ncMAZrOu4DxucwA6ncMAZrBu4DxucwA6ncMAZrJu4/99/
AX5nnFE=
"]]}, {}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, 4.155045649749155},
PlotRange -> {{0, 201.}, {4.209455113244909, 7.5828418499816665`}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, 4.155045649749155},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {4.605170185988092, 5.298317366548036, 6.214608098422191,
6.907755278982137, 7.600902459542082}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"BDM collapsed cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {4.209455113244909, 7.5828418499816665`}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdlAtQlGUUhn9FzDEntTHUMNukvCaaJqZhvICmiAgsLLCAy7/LXkDzUrqW
2uRvjgw2SoC3aRTbRiWvkxkZmri/NwbwUnFJCS+/BMjFFZp2NMuGavbQzHeY
YZiH97zfe853vt2XLMv1tt6SJFX++/vfX99PV1h06OmgvOldbvoHRO7HeBDj
IYyHMR7BWMd4FOOXGY9mPJbxeMavYkNQTcfQgw+Jg/F4UslUU+Rj4snod7i5
/HLhfeLX0Na68/O919uIp+BRsLttZcI94qlMf53lTYM7Jr5uXdtvxCFMn44/
cdbVEtzjf4PVz0CANnPcoKVNxDMZv4n9yxrmP+Pq6ScU3rK1x91La4ln4WhH
d/++RzzEb7F+w9A84z23J6qRGGJ/CtC8xbByeYFGerg4vxKONdMqBhoD60iP
EFmJwIXg+ufPtpSTHimywliazXTG0hymz4G36pXik2tOkv62OI/CWJrL9LlY
79z2pd7bQPo8ps9j+4hi80exfcwX96nMh3FkjqfUr570aHE/SjTTF6B3cOuM
guoS0hlLMbje+G1Gxfrvw3x6DL6o23fg1LB9pC+Euvhgo7n7a9IXYtcw5/SP
JjhJj8XIoqFrwtVK0mOZHofylqr2YytUHyMOGxYttQ6Mov0rcWjfWheS56z2
sRqHd8tSO+wrbpA/Hg5H+ogK53nyx7P3wHSV6ZJePB96eN5fVbt+zxXy68V9
q3qxXylBnAcJ7D4T8KJ/TFVRzmXyJ7D3lSjuH4m4OGpI6ridZ8ifKPajJuKz
QrMuP38b+Q3ie4KBvVcDPukM8Dty+bjv/lUD6z9J3A+S4LnZ3efqnUu0ryTm
T8Ja67WcFO2cj6Vk5k/G/UM7BgQeuE5+xmoyxnp/GO00auRPERkpmLkzwtZc
/Cv5U5C9I7vwndK75E8R+5GMKPXzH5IUWkt+Iwafu1P94MyP5DciMLlkTL4f
nacyllJFRiqeMjeZpq5qJn8qanJ/MTTXN5E/Fbnx4Q9cocRSGjZPK02uOkH9
IQ23yw8/+ak/sZKGU5e2h7WmN5I/jfnTUbOlotf+J5SHdLww/OlvOk0986dj
TFjQBPXjavKn4+6mixO+W9Jz/4tEBmOFscpYMqFrnb+zeAfdF0y4232pK7G9
jvwmlm8S71vKYP4MWGqWrL6Vd5r8GSw/A49yIr3bzcfIL6Pig0bzhWX03nSy
6IeM/nmBW3I3XvWxLIv7V2TxfJeM3/+44A6OqaA8WexXYyyZxXl1jGFGWGv0
5oCfb1G+GX+VTdzYMO8O5ZvF9+kyi/tXWb3G6iWL+N51FvH9wSK+P9kCYx//
4UUFLZTP2MXOUy1insZYyhTn02WKOjLF8+RMNj+rd2XCW3Tj78Gz6imf1WuZ
4v1IVlHXWcXPC6wsn7FiRexub19P0D3Kt4r3obJ6zcq+f2xi/zob+z5gLLN6
xSbux2UTP8+qTexHs4n9SHaxXmfHhxHK2UgXzQPGsh3VV7rcs8e3Ub4d6Nxz
6+bEVsq349hXMZMCQtopn7FmxwnDeb2uqIPyHShRHg7wdt6nfIeow4GjSmTr
s5MfUL4Dh+TJA5tOeyifsYv5VXa+5sCNrc819JpN9VKWeL4uC9qn1ZWDVlM9
ssT+ZaYrjF1ZCNltX/R4T8/8Wags63e7cgH1o2Vh7+DEXbXDSZeyUbjs2pSJ
i+l+ddn/7+sf2yweLw==
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd02tojmEcx/F/1grzwinm8GIOsZxtcz7s77EZxo7PDszhnvMklIkkroh3
JIdWi7otwgt5I8fWLlvKRjZebAztJky8cFg5hELPVbq/Tz09fZ7f9bv+V1f3
PWzNtoL13USk8e/332/s8yn9R8fvzx1D6urcHxp2d7g33B9OhIfCSfBweCQ8
Ck6Gx8DjtGJjftXm4sB5grakVUbyXnY6T9IXp4+27W294TxZd5/sGtD61k+P
OUUH7DyX2txV75yKPA37T9FjR/LHDq9+5DwV55mmJ77dGP0wes15OtbP0C3f
aw+M/9jg9p8Jz9J7cc/3HHxS6dbP1sNJmvz4TLvL52h8cFkrchtcPhdOh1UL
h9Wc3nKrI9Y3qj9zHkTiJ7a6/eYhn6dV/b4mXDnU4vKIPuk7bX/9LrfeRHRf
y0V5Wn3f5fPD68187ZGix0+cf+byDOQZyDPD928ycf8LkMOShTwrfF5ZiPMv
VOk4daxnSeDyRdpcPLh6zrbXLodlMXJYspFnY/8luN8lyJeGbZbqzcqkQXGN
r1yeg34O7i8X/VycL0/PZjckNN1+E7PmadaK0u1e5L1bn6dptZ2fEme5eRaW
/PB+Cpt8XVTet37q9U7Xh6UgbIUNbGEpRL8Q5y/UGZe8Phd+fXB9WKJha1T3
3O3a0b71netHtbx9V/G5speuHw3ftxSFn3ct0sTSgSOa0mpcv0ivfhl/p1db
W+x9s7AUh62wgS0sJejDBrawlKIPG9jCsgx92MAWluXowwa2sJShDxvYwrIC
fdjAFpaV6MMGtrCsQh82sIVlNfqwgS0sXthJsMIebGAftnAASznmwwp7sIF9
2MIBLGswH1bYgw3swxYOYFmL+bDCHmxgH7ZwAMs6zIcV9mAD+7CFA1jWYz6s
sAcb2IctHMCyAfNhhT3YwD5s4QCWjZgPK+zBBvZhCwewbMJ8WGEPNrAPWziA
pQLz//sPrU9wDg==
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzjtoFGEUxfFDCkklEQQtVKKIhBDERzTxEfea+I7PaNRoTD5XVyMWYmV7
KxULmzQiFiOikJQhRAhoLmixYrGIlhaDhTYWimCtkg9k/wPD8JvznTmztnpr
qNYi6d3f+99z8fpR+fXkzsO5zplKfmHNboXb4OXwSngV3A6vg9fDG+AOuBPu
srbG0td3X3xcWPRGez86Xq/f/JK9ycZqy+49+Pksn99sLV1L+h+9rGdvsUrr
iurkt0/ZW5F34/vb7H59cnrg63z2dvxPj81Mre7uef445704v8Pmvi9Mv2p8
yOd3wrtsfmrNm0bvbPZu+/32ad/w7c/Zffj+HrgCW7Md1l7ksPqRwxpADmsf
clj7kcM6gBzWQeSwDiGHdRg5rCPIYQ0ih3UUOaxjyGEdRw7rBHJYJ5ttsMMB
6xT6sMMBawh92OGAdRp92OGAdQZ92OGANYw+7HDAOos+7HDAOoc+7HDAOo8+
7HDAGkEfdjhgXUAfdjhgXUQfdjhgjaIPOxywLqEPOxywxtCHHQ5Y4+jDDges
1Ox22OAEO1zAAZewLmMfNjjBDhdwwCWsKvZhgxPscAEHXMK6gn3Y4AQ7XMAB
l7CuYh82OMEOF3DAJawa9mGDE+xwAQdcwrqGfdjgBDtcwAGXsK5jHzY4wQ4X
cMAlrAnswwYn2OECDriEdQP7//0HujDPrQ==
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzblqFmEUx+GDlaSysLCwiCIiIpKocY3mjbtxT9zX12hcKiv70+cm5k48
jQS9CBnxBuxtVBKQ7xkYhmd+/Dl7Vj8ur22LiK9/33/fzefXwuzS/Pq3qY2F
rR9t0tvxDrwT78K78TTei/fh/fgAPogPtZpa+Tn3ZePzpg/jmfZp8ff6zI/v
W57FR/BRfAzP4eP4BD6JT+HT+Ayex2fxObyA26QTxyIdx3k6jgt0HBfpOC7R
cVym47hCx3GVjuMaHccSHcd1Oo4bdBw36Thu0XHcpuO4M+mGExeOu+xx4sKx
zB4nLhwr7HHiwnGPPU5cOO6zx4kLxwP2OHHheMgeJy4cj9jjxIXjMXucuHA8
YY8TF46n7HHiwvGMPU5cOJ6zx4kLxwv2OHHheMkeJy4cfdLTuOGOEw+48Ijj
Ffdxwx0nHnDhEccq93HDHScecOERx2vu44Y7TjzgwiOON9zHDXeceMCFRxxr
3McNd5x4wIVHHG+5jxvuOPGAC4843nEfN9xx4gEXHnG85z5uuOPEAy484vjA
/f/+A/zbecQ=
"]]}}, {{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJxdlHtQlGUUxj9FzDEntTHUMNukvAaaJqZhPICmgCgsLLCAy7fLXkDzUrqW
2uRnjgw2SoC3aQTbxkteJzMyJHE/bwzgpeKSEl4+CZCLKzTtaJYNOcOhmfcw
s3/8eM7zPue85919xbJCb/ORJKny6afP009fqfevKzQ6pDQgd0aXm/4BkQcw
HsJ4GOMRjEcx1jEew/hVxmMZj2c8kfHr2BhQ0zH80EPiIDyeXDzNFPGYeAoG
HGkuv1xwn/gNtLXu+nLv9TbiqXgU5G5bFX+PeBrT32R50+GOiatb3/YHcTDT
Z+BvnHW1BPX632L1M+GnzZowZFkT8SzGb2P/8oao51y9/YTAW7buhHtZLfFs
HOvoHtj/qIf4HdZvKJpnfuD2RDYSQ+xPAZq3GlatyNdIDxPnV8KwdnrFYKN/
HenhIivhuBBU/+LZlnLSI0RWGEtzmM5Ymsv0ufBWvXbw1NpTpL8rzqMwluYx
fR42OLd/rfc2kD6f6fPZPiLZ/JFsH1HiPpUoGEdne0p86kmPFvejRDN9AfoG
tc7Mry4mnbEUg+uN36dXbPgxtEePwVd1+w6cHrGP9IVQlxxqNHd/S/pC7B7h
nPHJJCfpizC6aPjaMLWS9EVMj0V5S1X78ZVqDyMWGxcvsw6OpP0rsWjfVhec
66zuYTUW75eldNhX3iB/HByOtFEVzvPkj2Pvgekq0yW9eD708Hy4unZD4RXy
68V9q3qxXylenAfx7D7j8bJvTFVR9mXyx7P3lSDuHwm4OGZYyoRdZ8ifIPaj
JuCLArMuL287+Q3ie4KBvVcDPuv08zl6+UTP/asG1n+iuB8kwnOzu9/VO5do
X4nMn4h11mvZydq5HpaSmD8J9w/vHOR/4Dr5GatJGO/9aazTqJE/WWQkY9au
cFvzwd/Jn4ysnVkF75XcJX+y2I9kRImP77DEkFryGzH03J3qB2d+Jr8R/knF
4/J86DyVsZQiMlLwjLnJNG11M/lTUJPzm6G5von8KciJC3vgCiGWUrFleklS
1UnqD6m4XX7kyS8DiZVUnL60I7Q1rZH8qcyfhpqtFX32P6E8pOGlkc9+12nq
nT8N40IDJqmfVpM/DXc3X5z0w9Le+18sMhgrjFXGkgld632dB3fSfcGEu92X
uhLa68hvYvkm8b6ldOZPh6Vm6ZpbuaXkT2f56XiUHeHdYT5OfhkVHzWaLyyn
96aTRT9kDMz135qz6WoPy7K4f0UWz3fJ+POvC+6gmArKk8V+NcaSWZxXxxhm
hLZGb/H79Rblm/FPWeCmhvl3KN8svk+XWdy/yuo1Vi9ZxPeus4jvDxbx/ckW
GPv5jizKb6F8xi52nmoR8zTGUoY4ny5D1JEhnidnsPlZvSsD3qIb/w6dXU/5
rF7LEO9Hsoq6zip+X2Bl+YwVKxbt8fb3BNyjfKt4Hyqr16zs98cm9q+zsd8D
xjKrV2ziflw28fus2sR+NJvYj2QX63V2fByunI1w0TxgLNtRfaXLPWdiG+Xb
gc7CWzcDWynfjuPfxEz2C26nfMaaHScN5/W6og7Kd6BYeTjI23mf8h2iDgeO
KRGtz095QPkOHJanDG4q9VA+Yxfzq+x8zYEb215o6DOH6qVM8XxdJrTPqyuH
rKF6ZIr9y0xXGLsyEbzHvvhxYe/8magsG3C7cgH1o2Vi79CE3bUjSZeyULD8
2tTAJXS/uqz/9/Uf/jgeMQ==
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdzjtoFFEYxfFjBEklEQQtVKKISAjiI5r4iPuZ+H4bjdEkJtfV9YGFWNl+
lYqFTRoRixFRSMogEQKaD7RYsVhES4vBQhsLRbA24BXZ/8AUvzn33DOrqzcH
agslvZt/F8y/Lfr3/Kj8enz7wUzHdCV/sGa3wm3wUng5vAJuh9fAa+F18Hq4
A+60tsbi13eef5z76w32fnS8Xr/xJXujjdWW3L3/82k+v8laOhf1PXxZz95s
ldZl1Ylvn7K3IO/C/VvtXn1iqv/rbPY2/E+3TU+u7Op+9ijnPTi/3Wa+z029
anzI53fAO212ctWbRs+L7F32++2T3sFbn7N7cf9uuAJbsx3WHuSw+pDD6kcO
ay9yWPuQw9qPHNYB5LAOIod1CDmsw8hhHUEO6yhyWMeQwzqOHNYJ5LBONttg
hwPWKfRhhwPWAPqwwwHrNPqwwwHrDPqwwwFrEH3Y4YB1Fn3Y4YA1hD7scMA6
hz7scMA6jz7scMAaRh92OGCNoA87HLBG0YcdDlgX0IcdDlhj6MMOB6xx9GGH
A1ZqdjtscIIdLuCAS1gXsQ8bnGCHCzjgElYV+7DBCXa4gAMuYV3CPmxwgh0u
4IBLWJexDxucYIcLOOASVg37sMEJdriAAy5hXcE+bHCCHS7ggEtYV7EPG5xg
hws44BLWNezDBifY4QIOuIR1Hfv//QfdPM+v
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxd01toz2Ecx/EvS2EuGDGHizmEnA9j5rTv/sw2Ywf778AcfnOaSSjTtMQT
cUfLIbWoHxEu5EaOrT22FCPGxcbQfoSJC4eVQyirPdLv/a/fxev3eT7P9+np
9x++dtuyDTEicq/z6db5dJd/v88pP9v+fGkbWlfnXmjYPeG+8AA4Hh4GJ8Aj
4FHwaHgsPA6eoOVleSc2FwbOk7QpsSKS+6rdeYq+PHm4ZXfzdeepuutYx8Dm
d35Kl6fpwJ1npz/qqHeejjwR+8/Q6kN540fUPHaeifMk6dHv18c8jF51noX1
ybrlR+2+iZ8a3P6z4Tl6N+ZF1f6nFW79XD2YoGOfnGp1+TztEVzS8pwGl8+H
U2DV/OFnTm652dbVN6q/sh9EekxudvulIk/VE/2/xV4+0OTyiD6NS9pbX+nW
m4juabogz2ruu3xBeL1ZoL2m6ZGj5567fCHyhcjTwvdv0nD/i5DDko48PXxe
ycD5M1Tajlf3LgpcnqmPCofUzNv2xuWwLEYOSxbyLOy/BPe7BPnSsM1SvVGR
MDjm3muXZ6OfjfvLQT8H58vV01kNsY233nZZczV9ZfF2L/LBrc/VxNr2z/Fz
3DwLS154P4VNnmaWxtXPvNbu+rAsC1thA1tY8tHPx/nzNfmi1+/874+uD0s0
bI1q1Z2OHa1b37t+VEtbKwvPlrxy/Wj4vqUg/L1rgcYXDxrZmHjG9Qv0yteJ
t/u0tHT93ywshWErbGALSxH6sIEtLMXowwa2sCxHHzawhWUF+rCBLSwl6MMG
trCsRB82sIVlFfqwgS0sq9GHDWxhWYM+bGALixd2AqywBxvYhy0cwFKK+bDC
HmxgH7ZwAMtazIcV9mAD+7CFA1jWYT6ssAcb2IctHMCyHvNhhT3YwD5s4QCW
DZgPK+zBBvZhCwewbMR8WGEPNrAPWziApQzzYYU92MA+bOEAlk2YDyvswQb2
YQsHsJRj/n//BdBbcBA=
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], {0., 0.}], CompressedData["
1:eJxdzjtoFFEYxfFjBEklEQQtVKKISAjiI5r4iPuZ+H4bjdEkJtfV9YGFWNl+
lYqFTRoRixFRSMogEQKaD7RYsVhES4vBQhsLRbA24BXZ/8AUvzn33DOrqzcH
agslvZt/F8y/Lfr3/Kj8enz7wUzHdCV/sGa3wm3wUng5vAJuh9fAa+F18Hq4
A+60tsbi13eef5z76w32fnS8Xr/xJXujjdWW3L3/82k+v8laOhf1PXxZz95s
ldZl1Ylvn7K3IO/C/VvtXn1iqv/rbPY2/E+3TU+u7Op+9ijnPTi/3Wa+z029
anzI53fAO212ctWbRs+L7F32++2T3sFbn7N7cf9uuAJbsx3WHuSw+pDD6kcO
ay9yWPuQw9qPHNYB5LAOIod1CDmsw8hhHUEO6yhyWMeQwzqOHNYJ5LBONttg
hwPWKfRhhwPWAPqwwwHrNPqwwwHrDPqwwwFrEH3Y4YB1Fn3Y4YA1hD7scMA6
hz7scMA6jz7scMAaRh92OGCNoA87HLBG0YcdDlgX0IcdDlhj6MMOB6xx9GGH
A1ZqdjtscIIdLuCAS1gXsQ8bnGCHCzjgElYV+7DBCXa4gAMuYV3CPmxwgh0u
4IBLWJexDxucYIcLOOASVg37sMEJdriAAy5hXcE+bHCCHS7ggEtYV7EPG5xg
hws44BLWNezDBifY4QIOuIR1Hfv//QfdPM+v
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdzblqFmEUx+GjNpLKwiKFRRQREQmJGpcY/d64G/fELa5jNC6Vlf3pcxNz
J55Ggl6EjHgD9jYGjMj3DLzFM39+nP1rH5fXd0XE1623Y+vtjH/fr9Hs0sLG
t4nN0faPNu7deA/eiyfxPjyFD+CD+BA+jI/go60mVn7Ofdn8/NfTeKZ9Wvy9
MfPj+7Zn8TF8HJ/Ac/gkPoVP4zN4Hp/FC/gcPo9HuI07cSyy47jAjuMiO45L
7Dgus+O4wo7jKjuOa+w4rrPjWGLHcYMdx012HLfYcdxmx3GHHcfdcTecuHDc
o8eJC8cyPU5cOFboceLCcZ8eJy4cD+hx4sLxkB4nLhyP6HHiwvGYHicuHKv0
OHHheEKPExeOp/Q4ceF4Ro8TF47n9Dhx4XhBjxMXjpf0OHHh6MY9hRvucOIe
Fx5wvOI+brjDiXtceMCxxn3ccIcT97jwgOM193HDHU7c48IDjjfcxw13OHGP
Cw841rmPG+5w4h4XHnC85T5uuMOJe1x4wPGO+7jhDifuceEBx3vu44Y7nLjH
hQccH7j/338AH/Z5xg==
"]]}, {}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, -1.7620185570911397`},
PlotRange -> {{0, 201.}, {-1.7190759071263015`, 0.9433683906936685}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, -1.7620185570911397`},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {-1.6094379124341003`, -0.6931471805599453, 0.,
0.6931471805599453}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Entropy collapsed cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {-1.7190759071263015`, 0.9433683906936685}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}],GraphicsBox[{{{}, {{{}, {}, {
Hue[0.67, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd0k1rU0EUxvGDuqgKIiJYX6BXEdGiRVu1am17rEb7YtM2aUzSxJtJmjSV
LtzU/fQLuPIDXNCFW9dSGFyIgn4AEeTi0pVI3Am+YEI5/0AIvzxz5sw9d042
Hudau0Tk/d/vv9//n++Tn38ff13ZPKLdP9S6Dz4IH4b74RNwBJ+CT8Nn4LPw
IHweHtJwYHT7zaGeLyK/BA/DI/Bl+Ap8FR6Fr8HXdXPk7fiTjz3fQD4G38T6
ceQT8CSs1h6WW3Z/D8sU8imNB392Ngb6u/ltaw/LHeSwZJDDchf9YbmHHJZp
5NO4HzOYzwzqZ5HPIp/D+ecw3/vIYZnXvVPvvmU3evk88izyLPIF5AvIF611
EfOAAyxLqF9CPRxgyVlrDvOAAyx5+3yaR/886pHLMvrDHg7L6F9AfQHnL9jz
BeTyAOeHPRxgKaK+qJm+3b86r3r1cCjqha1P8f5Or75krSX98bwcBoaPduvh
UEL/st1fYV+2+4ey3U9WrHVFP2zHX/e86PVHHmCpoH/F9vMV1MNSRf8q6quY
PywPMX/YwwGWGOeP0T9GPSw11NfQv4b7D4uz6yNYYefwfuHEoR/qU6yXun3e
CNa6Xe/quJ9wAgc4rdv7JQ3rCNaGrXfIPZzAAU6xn6zi+VdxH2GH9R55gjwg
T2FpWkewNu35Heyb+nTs2bmtfce6/ZEHOIWlhfnDCrsW3j/yBHlAnsKyhv6w
wg72cLJm5xHgFJa2Dk1kvrxsdx21ba7IHXKPPIEDnKJe1tEfVtjBHk7gAKfr
6P/IOtrxH6uKV2A=
"]]}, {
Hue[0.9060679774997897, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzrtqFlEUBeCNlaVglCAWMUgQEe/3RHPUeI8a4yXekkxiorFKExAFYeML
+ACCTmVvb3E6Se0LjG8gllYq5kf+b2AYvllnzZpdi6vTy5siYv3P/ff57/ox
PnWgHV4bHCgbL8qbD9++bP++dcOb8RY8gAfxTjyEh0v//u7yctv7ePepl4/g
PfT34n2c31/WX02MLY30fJD8EP3D5e3Xmdlfk73/OUJ+lP4xfJzzJ8rnnzs+
vl7p+SQ+xfnTeJTvj/F/Z8jP4nFc+p04zpHjOE+O4wI5jglyHBfJcVwix3GZ
HMcVchxXyXFcI8dxnRzHJDmOG+Q4bpLjuEWOY6rfBSeuOG7Tx4krjmn6OHHF
cYc+Tlxx3KWPE1cc9+jjxBXHffo4ccUxQx8nrjge0MeJK46H9HHiiuMRfZy4
4nhMHyeuOJ7Qx4krjln6OHHFMUcfJ6445unjxBVH0+8hXHCDE7e44g7HAvu4
4AYnbnHFHY5F9nHBDU7c4oo7HE/ZxwU3OHGLK+5wLLGPC25w4hZX3OFYZh8X
3ODELa64w/GMfVxwgxO3uOIOx3P2ccENTtziijscK+zjghucuMUVdzhesP/f
vwHzSOXL
"]]}, {
Hue[0.1421359549995791, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxd1L1rU3EUxvEHlzo6tNLBIVYRkVLfq9Vqj6n2xUaNbWLsm/21Wl9AcHFy
Ojg4uIqbwgVxEzfB8TiJ+DcIFwRxKOicQVTMRX7fQAifPOf5nQv3Jrs3Hsxv
bpP06c/77+e/18+Jl+/Hl5+97bfeF5Z7O7wD7ocH4V1wDR6C99rjj53VbqPy
Png/5g/Aw5gfsebBYujhYOVDyA+jf8RGt759edM30PNR5MfQPw6PYv4E8pPw
GOZPwafhcVzfGZx3Fp5A3/K+wzqHHFYdeR3nTyKftNrXgeevFqv+eeSwLiCH
NYV8CudP5/Zp+9z9/vTJ6yqfQT6DfNZ+jHV/1Ud29vJZ6/uw58XwVpVfzO2w
5pDP4fwG9jfQv5TPO6zL6MO6gj6sZm5r4nqb+XmBeV3N5w12OGDNow87HLAW
0F+wdyuPUud+db/ggNXK76+1sL+VP18Bq50/79bOf2/ezv9vAta13AY7HLA6
6MMOB6zr6MMOB6xF9GGHA9YS+rDDAWsZfdjhgLWCPuxwwFpFH3Y4YN1AH3Y4
YK2hDzscsFLuGmxwgh0u4IBLWOvYDxucYIcLOOAS1gb2wwYn2OECDriEdRP7
YYMT7HABB1zCuoX9sMEJdriAAy5hbWI/bHCCHS7ggEtYt7EfNjjBDhdwwCWs
O9gPG5xghws44BLWXeyHDU6wwwUccAnrHvb/929h+No2
"]]}, {
Hue[0.37820393249936934`, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzztvjnEYx/ErJqNESQdDNSIi4nxW+nc+FVWHosqt1GGySEySK96AwSjk
noxmg+HaxOwN3N6B2YRoI/00efLk83z/v1zpxoXnM4urIuLbn8/f739/Pyen
d/TjL0ZH2tIPbaVX4zV4pL3+Ojv/a2rZo/QNeAyP403t1YfvX9b/WLvkzXgL
77fibbzf3l6uexdvPi57J30X+938P3voe9nvo+/HB3h/EB/i3mF8hPcT7f3n
ibm3n5b7UfoxPInbSieO43QcJ+g4TtJxnKLjOE3HcYaO4ywdxzk6jvN0HBfo
OC7ScUzRcVyi47hMx3GFjmN6pRtOXDiusseJC8cMe5y4cFxjjxMXjuvsceLC
cYM9Tlw4brLHiQvHLHucuHDcYo8TF47b7HHiwnGHPU5cOObY48SF4y57nLhw
zLPHiQvHPfY4ceG4zx4nLhzdSo/hhjucuMeFBxwPuI8b7nDiHhcecCxwHzfc
4cQ9LjzgeMh93HCHE/e48IDjEfdxwx1O3OPCA45F7uOGO5y4x4UHHI+5jxvu
cOIeFx5wPOE+brjDiXtceMDxlPu44Q4n7nHhAccz7v/3bxQrtCM=
"]]}, {
Hue[0.6142719099991583, 0.6, 0.6],
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3]],
LineBox[CompressedData["
1:eJxdzUuLT3Ecx/FvVuzklmQxJklI7ozb/Nzvt3Eb92MYxspSKfV9AvIAFGdl
L1vpu7X2ABzPQB4BMpP+r1On0+u8+/RdN/N8anZRRHz98/79/nt+Tr569+3z
qh/L2/yPNurFeClegVfjtXgMj+P1eEN7sfJtvPmw4I30TfQt7eOvNe9fzi14
K97WXn9asvnL92Xz3o534J14F96N9+C9eB+ewPvxAXwQH8KH8SRuo04cR+g4
jtJxHKPjOE7HcYKO4yQdxyk6jtN0HGfoOM7ScZyj4zhPx3GBjuMiHcclOo7L
o244ceG4wh4nLhxT7HHiwnGVPU5cOK6xx4kLx3X2OHHhuMEeJy4cN9njxIVj
mj1OXDhusceJC8dt9jhx4bjDHicuHHfZ48SF4x57nLhw3GePExeOB+xx4sLR
jXoMN9zhxD0uPOB4yH3ccIcT97jwgGOG+7jhDifuceEBxyPu44Y7nLjHhQcc
j7mPG+5w4h4XHnDMch833OHEPS484HjCfdxwhxP3uPCA4yn3ccMdTtzjwgOO
Oe7jhjucuMeFBxzPuP/fvwE6xWQv
"]]}}, {{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.34398, 0.49112, 0.89936],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
DiskBox[{0, 0},
Offset[{3, 3}]]},
AbsoluteThickness[1.5],
Dashing[{}],
CircleBox[{0, 0},
Offset[{3, 3}]]}], {0., 0.}], CompressedData["
1:eJxd0k1rU0EUxvGjdVEVRESwvkCvIqJFi7Zq1dr2GI32xaZt0pimickkTZpK
F27qfvoFXPkBLujCrWspDC5EQT+ACHJx6Uok7gTtIhc5/8Bd/PLMmTP33Dnd
fJpv94nIx91nz+6zV9Lfz6mvf0++rWwd094fat0PH4aPwgPwKTiCz8Bn4XPw
eXgIvggPazg0tvPuSOrLyK/AI/AofBW+Bl+Hx+Ab8E3dGn0/8exz6lvIx+Hb
WD+BfBKegtXaw3LH7u9hySDPaG3od3dzcKCX37X2sNxDDksWOSz30R+WB8hh
mUY+jfsxg/nMoH4W+SzyOZx/DvN9iByWed2f+fAjt5nm88hzyHPIF5AvIF+0
1kXMAw6wLKF+CfVwgCVvrXnMAw6wFOz7aQH9C6hHLsvoD3s4LKN/EfVFnL9o
zxeQyyOcH/ZwgKWE+pJm+/v+dN+k9XAo6aXtL7WD3bR+xVpX9NfLchgcOd6r
h8MK+pft/gr7st0/lO1+smqtq/ppp/Z936u0P/IASwX9K7afr6Aelir6V1Ff
xfxheYz5wx4OsNRw/hr611APSx31dfSv4/7D4uz6CFbYOXxfOHboh/oE66Vh
3zeCtWHXuwbuJxzDAU4a9n5J0zqCtWnrHXIPx3CAE+wna3j/NdxH2GG9Rx4j
D8gTWFrWEawte34H+5Y+H39xYfvAiV5/5AFOYGlj/rDCro3vjzxGHpAnsKyj
P6ywgz0cr9t5BDiBpaPDk9lvrzs9Rx2bK3KH3COP4QAnqJcN9IcVdrCHYzjA
yQb6P7GO/vsfzpZXYg==
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.97, 0.606, 0.081],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}]}, {
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, 4}],
Offset[{(-2) 3^Rational[1, 2], -2}],
Offset[{2 3^Rational[1, 2], -2}],
Offset[{0, 4}]}],
Line[{
Offset[{0, 4}],
Offset[{-3.4641016151377544`, -2}],
Offset[{3.4641016151377544`, -2}],
Offset[{0, 4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdzktvD1EYBvAXG0uJkkYsqpFGRNzvSg/qXlRdWpcyqqVWNhIhkbzxBXwA
CbOyt7c4O+naFxjfQCytdNGJ/H+TnMVvnvPMMzsWXs0sbYiIldWzbvWsj/75
PTG9rx19PTxU1l6U959/ft/6a/OaN+JNeAgP4+14BI+Wwf2d5c2WT/Hxa5+P
4V30d+M93N9bVt5Oji+O9d5PfoD+wfLhx+z836n+fw6RH6Z/BB/l/rHy7c+2
L++Wex/HJ7h/Ep/i++P832nyM3gCl0EnjrPkOM6R4zhPjmOSHMcFchwXyXFc
IsdxmRzHFXIcV8lxXCPHMUWO4zo5jhvkOG6S45gedMGJK45b9HHiimOGPk5c
cdymjxNXHHfo48QVx136OHHFcY8+TlxxzNLHiSuOOfo4ccVxnz5OXHE8oI8T
VxwP6ePEFccj+jhxxTFPHyeuOB7Tx4krjif0ceKKoxn0CC64wYlbXHGH4yn7
uOAGJ25xxR2OBfZxwQ1O3OKKOxzP2McFNzhxiyvucCyyjwtucOIWV9zhWGIf
F9zgxC2uuMPxnH1ccIMTt7jiDscL9nHBDU7c4oo7HMvs44IbnLjFFXc4XrL/
3/8AFmPlzQ==
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.91, 0.318, 0.243],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{0, 3.75}],
Offset[{3.75, 0}],
Offset[{0, -3.75}],
Offset[{-3.75, 0}],
Offset[{0, 3.75}]}]}], {0., 0.}], CompressedData["
1:eJxd1L1rFGEUxeGjFklpkUgKizWKiIT4HY1Gc91oPsyqa7LrGpPoazR+gGBj
ZXWxsLAVO4UBsRM7wfJaifg3CAOCWARivYWYYgd5fwtTPHvuee/AzO6etScL
6zskfdu6tm1d21V9/ky+/Tyx/OrjgPW+sNz98E54AB6Cd8M1eBjeZ8+/dla7
jcr74QOYPwiPYH7UmoeK4adDlQ8jP4L+URvb+PXjQ99gz8eQH0f/BDyG+ZPI
T8HjmD8Nn4EncH9ncd45eBJ9y/sO6zxyWHXkdZw/hXzKaj8HX79bqvoXkMO6
iBzWNPJpnD+T22fse/f3yxfvq3wW+SzyOdsc7/6tj+7q5XPW92Xvm5GNKr+U
22HNI5/H+Q3sb6B/OZ93WFfQh3UVfVjN3NbE/Tbz8wLzupbPG+xwwFpAH3Y4
YC2iv2ifVp6lzuPqecEBq5U/X2thfyt/vwJWO3/frZ3/3ryd/98ErOu5DXY4
YHXQhx0OWDfQhx0OWEvoww4HrJvoww4HrGX0YYcD1gr6sMMBaxV92OGAdQt9
2OGAdRt92OGAlXLXYIMT7HABB1zCuoP9sMEJdriAAy5hrWE/bHCCHS7ggEtY
d7EfNjjBDhdwwCWse9gPG5xghws44BLWOvbDBifY4QIOuIR1H/thgxPscAEH
XMJ6gP2wwQl2uIADLmE9xH7Y4AQ7XMABl7AeYf9//wOFBNo4
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.448, 0.69232, 0.1538],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]},
AbsoluteThickness[1.5],
Dashing[{}],
LineBox[{
Offset[{-2.75, -2.75}],
Offset[{2.75, -2.75}],
Offset[{2.75, 2.75}],
Offset[{-2.75, 2.75}],
Offset[{-2.75, -2.75}]}]}], {0., 0.}], CompressedData["
1:eJxdzztvjnEYx/ELi1GixGCoRkREnM9K/86noupQVLmVOkwWiUlyxRswGIXc
k9FsMFybmL2B2zswm3RoI/08yTN8nu//lyvPlvlX0wtrIuLn4nfV4nd1LH/+
TEzt7sdebxppSz+0lV6L1+GR9u7HzNzfyWVvom/Go3gMb21vP//6vvH3+iVv
w9t5vwPv5P2u9mbDx3j/Zdl76HvZ7+P/7KcfYH+Qfggf5v0RfJR7x/Bx3o+3
T9/GZz98Xe4n6CfxBG4rnThO0XGcpuM4Q8dxlo7jHB3HeTqOC3QcF+k4LtFx
XKbjuELHMUnHcZWO4xodx3U6jqmVbjhx4bjBHicuHNPsceLCcZM9Tlw4brHH
iQvHbfY4ceG4wx4nLhwz7HHiwnGXPU5cOO6xx4kLx332OHHhmGWPExeOB+xx
4sIxxx4nLhwP2ePEheMRe5y4cHQrPYob7nDiHhcecDzmPm64w4l7XHjAMc99
3HCHE/e48IDjCfdxwx1O3OPCA46n3McNdzhxjwsPOBa4jxvucOIeFx5wPOM+
brjDiXtceMDxnPu44Q4n7nHhAccL7uOGO5y4x4UHHC+5/9//ADc3tCU=
"]]}, {
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]],
GeometricTransformationBox[
InsetBox[
GraphicsBox[{
Directive[
PointSize[0.004583333333333334],
RGBColor[0.62168, 0.2798, 0.6914],
CapForm["Butt"],
AbsoluteThickness[3],
AbsolutePointSize[6]], {
GrayLevel[1],
PolygonBox[
NCache[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}]}, {
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}]}]]},
AbsoluteThickness[1.5],
Dashing[{}],
JoinedCurveBox[
NCache[
Line[{
Offset[{0, -4}],
Offset[{(-2) 3^Rational[1, 2], 2}],
Offset[{2 3^Rational[1, 2], 2}],
Offset[{0, -4}]}],
Line[{
Offset[{0, -4}],
Offset[{-3.4641016151377544`, 2}],
Offset[{3.4641016151377544`, 2}],
Offset[{0, -4}]}]], CurveClosed -> True]}], {0.,
0.}], CompressedData["
1:eJxdzUmOTmEUx+GDCTPRRcSgiIggou+pV993pe+voigjQ4lEcjYgFiDhjszF
VORMjS3AtQOxAjWoL/I9N3kHz/3ln7Nu+tXUzKKI+DH3Fsy9hTH6/ky+/fjz
26rfy9v8jzbuxXgpXoFX47V4Aq/HG/DG9nrlh3j/eeRN9M30re3L3zWf3syO
vA1vb+++Ltny/deyee/AO/EuvBvvwXvxPrwfH8AH8SF8GB/BR/EkbuNOHMfo
OI7TcZyg4zhJx3GKjuM0HccZOo6zdBzn6DjO03FcoOO4SMdxiY7jMh3HFTqO
q+NuOHHhuMYeJy4cU+xx4sJxnT1OXDhusMeJC8dN9jhx4bjFHicuHLfZ48SF
4w57nLhw3GWPExeOe+xx4sJxnz1OXDgesMeJC8dD9jhx4XjEHicuHI/Z48SF
oxv3BG64w4l7XHjA8YT7uOEOJ+5x4QHHNPdxwx1O3OPCA46n3McNdzhxjwsP
OJ5xHzfc4cQ9LjzgmOE+brjDiXtceMDxnPu44Q4n7nHhAccL7uOGO5y4x4UH
HLPcxw13OHGPCw84XnL/v/8BXdFkMQ==
"]]}, {}}}, {}, {}, {{}, {}}}}, {
DisplayFunction -> Identity, GridLines -> {None,
Charting`ScaledTickValues[{Log, Exp}]}, DisplayFunction -> Identity,
DisplayFunction -> Identity, DisplayFunction -> Identity,
PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, AxesOrigin -> {0, 4.5818490226910304`},
PlotRange -> {{0, 201.}, {4.613902690882107, 6.601230118728877}},
PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction ->
Identity, AspectRatio -> 1, Axes -> {False, False},
AxesLabel -> {None, None}, AxesOrigin -> {0, 4.5818490226910304`},
DisplayFunction :> Identity, Frame -> {{True, False}, {True, False}},
FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> {{
StrokeForm[
Opacity[0]],
StrokeForm[
Opacity[0]]}, {Automatic, None}},
FrameTicks -> {{Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& , {}}, {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , None}},
GridLines -> {
None, {5.298317366548036, 5.991464547107982, 6.396929655216146,
6.684611727667927}}, GridLinesStyle -> Directive[
GrayLevel[0.4, 0.5],
AbsoluteThickness[1],
AbsoluteDashing[{1, 2}]], ImageSize -> 250,
Method -> {"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& ), "CopiedValueFunction" -> ({
(Part[{{Identity, Identity}, {Log, Exp}}, 1, 2][#]& )[
Part[#, 1]],
(Part[{{Identity, Identity}, {Log, Exp}}, 2, 2][#]& )[
Part[#, 2]]}& )}}, PlotLabel -> FormBox[
StyleBox["\"Compression collapsed cases\"", 14,
GrayLevel[0], StripOnInput -> False], TraditionalForm],
PlotRange -> {{0, 201.}, {4.613902690882107, 6.601230118728877}},
PlotRangeClipping -> True, PlotRangePadding -> {{
Scaled[0.02],
Scaled[0.02]}, {
Scaled[0.02],
Scaled[0.05]}}, Ticks -> {Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Identity, Identity}]& , Charting`FindScaledTicks[
(Charting`SimpleTicks[#, #2, 6]& )[
SlotSequence[1]], {Log, Exp}]& }}]},
"RowDefault"]], "Output",
CellChangeTimes->{
3.706799863364449*^9, {3.706800329907345*^9, 3.706800364008374*^9}}]
}, {2}]]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowSize->{1399, 851},
WindowMargins->{{17, Automatic}, {Automatic, 0}},
Magnification:>1.5 Inherited,
FrontEndVersion->"11.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (July 28, \
2016)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 229, 5, 220, "Title"],
Cell[812, 29, 136, 1, 46, "Text"],
Cell[951, 32, 103, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[1079, 37, 282, 6, 48, "Input"],
Cell[1364, 45, 350, 6, 48, "Output"]
}, Open ]],
Cell[1729, 54, 119, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[1873, 59, 299, 6, 48, "Input"],
Cell[2175, 67, 453, 6, 48, "Output"]
}, Open ]],
Cell[2643, 76, 363, 7, 48, "Input"],
Cell[3009, 85, 697, 22, 48, "Input"],
Cell[3709, 109, 1913, 53, 111, "Input"],
Cell[5625, 164, 132, 2, 48, "Input"],
Cell[5760, 168, 2178, 55, 142, "Input"],
Cell[7941, 225, 2229, 55, 235, "Input"],
Cell[10173, 282, 379, 10, 48, "Input"],
Cell[10555, 294, 337, 7, 48, "Input"],
Cell[10895, 303, 796, 23, 80, "Input"],
Cell[11694, 328, 755, 22, 80, "Input"],
Cell[12452, 352, 765, 22, 80, "Input"],
Cell[13220, 376, 110, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[13355, 381, 919, 28, 111, "Input"],
Cell[14277, 411, 80, 1, 48, "Output"]
}, Open ]],
Cell[14372, 415, 110, 1, 46, "Text"],
Cell[14485, 418, 827, 25, 80, "Input"],
Cell[CellGroupData[{
Cell[15337, 447, 10640, 260, 1041, "Input"],
Cell[25980, 709, 70418, 1642, 258, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[96432, 2356, 10584, 259, 1010, "Input"],
Cell[107019, 2617, 68895, 1634, 273, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[175948, 4256, 10755, 263, 1072, "Input"],
Cell[186706, 4521, 71460, 1672, 256, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[258200, 6198, 131, 1, 94, "Subchapter"],
Cell[258334, 6201, 138, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[258497, 6206, 1980, 49, 204, "Input"],
Cell[260480, 6257, 14174, 300, 367, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[274691, 6562, 2438, 60, 216, "Input"],
Cell[277132, 6624, 24214, 516, 351, "Output"]
}, Open ]],
Cell[301361, 7143, 237, 5, 46, "Text"],
Cell[CellGroupData[{
Cell[301623, 7152, 4370, 106, 1419, "Input"],
Cell[305996, 7260, 58159, 1287, 343, "Output"]
}, {2}]],
Cell[364167, 8550, 561, 9, 105, "Text"],
Cell[CellGroupData[{
Cell[364753, 8563, 5519, 128, 452, "Input"],
Cell[370275, 8693, 189430, 5245, 1565, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[559754, 13944, 108, 1, 94, "Subchapter"],
Cell[559865, 13947, 589, 17, 48, "Input"],
Cell[CellGroupData[{
Cell[560479, 13968, 1447, 40, 142, "Input",
CellID->13861],
Cell[561929, 14010, 8427, 165, 84, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[570393, 14180, 1406, 37, 111, "Input"],
Cell[571802, 14219, 982, 27, 172, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[572821, 14251, 3929, 99, 359, "Input"],
Cell[576753, 14352, 10749, 222, 418, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[587539, 14579, 4248, 111, 390, "Input"],
Cell[591790, 14692, 64595, 1386, 440, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[656419, 16083, 4208, 112, 452, "Input"],
Cell[660630, 16197, 61261, 1331, 440, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[721925, 17533, 4206, 112, 421, "Input"],
Cell[726134, 17647, 62449, 1352, 440, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[788617, 19004, 3274, 80, 297, "Input"],
Cell[791894, 19086, 76795, 1590, 509, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[868723, 20681, 471, 14, 48, "Input"],
Cell[869197, 20697, 6827, 211, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[876061, 20913, 1043, 32, 80, "Input"],
Cell[877107, 20947, 1174, 36, 80, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[878318, 20988, 593, 17, 80, "Input"],
Cell[878914, 21007, 118092, 2925, 609, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[997043, 23937, 2447, 67, 297, "Input"],
Cell[999493, 24006, 31514, 686, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1031041, 24697, 4073, 106, 421, "Input"],
Cell[1035117, 24805, 31711, 690, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1066862, 25500, 4080, 106, 421, "Input"],
Cell[1070945, 25608, 31377, 687, 408, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1102356, 26300, 3995, 105, 452, "Input"],
Cell[1106354, 26407, 30857, 677, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1137245, 27089, 3043, 73, 297, "Input"],
Cell[1140291, 27164, 61485, 1243, 295, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1201810, 28412, 3968, 105, 421, "Input"],
Cell[1205781, 28519, 31047, 684, 405, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1236862, 29208, 4009, 105, 452, "Input"],
Cell[1240874, 29315, 30603, 678, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1271511, 29998, 4028, 106, 421, "Input"],
Cell[1275542, 30106, 30858, 679, 398, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1306434, 30790, 3202, 77, 328, "Input"],
Cell[1309639, 30869, 46738, 935, 295, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1356411, 31809, 4127, 112, 421, "Input"],
Cell[1360541, 31923, 162789, 3518, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1523364, 35446, 3822, 92, 421, "Input"],
Cell[1527189, 35540, 276381, 5371, 1279, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1803604, 40916, 4957, 128, 421, "Input"],
Cell[1808564, 41046, 53438, 1152, 400, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1862036, 42203, 4550, 106, 421, "Input"],
Cell[1866589, 42311, 97317, 1884, 505, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[1963940, 44200, 4479, 121, 452, "Input"],
Cell[1968422, 44323, 51478, 1120, 401, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[2019934, 45448, 4444, 121, 421, "Input"],
Cell[2024381, 45571, 51907, 1126, 403, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[2076322, 46702, 190, 2, 65, "Subsection"],
Cell[CellGroupData[{
Cell[2076537, 46708, 1195, 35, 111, "Input"],
Cell[2077735, 46745, 8708, 220, 84, "Output"]
}, Open ]],
Cell[2086458, 46968, 386, 11, 48, "Input"],
Cell[2086847, 46981, 437, 13, 48, "Input"],
Cell[2087287, 46996, 476, 14, 48, "Input"],
Cell[2087766, 47012, 434, 13, 48, "Input"],
Cell[2088203, 47027, 3358, 83, 235, "Input"],
Cell[2091564, 47112, 98, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[2091687, 47117, 512, 13, 80, "Input"],
Cell[2092202, 47132, 1578, 34, 172, "Output"]
}, Open ]],
Cell[2093795, 47169, 158, 2, 46, "Text"],
Cell[CellGroupData[{
Cell[2093978, 47175, 884, 20, 80, "Input"],
Cell[2094865, 47197, 1752, 36, 172, "Output"]
}, Open ]],
Cell[2096632, 47236, 159, 2, 46, "Text"],
Cell[CellGroupData[{
Cell[2096816, 47242, 656, 17, 80, "Input"],
Cell[2097475, 47261, 1456, 32, 172, "Output"]
}, Open ]],
Cell[2098946, 47296, 203, 3, 46, "Text"],
Cell[CellGroupData[{
Cell[2099174, 47303, 861, 22, 142, "Input"],
Cell[2100038, 47327, 1456, 32, 172, "Output"]
}, Open ]],
Cell[2101509, 47362, 101, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[2101635, 47367, 1040, 26, 173, "Input"],
Cell[2102678, 47395, 1456, 32, 172, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[2104183, 47433, 241, 3, 65, "Subsection"],
Cell[2104427, 47438, 432, 10, 80, "Input"],
Cell[CellGroupData[{
Cell[2104884, 47452, 1467, 37, 142, "Input"],
Cell[2106354, 47491, 1864, 40, 299, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2108255, 47536, 2323, 58, 204, "Input"],
Cell[2110581, 47596, 2180, 44, 251, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2112798, 47645, 2220, 56, 204, "Input"],
Cell[2115021, 47703, 2077, 42, 283, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2117135, 47750, 2243, 56, 204, "Input"],
Cell[2119381, 47808, 2105, 42, 283, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2121523, 47855, 2239, 56, 204, "Input"],
Cell[2123765, 47913, 2130, 42, 283, "Output"]
}, Open ]],
Cell[2125910, 47958, 381, 7, 76, "Text"],
Cell[CellGroupData[{
Cell[2126316, 47969, 1821, 47, 173, "Input"],
Cell[2128140, 48018, 4878, 104, 344, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2133055, 48127, 1931, 49, 201, "Input"],
Cell[2134989, 48178, 17060, 413, 209, "Output"]
}, {2}]],
Cell[CellGroupData[{
Cell[2152083, 48596, 1791, 46, 173, "Input"],
Cell[2153877, 48644, 1952, 40, 283, "Output"]
}, Open ]],
Cell[2155844, 48687, 126, 2, 46, "Text"],
Cell[CellGroupData[{
Cell[2155995, 48693, 2036, 51, 204, "Input"],
Cell[2158034, 48746, 2024, 41, 299, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2160095, 48792, 2561, 60, 297, "Input"],
Cell[2162659, 48854, 14590, 343, 387, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2177286, 49202, 2614, 61, 297, "Input"],
Cell[2179903, 49265, 17574, 418, 355, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2197514, 49688, 2613, 61, 297, "Input"],
Cell[2200130, 49751, 120492, 2586, 1099, "Output"]
}, Open ]],
Cell[2320637, 52340, 132, 1, 46, "Text"],
Cell[CellGroupData[{
Cell[2320794, 52345, 6404, 155, 576, "Input"],
Cell[2327201, 52502, 34978, 745, 356, "Output"]
}, Open ]],
Cell[2362194, 53250, 255, 5, 76, "Text"],
Cell[CellGroupData[{
Cell[2362474, 53259, 6190, 151, 576, "Input"],
Cell[2368667, 53412, 32519, 704, 364, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2401223, 54121, 6436, 157, 669, "Input"],
Cell[2407662, 54280, 32902, 712, 361, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2440601, 54997, 4486, 112, 359, "Input"],
Cell[2445090, 55111, 18058, 302, 294, "Output"]
}, Open ]],
Cell[2463163, 55416, 5426, 129, 483, "Input"],
Cell[2468592, 55547, 5368, 129, 483, "Input"],
Cell[CellGroupData[{
Cell[2473985, 55680, 2671, 67, 235, "Input"],
Cell[2476659, 55749, 21256, 392, 239, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2497952, 56146, 2866, 70, 235, "Input"],
Cell[2500821, 56218, 54712, 935, 451, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2555570, 57158, 2669, 67, 235, "Input"],
Cell[2558242, 57227, 13504, 372, 345, "Output"]
}, Open ]],
Cell[2571761, 57602, 230, 5, 46, "Text"],
Cell[CellGroupData[{
Cell[2572016, 57611, 3277, 79, 297, "Input"],
Cell[2575296, 57692, 12469, 231, 225, "Output"]
}, Open ]],
Cell[2587780, 57926, 2324, 58, 235, "Input"],
Cell[2590107, 57986, 2018, 52, 204, "Input"],
Cell[2592128, 58040, 2383, 59, 235, "Input"],
Cell[2594514, 58101, 2075, 53, 204, "Input"],
Cell[2596592, 58156, 2391, 59, 235, "Input"],
Cell[2598986, 58217, 2082, 52, 204, "Input"],
Cell[CellGroupData[{
Cell[2601093, 58273, 1959, 41, 204, "Input"],
Cell[2603055, 58316, 129816, 2586, 418, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2732908, 60907, 1802, 39, 688, "Input"],
Cell[2734713, 60948, 59234, 1268, 418, "Output"]
}, {2}]]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)
