(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 1107083, 23444] NotebookOptionsPosition[ 1104966, 23398] NotebookOutlinePosition[ 1105426, 23417] CellTagsIndexPosition[ 1105383, 23414] WindowTitle->Mister Rogers' Sweater Colors | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection"], Cell["Retrieve the default content:", "Text", CellChangeTimes->{{3.696186645510051*^9, 3.6961866545240507`*^9}, { 3.696187841532233*^9, 3.696187852829363*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceData", "[", "\"\\"", "]"}]], "Input", CellContext->Notebook, CellFrameLabels->None, CellChangeTimes->{{3.696186325360051*^9, 3.696186327021051*^9}, { 3.696186470495051*^9, 3.6961864722920513`*^9}, {3.696187844212501*^9, 3.6961878557606554`*^9}}, CellLabel->"In[1]:="], Cell[BoxData[ TagBox[ TagBox[ DynamicModuleBox[{TypeSystem`NestedGrid`PackagePrivate`$state$$ = <| "InitialData" -> {<| "EpisodeNumber" -> "1461", "Date" -> DateObject[{1979, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1462", "Date" -> DateObject[{1979, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1463", "Date" -> DateObject[{1979, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1464", "Date" -> DateObject[{1979, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1465", "Date" -> DateObject[{1979, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1466", "Date" -> DateObject[{1980, 2, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1467", "Date" -> DateObject[{1980, 2, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1468", "Date" -> DateObject[{1980, 2, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1469", "Date" -> DateObject[{1980, 2, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1470", "Date" -> DateObject[{1980, 2, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1470", "Date" -> DateObject[{1980, 2, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1472", "Date" -> DateObject[{1980, 5, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1473", "Date" -> DateObject[{1980, 5, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1474", "Date" -> DateObject[{1980, 5, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1475", "Date" -> DateObject[{1980, 5, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1476", "Date" -> DateObject[{1981, 2, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1477", "Date" -> DateObject[{1981, 2, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1478", "Date" -> DateObject[{1981, 2, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1479", "Date" -> DateObject[{1981, 2, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1480", "Date" -> DateObject[{1981, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1481", "Date" -> DateObject[{1981, 6, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1482", "Date" -> DateObject[{1981, 6, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1483", "Date" -> DateObject[{1981, 6, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1484", "Date" -> DateObject[{1981, 6, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1486", "Date" -> DateObject[{1981, 7, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1487", "Date" -> DateObject[{1981, 7, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1488", "Date" -> DateObject[{1981, 7, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1489", "Date" -> DateObject[{1981, 7, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1490", "Date" -> DateObject[{1981, 7, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1491", "Date" -> DateObject[{1982, 3, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1492", "Date" -> DateObject[{1982, 3, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1493", "Date" -> DateObject[{1982, 3, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1494", "Date" -> DateObject[{1982, 3, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1495", "Date" -> DateObject[{1982, 3, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1496", "Date" -> DateObject[{1982, 5, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1497", "Date" -> DateObject[{1982, 6, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.2, 1., 0.6]|>, <| "EpisodeNumber" -> "1498", "Date" -> DateObject[{1982, 6, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1499", "Date" -> DateObject[{1982, 6, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1500", "Date" -> DateObject[{1982, 6, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1501", "Date" -> DateObject[{1982, 6, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1502", "Date" -> DateObject[{1982, 6, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1503", "Date" -> DateObject[{1982, 6, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1504", "Date" -> DateObject[{1982, 7, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1505", "Date" -> DateObject[{1982, 7, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1506", "Date" -> DateObject[{1982, 11, 15}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1507", "Date" -> DateObject[{1982, 11, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1508", "Date" -> DateObject[{1982, 11, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1509", "Date" -> DateObject[{1982, 11, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1510", "Date" -> DateObject[{1982, 11, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1511", "Date" -> DateObject[{1983, 2, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1512", "Date" -> DateObject[{1983, 2, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1513", "Date" -> DateObject[{1983, 2, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1514", "Date" -> DateObject[{1983, 2, 10}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1515", "Date" -> DateObject[{1983, 2, 11}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1516", "Date" -> DateObject[{1983, 4, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1517", "Date" -> DateObject[{1983, 4, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1518", "Date" -> DateObject[{1983, 4, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1519", "Date" -> DateObject[{1983, 4, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1520", "Date" -> DateObject[{1983, 4, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1521", "Date" -> DateObject[{1983, 11, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1522", "Date" -> DateObject[{1983, 11, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1523", "Date" -> DateObject[{1983, 11, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1524", "Date" -> DateObject[{1983, 11, 10}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1525", "Date" -> DateObject[{1983, 11, 11}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1526", "Date" -> DateObject[{1984, 4, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1527", "Date" -> DateObject[{1984, 4, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1528", "Date" -> DateObject[{1984, 4, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1529", "Date" -> DateObject[{1984, 4, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1530", "Date" -> DateObject[{1984, 4, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1531", "Date" -> DateObject[{1984, 5, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1532", "Date" -> DateObject[{1984, 5, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1533", "Date" -> DateObject[{1984, 5, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1534", "Date" -> DateObject[{1984, 5, 10}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1536", "Date" -> DateObject[{1984, 11, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1537", "Date" -> DateObject[{1984, 11, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1538", "Date" -> DateObject[{1984, 11, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1539", "Date" -> DateObject[{1984, 11, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1540", "Date" -> DateObject[{1984, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1541", "Date" -> DateObject[{1985, 2, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1542", "Date" -> DateObject[{1985, 2, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1543", "Date" -> DateObject[{1985, 2, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1544", "Date" -> DateObject[{1985, 2, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1545", "Date" -> DateObject[{1985, 2, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1546", "Date" -> DateObject[{1985, 5, 13}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1547", "Date" -> DateObject[{1985, 5, 14}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1548", "Date" -> DateObject[{1985, 5, 15}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1549", "Date" -> DateObject[{1985, 5, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1550", "Date" -> DateObject[{1985, 5, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1551", "Date" -> DateObject[{1985, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.6, 0.6, 0.6]|>, <| "EpisodeNumber" -> "1552", "Date" -> DateObject[{1985, 11, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1553", "Date" -> DateObject[{1985, 11, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1554", "Date" -> DateObject[{1985, 11, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1555", "Date" -> DateObject[{1985, 11, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1556", "Date" -> DateObject[{1986, 2, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1557", "Date" -> DateObject[{1986, 2, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1558", "Date" -> DateObject[{1986, 2, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1559", "Date" -> DateObject[{1986, 2, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1560", "Date" -> DateObject[{1986, 2, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1561", "Date" -> DateObject[{1986, 5, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1562", "Date" -> DateObject[{1986, 5, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1563", "Date" -> DateObject[{1986, 5, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1564", "Date" -> DateObject[{1986, 5, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1565", "Date" -> DateObject[{1986, 5, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1566", "Date" -> DateObject[{1986, 11, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1567", "Date" -> DateObject[{1986, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1568", "Date" -> DateObject[{1986, 11, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1569", "Date" -> DateObject[{1986, 11, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1570", "Date" -> DateObject[{1986, 11, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1571", "Date" -> DateObject[{1987, 3, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1572", "Date" -> DateObject[{1987, 3, 10}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1573", "Date" -> DateObject[{1987, 3, 11}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1574", "Date" -> DateObject[{1987, 3, 12}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.4]|>, <| "EpisodeNumber" -> "1575", "Date" -> DateObject[{1987, 3, 13}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1576", "Date" -> DateObject[{1987, 5, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1577", "Date" -> DateObject[{1987, 5, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1578", "Date" -> DateObject[{1987, 5, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1579", "Date" -> DateObject[{1987, 5, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1580", "Date" -> DateObject[{1987, 5, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1581", "Date" -> DateObject[{1987, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1582", "Date" -> DateObject[{1987, 11, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1583", "Date" -> DateObject[{1987, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1584", "Date" -> DateObject[{1987, 11, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1585", "Date" -> DateObject[{1987, 11, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1586", "Date" -> DateObject[{1988, 3, 7}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1587", "Date" -> DateObject[{1988, 3, 8}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 0.]|>, <| "EpisodeNumber" -> "1588", "Date" -> DateObject[{1988, 3, 9}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1589", "Date" -> DateObject[{1988, 3, 10}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1590", "Date" -> DateObject[{1988, 3, 11}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1591", "Date" -> DateObject[{1988, 5, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1592", "Date" -> DateObject[{1988, 5, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1593", "Date" -> DateObject[{1988, 5, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1594", "Date" -> DateObject[{1988, 5, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1595", "Date" -> DateObject[{1988, 5, 6}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1596", "Date" -> DateObject[{1988, 11, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1597", "Date" -> DateObject[{1988, 11, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1598", "Date" -> DateObject[{1988, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1599", "Date" -> DateObject[{1988, 11, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1600", "Date" -> DateObject[{1988, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1601", "Date" -> DateObject[{1989, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.2, 0.]|>, <| "EpisodeNumber" -> "1602", "Date" -> DateObject[{1989, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1603", "Date" -> DateObject[{1989, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1604", "Date" -> DateObject[{1989, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1605", "Date" -> DateObject[{1989, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1606", "Date" -> DateObject[{1989, 5, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1607", "Date" -> DateObject[{1989, 5, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1608", "Date" -> DateObject[{1989, 5, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1609", "Date" -> DateObject[{1989, 5, 4}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 1., 0.4]|>, <| "EpisodeNumber" -> "1610", "Date" -> DateObject[{1989, 5, 5}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1611", "Date" -> DateObject[{1989, 11, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1612", "Date" -> DateObject[{1989, 11, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1613", "Date" -> DateObject[{1989, 11, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1614", "Date" -> DateObject[{1989, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1615", "Date" -> DateObject[{1989, 11, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1616", "Date" -> DateObject[{1990, 4, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1617", "Date" -> DateObject[{1990, 4, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1618", "Date" -> DateObject[{1990, 4, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1619", "Date" -> DateObject[{1990, 4, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1620", "Date" -> DateObject[{1990, 4, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1621", "Date" -> DateObject[{1990, 7, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1622", "Date" -> DateObject[{1990, 7, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1623", "Date" -> DateObject[{1990, 8, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1624", "Date" -> DateObject[{1990, 8, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1625", "Date" -> DateObject[{1990, 8, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1626", "Date" -> DateObject[{1990, 11, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1627", "Date" -> DateObject[{1990, 11, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1628", "Date" -> DateObject[{1990, 11, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1629", "Date" -> DateObject[{1990, 11, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1630", "Date" -> DateObject[{1990, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1631", "Date" -> DateObject[{1991, 2, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1632", "Date" -> DateObject[{1991, 2, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1633", "Date" -> DateObject[{1991, 2, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1634", "Date" -> DateObject[{1991, 2, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1635", "Date" -> DateObject[{1991, 3, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1636", "Date" -> DateObject[{1991, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.2, 0.2, 0.2]|>, <| "EpisodeNumber" -> "1637", "Date" -> DateObject[{1991, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0., 0.]|>, <| "EpisodeNumber" -> "1638", "Date" -> DateObject[{1991, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1639", "Date" -> DateObject[{1991, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[ 0.5019607843137255, 0.5019607843137255, 0.25098039215686274`]|>, <| "EpisodeNumber" -> "1640", "Date" -> DateObject[{1991, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0., 0.]|>, <| "EpisodeNumber" -> "1641", "Date" -> DateObject[{1991, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1642", "Date" -> DateObject[{1991, 11, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1643", "Date" -> DateObject[{1991, 11, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1644", "Date" -> DateObject[{1991, 11, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1645", "Date" -> DateObject[{1991, 11, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1646", "Date" -> DateObject[{1992, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1647", "Date" -> DateObject[{1992, 2, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1648", "Date" -> DateObject[{1992, 2, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1649", "Date" -> DateObject[{1992, 2, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1650", "Date" -> DateObject[{1992, 2, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1651", "Date" -> DateObject[{1992, 8, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1652", "Date" -> DateObject[{1992, 8, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1653", "Date" -> DateObject[{1992, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 1.]|>, <| "EpisodeNumber" -> "1654", "Date" -> DateObject[{1992, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1655", "Date" -> DateObject[{1992, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1656", "Date" -> DateObject[{1992, 11, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1657", "Date" -> DateObject[{1992, 11, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1658", "Date" -> DateObject[{1992, 11, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1659", "Date" -> DateObject[{1992, 11, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1660", "Date" -> DateObject[{1992, 11, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1661", "Date" -> DateObject[{1993, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1662", "Date" -> DateObject[{1993, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1663", "Date" -> DateObject[{1993, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1664", "Date" -> DateObject[{1993, 2, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1665", "Date" -> DateObject[{1993, 2, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1666", "Date" -> DateObject[{1993, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1667", "Date" -> DateObject[{1993, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1668", "Date" -> DateObject[{1993, 9, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1669", "Date" -> DateObject[{1993, 9, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1670", "Date" -> DateObject[{1993, 9, 3}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1671", "Date" -> DateObject[{1994, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1672", "Date" -> DateObject[{1994, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1673", "Date" -> DateObject[{1994, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1674", "Date" -> DateObject[{1994, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1675", "Date" -> DateObject[{1994, 2, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1676", "Date" -> DateObject[{1994, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1677", "Date" -> DateObject[{1994, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1678", "Date" -> DateObject[{1994, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1679", "Date" -> DateObject[{1994, 9, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1680", "Date" -> DateObject[{1994, 9, 2}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1681", "Date" -> DateObject[{1995, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1682", "Date" -> DateObject[{1995, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1683", "Date" -> DateObject[{1995, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1684", "Date" -> DateObject[{1995, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1685", "Date" -> DateObject[{1995, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1686", "Date" -> DateObject[{1995, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1687", "Date" -> DateObject[{1995, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1688", "Date" -> DateObject[{1995, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1689", "Date" -> DateObject[{1995, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1690", "Date" -> DateObject[{1995, 9, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1691", "Date" -> DateObject[{1995, 10, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1692", "Date" -> DateObject[{1995, 10, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1693", "Date" -> DateObject[{1995, 10, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1694", "Date" -> DateObject[{1995, 10, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1695", "Date" -> DateObject[{1995, 10, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1696", "Date" -> DateObject[{1996, 2, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1697", "Date" -> DateObject[{1996, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1698", "Date" -> DateObject[{1996, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1699", "Date" -> DateObject[{1996, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1700", "Date" -> DateObject[{1996, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1701", "Date" -> DateObject[{1996, 7, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1702", "Date" -> DateObject[{1996, 7, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1703", "Date" -> DateObject[{1996, 7, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1704", "Date" -> DateObject[{1996, 7, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1705", "Date" -> DateObject[{1996, 7, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1706", "Date" -> DateObject[{1996, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1707", "Date" -> DateObject[{1996, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1708", "Date" -> DateObject[{1996, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1709", "Date" -> DateObject[{1996, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1710", "Date" -> DateObject[{1996, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1711", "Date" -> DateObject[{1997, 2, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1712", "Date" -> DateObject[{1997, 2, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1713", "Date" -> DateObject[{1997, 2, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1714", "Date" -> DateObject[{1997, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1715", "Date" -> DateObject[{1997, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1716", "Date" -> DateObject[{1997, 8, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1717", "Date" -> DateObject[{1997, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1718", "Date" -> DateObject[{1997, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1719", "Date" -> DateObject[{1997, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 1.]|>, <| "EpisodeNumber" -> "1720", "Date" -> DateObject[{1997, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1721", "Date" -> DateObject[{1998, 2, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1723", "Date" -> DateObject[{1998, 2, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1724", "Date" -> DateObject[{1998, 2, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1725", "Date" -> DateObject[{1998, 2, 20}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 1.]|>, <| "EpisodeNumber" -> "1726", "Date" -> DateObject[{1998, 7, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1727", "Date" -> DateObject[{1998, 7, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 1.]|>, <| "EpisodeNumber" -> "1728", "Date" -> DateObject[{1998, 7, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1729", "Date" -> DateObject[{1998, 7, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1730", "Date" -> DateObject[{1998, 7, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1731", "Date" -> DateObject[{1998, 8, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 1.]|>, <| "EpisodeNumber" -> "1732", "Date" -> DateObject[{1998, 8, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1733", "Date" -> DateObject[{1998, 8, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1734", "Date" -> DateObject[{1998, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1735", "Date" -> DateObject[{1998, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1736", "Date" -> DateObject[{1999, 2, 15}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.4, 1.]|>, <| "EpisodeNumber" -> "1737", "Date" -> DateObject[{1999, 2, 16}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1738", "Date" -> DateObject[{1999, 2, 17}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1739", "Date" -> DateObject[{1999, 2, 18}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1740", "Date" -> DateObject[{1999, 2, 19}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1741", "Date" -> DateObject[{1999, 7, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1742", "Date" -> DateObject[{1999, 7, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.8, 0.4, 0.]|>, <| "EpisodeNumber" -> "1743", "Date" -> DateObject[{1999, 7, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1744", "Date" -> DateObject[{1999, 7, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1745", "Date" -> DateObject[{1999, 7, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1746", "Date" -> DateObject[{1999, 3, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1747", "Date" -> DateObject[{1999, 3, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1748", "Date" -> DateObject[{1999, 3, 25}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1749", "Date" -> DateObject[{1999, 3, 26}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.8, 0.4, 0.]|>, <| "EpisodeNumber" -> "1750", "Date" -> DateObject[{1999, 3, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1751", "Date" -> DateObject[{2000, 2, 21}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1752", "Date" -> DateObject[{2000, 2, 22}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1753", "Date" -> DateObject[{2000, 2, 23}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1754", "Date" -> DateObject[{2000, 2, 24}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1755", "Date" -> DateObject[{2000, 2, 12}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1756", "Date" -> DateObject[{2000, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1757", "Date" -> DateObject[{2000, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1758", "Date" -> DateObject[{2000, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1759", "Date" -> DateObject[{2000, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1760", "Date" -> DateObject[{2000, 9, 1}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1761", "Date" -> DateObject[{2001, 8, 27}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>, <| "EpisodeNumber" -> "1762", "Date" -> DateObject[{2001, 8, 28}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.6, 0.]|>, <| "EpisodeNumber" -> "1763", "Date" -> DateObject[{2001, 8, 29}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0., 0.2, 1.]|>, <| "EpisodeNumber" -> "1764", "Date" -> DateObject[{2001, 8, 30}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[0.4, 0.4, 0.8]|>, <| "EpisodeNumber" -> "1765", "Date" -> DateObject[{2001, 8, 31}, "Day", "Gregorian", -5.], "SweaterColor" -> RGBColor[1., 0., 0.]|>}, "AllowEmbedding" -> True, "InitialShape" -> TypeSystem`PackageScope`HeaderShape[<|{All, "EpisodeNumber"} -> 1, {All, "Date"} -> 1, {All, "SweaterColor"} -> 1|>, TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`ColumnShape[ TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`RowShape[<| "EpisodeNumber" -> TypeSystem`PackageScope`AtomShape[44.800000000000004`], "Date" -> TypeSystem`PackageScope`AtomShape[75], "SweaterColor" -> TypeSystem`PackageScope`UnknownShape[False]|>], DirectedInfinity[1], 3, {All}]], 5, DirectedInfinity[1], {}]], "InitialType" -> TypeSystem`Vector[ TypeSystem`Struct[{"EpisodeNumber", "Date", "SweaterColor"}, { TypeSystem`Atom[String], TypeSystem`Atom[DateObject], TypeSystem`AnyType}], 302], "Meta" -> <|"ID" -> 12184928796848|>, "RowTarget" -> 20, "ColumnTarget" -> 10, "Shape" -> TypeSystem`PackageScope`HeaderShape[<|{All, "EpisodeNumber"} -> 1, {All, "Date"} -> 1, {All, "SweaterColor"} -> 1|>, TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`ColumnShape[ TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`RowShape[<| "EpisodeNumber" -> TypeSystem`PackageScope`AtomShape[44.800000000000004`], "Date" -> TypeSystem`PackageScope`AtomShape[75], "SweaterColor" -> TypeSystem`PackageScope`UnknownShape[False]|>], DirectedInfinity[1], 3, {All}]], 5, DirectedInfinity[1], {}]], "Type" -> TypeSystem`Vector[ TypeSystem`Struct[{"EpisodeNumber", "Date", "SweaterColor"}, { TypeSystem`Atom[String], TypeSystem`Atom[DateObject], TypeSystem`AnyType}], 302], "Path" -> {}, "DisplayedRowCount" -> 5, "DisplayedColumnCount" -> 3, "DataRowCount" -> 302, "DataColumnCount" -> 3, "SortPaths" -> {}, "SortDirections" -> {}, "HiddenItemsMap" -> Null, "UpdateType" -> 1|>, TypeSystem`NestedGrid`PackagePrivate`$outputID$$, TypeSystem`NestedGrid`PackagePrivate`$path$$ = {}, TypeSystem`NestedGrid`PackagePrivate`$vPos$$ = 1, TypeSystem`NestedGrid`PackagePrivate`$hPos$$ = 1, TypeSystem`NestedGrid`PackagePrivate`$grid$$ = DynamicModule[{ TypeSystem`NestedGrid`PackagePrivate`renderedGrid = Deploy[ Style[ Grid[{{ Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["EpisodeNumber", Style[ "EpisodeNumber", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]][{ All, "EpisodeNumber"}, 1]]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{ All, "EpisodeNumber"}, "ColumnHeader", True], "Mouse"], ImageSize -> {{1, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["Date", Style[ "Date", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]][{ All, "Date"}, 1]]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{ All, "Date"}, "ColumnHeader", True], "Mouse"], ImageSize -> {{1, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["SweaterColor", Style[ "SweaterColor", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]][{ All, "SweaterColor"}, 1]]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{ All, "SweaterColor"}, "ColumnHeader", True], "Mouse"], ImageSize -> {{1, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation["1461", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{1, Key["EpisodeNumber"]}, "Item", False], "Mouse"], ImageSize -> {{44.800000000000004`, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes["\"Mon 27 Aug 1979\""], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{1, Key["Date"]}, "Item", False], "Mouse"], ImageSize -> {{75, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes[ StyleBox[ TemplateBox[<|"color" -> RGBColor[1., 1., 0.4]|>, "RGBColorSwatchTemplate"], FontFamily -> Dynamic[ CurrentValue[{"StyleHints", "CodeFont"}]], ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{1, Key["SweaterColor"]}, "Item", False], "Mouse"], ImageSize -> {{60, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}]}, { Item[ Pane[ Annotation["1462", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{2, Key["EpisodeNumber"]}, "Item", False], "Mouse"], ImageSize -> {{44.800000000000004`, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes["\"Tue 28 Aug 1979\""], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{2, Key["Date"]}, "Item", False], "Mouse"], ImageSize -> {{75, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes[ StyleBox[ TemplateBox[<|"color" -> RGBColor[0., 0.6, 1.]|>, "RGBColorSwatchTemplate"], FontFamily -> Dynamic[ CurrentValue[{"StyleHints", "CodeFont"}]], ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{2, Key["SweaterColor"]}, "Item", False], "Mouse"], ImageSize -> {{60, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}]}, { Item[ Pane[ Annotation["1463", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{3, Key["EpisodeNumber"]}, "Item", False], "Mouse"], ImageSize -> {{44.800000000000004`, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes["\"Wed 29 Aug 1979\""], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{3, Key["Date"]}, "Item", False], "Mouse"], ImageSize -> {{75, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes[ StyleBox[ TemplateBox[<|"color" -> RGBColor[1., 0., 0.]|>, "RGBColorSwatchTemplate"], FontFamily -> Dynamic[ CurrentValue[{"StyleHints", "CodeFont"}]], ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{3, Key["SweaterColor"]}, "Item", False], "Mouse"], ImageSize -> {{60, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}]}, { Item[ Pane[ Annotation["1464", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{4, Key["EpisodeNumber"]}, "Item", False], "Mouse"], ImageSize -> {{44.800000000000004`, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes["\"Thu 30 Aug 1979\""], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{4, Key["Date"]}, "Item", False], "Mouse"], ImageSize -> {{75, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes[ StyleBox[ TemplateBox[<|"color" -> RGBColor[0.4, 0.4, 0.4]|>, "RGBColorSwatchTemplate"], FontFamily -> Dynamic[ CurrentValue[{"StyleHints", "CodeFont"}]], ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{4, Key["SweaterColor"]}, "Item", False], "Mouse"], ImageSize -> {{60, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}]}, { Item[ Pane[ Annotation["1465", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{5, Key["EpisodeNumber"]}, "Item", False], "Mouse"], ImageSize -> {{44.800000000000004`, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes["\"Fri 31 Aug 1979\""], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{5, Key["Date"]}, "Item", False], "Mouse"], ImageSize -> {{75, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}], Item[ Pane[ Annotation[ RawBoxes[ StyleBox[ TemplateBox[<|"color" -> RGBColor[1., 1., 0.4]|>, "RGBColorSwatchTemplate"], FontFamily -> Dynamic[ CurrentValue[{"StyleHints", "CodeFont"}]], ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][{5, Key["SweaterColor"]}, "Item", False], "Mouse"], ImageSize -> {{60, Full}, Automatic}, ImageMargins -> {{5, 3}, {4, 5}}], ItemSize -> {Full, Automatic}]}, { Item[ Deploy[ Pane[ Row[{ Spacer[2], Style[ Row[{ Button[ MouseAppearance[ Mouseover[ Graphics[{{ EdgeForm[None], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], Line[{{0, 0}, {4, 5}, {8, 0}}], Line[{{0, 5}, {8, 5}}]}, {5, 6.5}], 0, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35], BaseStyle -> RGBColor[ 0.5372549019607843, 0.5372549019607843, 0.5372549019607843]], Graphics[{{ EdgeForm[ RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549]], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549], Line[{{0, 0}, {4, 5}, {8, 0}}], Line[{{0, 5}, {8, 5}}]}, {5, 6.5}], 0, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35]]], "LinkHand"], If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`$vPos$$ = Clip[TypeSystem`NestedGrid`PackagePrivate`$vPos$$ + (-5) If[True, 302, 1], {1, 302 - -5 + 1}]; TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]], True][ TypeSystem`NestedGrid`PackagePrivate`$path$$]], Appearance -> None], Button[ MouseAppearance[ Mouseover[ Graphics[{{ EdgeForm[None], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], Line[{{0, 0}, {4, 5}, {8, 0}}]}, {5, 6.5}], 0, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35], BaseStyle -> RGBColor[ 0.5372549019607843, 0.5372549019607843, 0.5372549019607843]], Graphics[{{ EdgeForm[ RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549]], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549], Line[{{0, 0}, {4, 5}, {8, 0}}]}, {5, 6.5}], 0, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35]]], "LinkHand"], If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`$vPos$$ = Clip[TypeSystem`NestedGrid`PackagePrivate`$vPos$$ + (-5) If[False, 302, 1], {1, 302 - -5 + 1}]; TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]], True][ TypeSystem`NestedGrid`PackagePrivate`$path$$]], Appearance -> None], " ", Style[ Mouseover[ Style[ Row[{"rows ", 1, "\[Dash]", 5, " of ", Style[302, FontWeight -> Bold]}], FontSize -> 9.333333333333332, FontColor -> RGBColor[ 0.5098039215686274, 0.5098039215686274, 0.5098039215686274]], Style[ Row[{"rows ", 1, "\[Dash]", 5, " of ", Style[302, FontWeight -> Bold]}], FontSize -> 9.333333333333332, FontColor -> RGBColor[ 0.5098039215686274, 0.5098039215686274, 0.5098039215686274]]], ContextMenu -> { MenuItem["Hide", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`adjustLimits[{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]}, "Rows", 1, {}]], MenuEvaluator -> Automatic], MenuItem["Show up to 10 Rows", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`adjustLimits[{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]}, "Rows", 10, {}]], MenuEvaluator -> Automatic], MenuItem["Show up to 30 Rows", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`adjustLimits[{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]}, "Rows", 30, {}]], MenuEvaluator -> Automatic], MenuItem["Show up to 100 Rows", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`adjustLimits[{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]}, "Rows", 100, {}]], MenuEvaluator -> Automatic], MenuItem["Show All", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`adjustLimits[{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]}, "Rows", 100000000, {}]], MenuEvaluator -> Automatic]}], " ", Button[ MouseAppearance[ Mouseover[ Graphics[{{ EdgeForm[None], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], Line[{{0, 0}, {4, 5}, {8, 0}}]}, {5, 6.5}], 180 Degree, { 9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35], BaseStyle -> RGBColor[ 0.5372549019607843, 0.5372549019607843, 0.5372549019607843]], Graphics[{{ EdgeForm[ RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549]], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549], Line[{{0, 0}, {4, 5}, {8, 0}}]}, {5, 6.5}], 180 Degree, { 9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35]]], "LinkHand"], If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`$vPos$$ = Clip[TypeSystem`NestedGrid`PackagePrivate`$vPos$$ + 5 If[False, 302, 1], {1, 302 - 5 + 1}]; TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]], True][ TypeSystem`NestedGrid`PackagePrivate`$path$$]], Appearance -> None], Button[ MouseAppearance[ Mouseover[ Graphics[{{ EdgeForm[None], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], Line[{{0, 0}, {4, 5}, {8, 0}}], Line[{{0, 5}, {8, 5}}]}, {5, 6.5}], 180 Degree, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35], BaseStyle -> RGBColor[ 0.5372549019607843, 0.5372549019607843, 0.5372549019607843]], Graphics[{{ EdgeForm[ RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549]], FaceForm[None], Rectangle[{0, 0}, {18, 18}, RoundingRadius -> 2]}, Rotate[ Translate[{ CapForm[Round], RGBColor[ 0.27450980392156865`, 0.5411764705882353, 0.796078431372549], Line[{{0, 0}, {4, 5}, {8, 0}}], Line[{{0, 5}, {8, 5}}]}, {5, 6.5}], 180 Degree, {9, 9}]}, ImageSize -> (1 -> 1), ImagePadding -> {{0, 1}, {1, 0}}, BaselinePosition -> Scaled[0.35]]], "LinkHand"], If[ TypeSystem`NestedGrid`PackagePrivate`checkInteractivity[ TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`$vPos$$ = Clip[TypeSystem`NestedGrid`PackagePrivate`$vPos$$ + 5 If[True, 302, 1], {1, 302 - 5 + 1}]; TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]], True][ TypeSystem`NestedGrid`PackagePrivate`$path$$]], Appearance -> None]}], ContextMenu -> {}]}], ImageMargins -> {{0, -1}, {-1, 1}}]], Background -> RGBColor[ 0.9764705882352941, 0.9764705882352941, 0.9764705882352941], Alignment -> {Left, Top}], SpanFromLeft, SpanFromLeft}}, BaseStyle -> { ContextMenu -> Dynamic[TypeSystem`NestedGrid`PackagePrivate`$contextMenuTrigger; Which[TypeSystem`NestedGrid`PackagePrivate`$lastOutputID =!= TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$], {}, TypeSystem`NestedGrid`PackagePrivate`$contextMenuTrigger === TypeSystem`NestedGrid`PackagePrivate`$lastContextMenuTrigger, TypeSystem`NestedGrid`PackagePrivate`$lastContextMenu, True, TypeSystem`NestedGrid`PackagePrivate`$lastContextMenuTrigger = TypeSystem`NestedGrid`PackagePrivate`$contextMenuTrigger; TypeSystem`NestedGrid`PackagePrivate`$lastContextMenu = Block[{TypeSystem`NestedGrid`PackagePrivate`$globalScrollPos = \ {TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$}}, With[{TypeSystem`NestedGrid`PackagePrivate`lastPath$ = TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`lastPathType$ = TypeSystem`NestedGrid`PackagePrivate`$lastPathType, TypeSystem`NestedGrid`PackagePrivate`isLeafHeader$ = TypeSystem`NestedGrid`PackagePrivate`$\ lastPathIsLeafHeader, TypeSystem`NestedGrid`PackagePrivate`headerHidden$ = And[ MatchQ[TypeSystem`NestedGrid`PackagePrivate`$lastPathType, Alternatives["RowHeader", "ColumnHeader"]], TypeSystem`NestedGrid`PackagePrivate`headerHiddenQ[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`$state$$]], TypeSystem`NestedGrid`PackagePrivate`allHidden$ = TypeSystem`NestedGrid`PackagePrivate`allHiddenQ[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`anyHidden$ = TypeSystem`NestedGrid`PackagePrivate`anyHiddenQ[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`sortDirection$ = TypeSystem`NestedGrid`PackagePrivate`columnSortDirection[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`$state$$[ "SortPaths"], TypeSystem`NestedGrid`PackagePrivate`$state$$[ "SortDirections"]], TypeSystem`NestedGrid`PackagePrivate`haveData$ = Not[ FailureQ[ TypeSystem`NestedGrid`PackagePrivate`datasetInitialData[ TypeSystem`NestedGrid`PackagePrivate`$state$$]]], TypeSystem`NestedGrid`PackagePrivate`isKeyDummy$ = Not[ FreeQ[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, Keys]]}, Join[{ If[ Or[ Not[TypeSystem`NestedGrid`PackagePrivate`haveData$], Not[TypeSystem`NestedGrid`PackagePrivate`anyHidden$], TypeSystem`NestedGrid`PackagePrivate`isKeyDummy$], Nothing, MenuItem[ "Show " <> Which[TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "Item", "", TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "RowHeader", "Row", TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "ColumnHeader", "Column", True, ""], KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`updateHiddenItems[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]][ TypeSystem`NestedGrid`PackagePrivate`lastPath$, "remove"]], MenuEvaluator -> Automatic]], If[ Or[ Not[TypeSystem`NestedGrid`PackagePrivate`haveData$], TypeSystem`NestedGrid`PackagePrivate`pathEmptyQ[ TypeSystem`NestedGrid`PackagePrivate`$lastPath, TypeSystem`NestedGrid`PackagePrivate`$state$$], TypeSystem`NestedGrid`PackagePrivate`isKeyDummy$, And[ TypeSystem`NestedGrid`PackagePrivate`allHidden$, TypeSystem`NestedGrid`PackagePrivate`headerHidden$]], Nothing, MenuItem[ "Hide " <> Which[TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "Item", "", TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "RowHeader", "Row", TypeSystem`NestedGrid`PackagePrivate`lastPathType$ == "ColumnHeader", "Column", True, ""], KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`updateHiddenItems[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]][ TypeSystem`NestedGrid`PackagePrivate`lastPath$, "add"]], MenuEvaluator -> Automatic]], Delimiter}, If[ And[TypeSystem`NestedGrid`PackagePrivate`haveData$, MatchQ[TypeSystem`NestedGrid`PackagePrivate`lastPathType$, Alternatives["ColumnHeader", "KeyDummy"]], TypeSystem`NestedGrid`PackagePrivate`isLeafHeader$, Not[TypeSystem`NestedGrid`PackagePrivate`allHidden$]], { If[ TypeSystem`NestedGrid`PackagePrivate`sortDirection$ =!= "Ascending", MenuItem["Sort", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`updateSort[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][ TypeSystem`NestedGrid`PackagePrivate`lastPath$, "Ascending"]], MenuEvaluator -> Automatic], Nothing], If[ TypeSystem`NestedGrid`PackagePrivate`sortDirection$ =!= "Descending", MenuItem["Reverse Sort", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`updateSort[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][ TypeSystem`NestedGrid`PackagePrivate`lastPath$, "Descending"]], MenuEvaluator -> Automatic], Nothing], If[ TypeSystem`NestedGrid`PackagePrivate`sortDirection$ =!= None, MenuItem["Unsort", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`updateSort[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][ TypeSystem`NestedGrid`PackagePrivate`lastPath$, None]], MenuEvaluator -> Automatic], Nothing], Delimiter}, {}], { MenuItem["Copy Position to Clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], If[TypeSystem`NestedGrid`PackagePrivate`haveData$, MenuItem["Copy Data to Clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], Nothing], Delimiter, MenuItem["Paste Position in New Cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic], If[TypeSystem`NestedGrid`PackagePrivate`haveData$, MenuItem["Paste Data in New Cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic], Nothing]}]]]]], FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> Plain}, Dividers -> All, FrameStyle -> GrayLevel[0.7490196078431373], Spacings -> {0, 0}, Alignment -> Left, BaseStyle -> { FontFamily -> "Source Sans Pro", FontSize -> 14, FontWeight -> Plain}], LineBreakWithin -> False, ContextMenu -> {}, NumberMarks -> False, ShowAutoStyles -> False]], TypeSystem`NestedGrid`PackagePrivate`initialQ = True}, Dynamic[ TypeSystem`NestedGrid`PackagePrivate`setupViewPath[ TypeSystem`NestedGrid`PackagePrivate`$path$$, If[ Not[TypeSystem`NestedGrid`PackagePrivate`initialQ], Module[{ TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = $Failed, TypeSystem`NestedGrid`PackagePrivate`tmpData$ = TypeSystem`NestedGrid`PackagePrivate`datasetData[ TypeSystem`NestedGrid`PackagePrivate`$state$$]}, TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = If[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`tmpData$], TypeSystem`NestedGrid`PackagePrivate`renderedGrid, TypeSystem`NestedGrid`PackagePrivate`renderGrid[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][ TypeSystem`NestedGrid`PackagePrivate`tmpData$]]; If[ Not[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]], TypeSystem`NestedGrid`PackagePrivate`renderedGrid = TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]; Null]]; TypeSystem`NestedGrid`PackagePrivate`initialQ = False; TypeSystem`NestedGrid`PackagePrivate`$vPos$$; TypeSystem`NestedGrid`PackagePrivate`$hPos$$; If[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`renderedGrid], TypeSystem`SparseGrid[ TypeSystem`H["(data no longer present)"]], TypeSystem`NestedGrid`PackagePrivate`renderedGrid]], TrackedSymbols :> { TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$}], DynamicModuleValues :> {}], TypeSystem`NestedGrid`PackagePrivate`$topBar$$ = Dynamic[ TypeSystem`NestedGrid`PackagePrivate`makeFramedBar[ TypeSystem`PackageScope`SubViewPathbar[ TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$vPos$$, TypeSystem`NestedGrid`PackagePrivate`$hPos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$path$$}], TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$ = Style[ Framed[ Dynamic[ Replace[ TypeSystem`NestedGrid`PackagePrivate`mouseAnnotation$$, { TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][Null, Blank[]] -> "", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]][ Pattern[TypeSystem`NestedGrid`PackagePrivate`path$, Blank[]], Pattern[TypeSystem`NestedGrid`PackagePrivate`pathType$, Blank[]], Pattern[TypeSystem`NestedGrid`PackagePrivate`isLeafHeader$, Blank[]]] :> ( Increment[TypeSystem`NestedGrid`PackagePrivate`$contextMenuTrigger]; TypeSystem`NestedGrid`PackagePrivate`$lastPath = TypeSystem`NestedGrid`PackagePrivate`path$; TypeSystem`NestedGrid`PackagePrivate`$lastPathType = TypeSystem`NestedGrid`PackagePrivate`pathType$; TypeSystem`NestedGrid`PackagePrivate`$lastPathIsLeafHeader = TypeSystem`NestedGrid`PackagePrivate`isLeafHeader$; TypeSystem`NestedGrid`PackagePrivate`$lastOutputID = TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]; TypeSystem`NestedGrid`PackagePrivate`makePathTrail[ TypeSystem`NestedGrid`PackagePrivate`path$, TypeSystem`NestedGrid`PackagePrivate`makePathElements]), Null :> Spacer[10], Blank[] :> Spacer[10]}], TrackedSymbols :> { TypeSystem`NestedGrid`PackagePrivate`mouseAnnotation$$}], FrameStyle -> None, ImageMargins -> 0, FrameMargins -> 0, Alignment -> Top, ImageSize -> {Automatic, 15}], FontSize -> 1], TypeSystem`NestedGrid`PackagePrivate`mouseAnnotation$$ = Null}, DynamicWrapperBox[ DynamicBox[ToBoxes[ Dataset`DatasetContent[ 2, "Path" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$path$$], "Grid" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$grid$$], "State" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$state$$], "VPos" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$vPos$$], "HPos" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$hPos$$], "TopBar" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$topBar$$], "BottomBar" -> Hold[TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$], "OutputID" -> Hold[ TypeSystem`NestedGrid`PackagePrivate`localHold[ TypeSystem`NestedGrid`PackagePrivate`$outputID$$]]], StandardForm], ImageSizeCache->{318., {97.134033203125, 102.865966796875}}, TrackedSymbols:>{ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$}], TypeSystem`NestedGrid`PackagePrivate`mouseAnnotation$$ = MouseAnnotation[], ImageSizeCache->{318., {97.134033203125, 102.865966796875}}], BaseStyle->{LineBreakWithin -> False}, DynamicModuleValues:>{}, Initialization:>(TypeSystem`NestedGrid`PackagePrivate`$outputID$$ = CreateUUID[]), UnsavedVariables:>{TypeSystem`NestedGrid`PackagePrivate`$outputID$$}], Deploy, DefaultBaseStyle->"Deploy"], Dataset`InterpretDataset[1], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellContext->"Notebook$$92$132252`", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704129429295499*^9, 3.704132260262418*^9, 3.886250619547823*^9}, CellLabel->"Out[1]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization:", "Subsection", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.704130042860403*^9, 3.7041300449629087`*^9}}], Cell["See sweater colors by year:", "Text", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.704130048882622*^9, 3.704130058250626*^9}, {3.7041322977501917`*^9, 3.704132308597039*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Grid", "[", RowBox[{ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"data", "=", RowBox[{ RowBox[{ RowBox[{"Row", "[", RowBox[{"Sort", "[", "#", "]"}], "]"}], "&"}], "/@", RowBox[{"Normal", "[", RowBox[{ RowBox[{"GroupBy", "[", RowBox[{ RowBox[{ "ResourceData", "[", "\"\\"", "]"}], ",", RowBox[{ RowBox[{"#Date", "[", "\"\\"", "]"}], "&"}]}], "]"}], "[", RowBox[{"[", RowBox[{"All", ",", "All", ",", "\"\\""}], "]"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"Keys", "[", "data", "]"}], ",", RowBox[{"Values", "[", "data", "]"}]}], "}"}], "]"}]}], "]"}], ",", RowBox[{"Alignment", "\[Rule]", RowBox[{"{", RowBox[{"Left", ",", "Center"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.704130061672264*^9, 3.704130089435141*^9}, {3.704132317168799*^9, 3.704132324014801*^9}}], Cell[BoxData[ TagBox[GridBox[{ {"1979", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1980", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1981", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1982", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.2, 1., 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.13333333333333336`, 0.6666666666666667, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.2, 1., 0.6]"], 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.2, 1., 0.6]; 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.2, 1., 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1983", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1984", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1985", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.6, 0.6, 0.6], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.4, 0.4, 0.4], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.6, 0.6, 0.6]"], 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.6, 0.6, 0.6]; 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.6, 0.6, 0.6], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1986", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1987", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.4]"], 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.4, 0.4, 0.4]; 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.4, 0.4, 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1988", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 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., 0.4, 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., 0.4, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1989", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.2, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.2666666666666667, 0.13333333333333336`, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.2, 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.4, 0.2, 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.4, 0.2, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 1., 0.4], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.6666666666666667, 0.6666666666666667, 0.2666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 1., 0.4]"], 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[1., 1., 0.4]; 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[1., 1., 0.4], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1990", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1991", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0., 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., 0., 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., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0., 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., 0., 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., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.2, 0.2, 0.2], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.13333333333333336`, 0.13333333333333336`, 0.13333333333333336`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.2, 0.2, 0.2]"], 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.2, 0.2, 0.2]; 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.2, 0.2, 0.2], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[ 0.5019607843137255, 0.5019607843137255, 0.25098039215686274`], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.334640522875817, 0.334640522875817, 0.1673202614379085], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.5019607843137255, 0.5019607843137255, \ 0.25098039215686274]"], 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.5019607843137255, 0.5019607843137255, 0.25098039215686274`]; 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.5019607843137255, 0.5019607843137255, 0.25098039215686274`], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1992", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 1.]"], 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.6, 1.]; 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.6, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1993", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1994", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1995", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1996", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1997", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 1.]"], 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.4, 1.]; 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.4, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1998", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 1.]"], 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.4, 1.]; 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.4, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 1.]"], 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.4, 1.]; 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.4, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 1.]"], 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.4, 1.]; 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.4, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"1999", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.4, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.2666666666666667, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.4, 1.]"], 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.4, 1.]; 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.4, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.8, 0.4, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.5333333333333334, 0.2666666666666667, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.8, 0.4, 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.8, 0.4, 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.8, 0.4, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.8, 0.4, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.5333333333333334, 0.2666666666666667, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.8, 0.4, 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.8, 0.4, 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.8, 0.4, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"2000", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]}, {"2001", TemplateBox[{ InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.2, 1.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.13333333333333336`, 0.6666666666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.2, 1.]"], 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.2, 1.]; 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.2, 1.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0., 0.6, 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0., 0.4, 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0., 0.6, 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., 0.6, 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., 0.6, 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[0.4, 0.4, 0.8], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[ 0.2666666666666667, 0.2666666666666667, 0.5333333333333334], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[0.4, 0.4, 0.8]"], 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.4, 0.4, 0.8]; 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.4, 0.4, 0.8], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False], InterpretationBox[ ButtonBox[ TooltipBox[ GraphicsBox[{{ GrayLevel[0], RectangleBox[{0, 0}]}, { GrayLevel[0], RectangleBox[{1, -1}]}, { RGBColor[1., 0., 0.], RectangleBox[{0, -1}, {2, 1}]}}, AspectRatio -> 1, Frame -> True, FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ Automatic, (1.35 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], "RGBColor[1., 0., 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[1., 0., 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[1., 0., 0.], Editable -> False, Selectable -> False]}, "RowDefault"]} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Center}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]], "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704130091878106*^9, 3.70413226556231*^9, 3.704132327301456*^9}] }, Open ]], Cell["Visualize which days had the most blue sweaters:", "Text", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.704130864146784*^9, 3.704130870368988*^9}, {3.704130933297076*^9, 3.704130938222344*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DateHistogram", "[", RowBox[{ RowBox[{ RowBox[{"Select", "[", RowBox[{ RowBox[{ "ResourceData", "[", "\"\\"", "]"}], ",", " ", RowBox[{ RowBox[{ RowBox[{"ColorDistance", "[", RowBox[{"#SweaterColor", ",", " ", "Blue"}], "]"}], "<", " ", ".5"}], "&"}]}], "]"}], "[", RowBox[{"All", ",", " ", "\"\\""}], "]"}], ",", " ", "\"\\"", ",", " ", RowBox[{"DateReduction", "\[Rule]", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.70413094388908*^9, 3.704130944574909*^9}}], Cell[BoxData[ GraphicsBox[{{ {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.651], Thickness[Small]}], {}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.651], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 0}, {86400., 8.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{15.475380304243393`, 64.01381104883906}, {-83.55562043343575, 95.90538244717159}}], StatusArea[#, 8]& , TagBoxNote->"8"], StyleBox["8", {}, StripOnInput -> False]], Annotation[#, Style[8, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{86400., 0}, {172800., 3.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{63.51381104883907, 112.05224179343473`}, { 28.295006366943838`, 95.90538244717159}}], StatusArea[#, 3]& , TagBoxNote->"3"], StyleBox["3", {}, StripOnInput -> False]], Annotation[#, Style[3, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{172800., 0}, {259200., 9.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{111.55224179343473`, 160.09067253803042`}, {-105.92574579351167`, 95.90538244717159}}], StatusArea[#, 9]& , TagBoxNote->"9"], StyleBox["9", {}, StripOnInput -> False]], Annotation[#, Style[9, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{259200., 0}, {345600., 7.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{159.59067253803042`, 208.1291032826261}, {-61.18549507335983, 95.90538244717159}}], StatusArea[#, 7]& , TagBoxNote->"7"], StyleBox["7", {}, StripOnInput -> False]], Annotation[#, Style[7, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{345600., 0}, {432000., 6.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{207.6291032826261, 256.1675340272218}, {-38.815369713283914`, 95.90538244717159}}], StatusArea[#, 6]& , TagBoxNote->"6"], StyleBox["6", {}, StripOnInput -> False]], Annotation[#, Style[6, {}], "Tooltip"]& ]}, {}, {}}, {{}, {}, {}, {}, {}}}, {{}, StyleBox[{{{}, LineBox[{{0, 0}, {691200, 0}}], StyleBox[{}, "GraphicsLabel", StripOnInput->False]}, StyleBox[{{ LineBox[{{0, 0}, Offset[{-1.4695761589768238`*^-15, -8.}, {0, 0}]}], LineBox[{{691200, 0}, Offset[{-1.4695761589768238`*^-15, -8.}, {691200, 0}]}], {{}, {}, {}, {}, {}, {}, {}, {}, { LineBox[{{86400, 0}, Offset[{-7.347880794884119*^-16, -4.}, {86400, 0}]}], LineBox[{{86400, 0}, Offset[{-7.347880794884119*^-16, -4.}, {86400, 0}]}], LineBox[{{172800, 0}, Offset[{-7.347880794884119*^-16, -4.}, {172800, 0}]}], LineBox[{{172800, 0}, Offset[{-7.347880794884119*^-16, -4.}, {172800, 0}]}], LineBox[{{259200, 0}, Offset[{-7.347880794884119*^-16, -4.}, {259200, 0}]}], LineBox[{{259200, 0}, Offset[{-7.347880794884119*^-16, -4.}, {259200, 0}]}], LineBox[{{345600, 0}, Offset[{-7.347880794884119*^-16, -4.}, {345600, 0}]}], LineBox[{{345600, 0}, Offset[{-7.347880794884119*^-16, -4.}, {345600, 0}]}], LineBox[{{432000, 0}, Offset[{-7.347880794884119*^-16, -4.}, {432000, 0}]}], LineBox[{{432000, 0}, Offset[{-7.347880794884119*^-16, -4.}, {432000, 0}]}], LineBox[{{518400, 0}, Offset[{-7.347880794884119*^-16, -4.}, {518400, 0}]}], LineBox[{{518400, 0}, Offset[{-7.347880794884119*^-16, -4.}, {518400, 0}]}], LineBox[{{604800, 0}, Offset[{-7.347880794884119*^-16, -4.}, {604800, 0}]}], LineBox[{{604800, 0}, Offset[{-7.347880794884119*^-16, -4.}, {604800, 0}]}]}}}, StyleBox[{{}, {}, { InsetBox["\<\"Mon\"\>", Offset[{0, -2}, {43200, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Tue\"\>", Offset[{0, -2}, {129600, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Wed\"\>", Offset[{0, -2}, {216000, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Thu\"\>", Offset[{0, -2}, {302400, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Fri\"\>", Offset[{0, -2}, {388800, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Sat\"\>", Offset[{0, -2}, {475200, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Sun\"\>", Offset[{0, -2}, {561600, 0}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"Mon\"\>", Offset[{0, -2}, {648000, 0}], {0, 1}, Automatic, {1, 0}]}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, "GraphicsAxes", StripOnInput->False, Antialiasing->False]}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, True}, AxesLabel->{None, None}, AxesOrigin->{-12096., 0}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{0, 604800}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704130945825791*^9, 3.7041322681019497`*^9}] }, Open ]], Cell["\<\ See which colors were most common each day of the week and in each month:\ \>", "Text", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.7041323640118923`*^9, 3.704132372634392*^9}, {3.704132450593523*^9, 3.70413245278367*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"PieChart", "[", RowBox[{"#", ",", RowBox[{"ChartStyle", "\[Rule]", RowBox[{"Normal", "[", RowBox[{"Keys", "[", "#", "]"}], "]"}]}]}], "]"}], "&"}], "/@", RowBox[{"(", RowBox[{"Counts", "/@", RowBox[{ RowBox[{"GroupBy", "[", RowBox[{ RowBox[{ "ResourceData", "[", "\"\\"", "]"}], ",", RowBox[{ RowBox[{"#Date", "[", "\"\\"", "]"}], "&"}]}], "]"}], "[", RowBox[{"All", ",", "All", ",", "\"\\""}], "]"}]}], ")"}]}]], "Input", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704132440642735*^9}], Cell[BoxData[ TemplateBox[{ TagBox[ DynamicModuleBox[{ TypeSystem`NestedGrid`PackagePrivate`$state$$ = Data`UnorderedAssociation[ "DisplayedRowCount" -> 20, "RowCount" -> 7, "Length" -> 7, "InitialType" -> TypeSystem`Assoc[TypeSystem`AnyType, TypeSystem`Atom[Graphics], 7], "DisplayedColumnCount" -> 20, "DataRowCount" -> 0, "Shape" -> TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`ColumnShape[ TypeSystem`PackageScope`KeyValueShape[ TypeSystem`PackageScope`UnknownShape, TypeSystem`PackageScope`AtomShape[60]]], 7, {}], "DataColumnCount" -> 0, "InitialData" -> TypeSystem`PackageScope`CacheHandle[1223766062], "Type" -> TypeSystem`Assoc[TypeSystem`AnyType, TypeSystem`Atom[Graphics], 7], "HandleQ" -> True, "Meta" -> {}, "RowTarget" -> 20, "Data" -> TypeSystem`PackageScope`CacheHandle[1223766062]], TypeSystem`NestedGrid`PackagePrivate`$path$$ = {}, TypeSystem`NestedGrid`PackagePrivate`$pos$$ = 1, TypeSystem`NestedGrid`PackagePrivate`$grid$$ = DynamicModule[{ TypeSystem`NestedGrid`PackagePrivate`renderedGrid = Deploy[ Style[ Grid[{{ Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Monday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Monday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$307788$308327 = False, DynamicChart`click$307792$308327 = False, DynamicChart`click$307796$308327 = False, DynamicChart`click$307800$308327 = False, DynamicChart`click$307804$308327 = False, DynamicChart`click$307808$308327 = False, DynamicChart`click$307812$308327 = False, DynamicChart`click$307816$308327 = False, DynamicChart`click$307820$308327 = False, DynamicChart`click$307824$308327 = False, DynamicChart`click$307828$308327 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.822108654919645, 3.141592653589793}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307788$308327, FEPrivate`Not[DynamicChart`click$307788$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[DynamicChart`click$307788$308327, {{{1., 0}, { 0, 1.}}, {-0.1974536709442689, 0.031812699203814424`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307788$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.3961299900261133`, 2.822108654919645}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307792$308327, FEPrivate`Not[DynamicChart`click$307792$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307792$308327, {{{1., 0}, { 0, 1.}}, {-0.17231081627876124`, 0.10153316006776798`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307792$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.4792259980052229, 2.3961299900261133`}]}], StatusArea[#, 18]& , TagBoxNote -> "18"], StyleBox["18", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[18, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307796$308327, FEPrivate`Not[DynamicChart`click$307796$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307796$308327, {{{1., 0}, {0, 1.}}, { 0.026545105456744395`, 0.19823056620080146`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307796$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.26623666555845693`, 0.4792259980052229}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307800$308327, FEPrivate`Not[DynamicChart`click$307800$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307800$308327, {{{1., 0}, {0, 1.}}, { 0.1862672354904677, 0.07283211505056446}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307800$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.053247333111691386`, 0.26623666555845693`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307804$308327, FEPrivate`Not[DynamicChart`click$307804$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307804$308327, {{{1., 0}, {0, 1.}}, { 0.19886696004202742`, 0.021258697129473075`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307804$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.3727313317818397, -0.053247333111691386`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307808$308327, FEPrivate`Not[DynamicChart`click$307808$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307808$308327, {{{1., 0}, {0, 1.}}, { 0.19548067796357335`, -0.04227652472592485}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307808$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.2246886615689023`, -0.3727313317818397}]}], StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307812$308327, FEPrivate`Not[DynamicChart`click$307812$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307812$308327, {{{1., 0}, {0, 1.}}, { 0.13952630422699697`, -0.143291348059663}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307812$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.0766459913559654`, -1.2246886615689023`}]}], StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307816$308327, FEPrivate`Not[DynamicChart`click$307816$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307816$308327, {{{1., 0}, { 0, 1.}}, {-0.01595722111061664, -0.19936240140615002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307816$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.2, 0.2, 0.2]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.1831406575793473`, -2.0766459913559654`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307820$308327, FEPrivate`Not[DynamicChart`click$307820$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307820$308327, {{{1., 0}, { 0, 1.}}, {-0.10608418162394849`, -0.1695468855779342}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307820$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.9286033211430276`, -2.1831406575793473`}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307824$308327, FEPrivate`Not[DynamicChart`click$307824$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307824$308327, {{{1., 0}, { 0, 1.}}, {-0.16666278381650299`, -0.11056001307223873`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307824$308327}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.9286033211430276`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307828$308327, FEPrivate`Not[DynamicChart`click$307828$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307828$308327, {{{1., 0}, { 0, 1.}}, {-0.19886696004202742`, \ -0.021258697129473095`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307828$308327}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307788$308327, FEPrivate`Not[DynamicChart`click$307788$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307788$308327, {{{1., 0}, { 0, 1.}}, {-0.1974536709442689, 0.031812699203814424`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307788$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307792$308327, FEPrivate`Not[DynamicChart`click$307792$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307792$308327, {{{1., 0}, { 0, 1.}}, {-0.17231081627876124`, 0.10153316006776798`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307792$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 18]& , TagBoxNote -> "18"], StyleBox["18", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[18, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307796$308327, FEPrivate`Not[DynamicChart`click$307796$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307796$308327, {{{1., 0}, {0, 1.}}, { 0.026545105456744395`, 0.19823056620080146`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307796$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307800$308327, FEPrivate`Not[DynamicChart`click$307800$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307800$308327, {{{1., 0}, {0, 1.}}, { 0.1862672354904677, 0.07283211505056446}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307800$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307804$308327, FEPrivate`Not[DynamicChart`click$307804$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307804$308327, {{{1., 0}, {0, 1.}}, { 0.19886696004202742`, 0.021258697129473075`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307804$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307808$308327, FEPrivate`Not[DynamicChart`click$307808$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307808$308327, {{{1., 0}, {0, 1.}}, { 0.19548067796357335`, -0.04227652472592485}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307808$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307812$308327, FEPrivate`Not[DynamicChart`click$307812$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307812$308327, {{{1., 0}, {0, 1.}}, { 0.13952630422699697`, -0.143291348059663}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307812$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307816$308327, FEPrivate`Not[DynamicChart`click$307816$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307816$308327, {{{1., 0}, { 0, 1.}}, {-0.01595722111061664, -0.19936240140615002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307816$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307820$308327, FEPrivate`Not[DynamicChart`click$307820$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307820$308327, {{{1., 0}, { 0, 1.}}, {-0.10608418162394849`, -0.1695468855779342}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307820$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307824$308327, FEPrivate`Not[DynamicChart`click$307824$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307824$308327, {{{1., 0}, { 0, 1.}}, {-0.16666278381650299`, -0.11056001307223873`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307824$308327}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307828$308327, FEPrivate`Not[DynamicChart`click$307828$308327]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307828$308327, {{{1., 0}, { 0, 1.}}, {-0.19886696004202742`, \ -0.021258697129473095`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307828$308327}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Monday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Tuesday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Tuesday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$307881$308328 = False, DynamicChart`click$307885$308328 = False, DynamicChart`click$307889$308328 = False, DynamicChart`click$307893$308328 = False, DynamicChart`click$307897$308328 = False, DynamicChart`click$307901$308328 = False, DynamicChart`click$307905$308328 = False, DynamicChart`click$307909$308328 = False, DynamicChart`click$307913$308328 = False, DynamicChart`click$307917$308328 = False, DynamicChart`click$307921$308328 = False, DynamicChart`click$307925$308328 = False, DynamicChart`click$307929$308328 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.383277185481912, 3.141592653589793}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307881$308328, FEPrivate`Not[DynamicChart`click$307881$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307881$308328, {{{1., 0}, { 0, 1.}}, {-0.18579534396335828`, 0.07402763106798288}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307881$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.7332924985322997`, 2.383277185481912}]}], StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307885$308328, FEPrivate`Not[DynamicChart`click$307885$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307885$308328, {{{1., 0}, { 0, 1.}}, {-0.09368168813995802, 0.1767024088892046}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307885$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.4083001550574934`, 1.7332924985322997`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307889$308328, FEPrivate`Not[DynamicChart`click$307889$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307889$308328, {{{1., 0}, {0, 1.}}, { 1.2246467991473533`*^-17, 0.2}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307889$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.10833078115826877`, 1.4083001550574934`}]}], StatusArea[#, 12]& , TagBoxNote -> "12"], StyleBox["12", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[12, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307893$308328, FEPrivate`Not[DynamicChart`click$307893$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307893$308328, {{{1., 0}, {0, 1.}}, { 0.14519909838462616`, 0.13753989177068468`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307893$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.2, 1., 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0., 0.10833078115826877`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307897$308328, FEPrivate`Not[DynamicChart`click$307897$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307897$308328, {{{1., 0}, {0, 1.}}, { 0.19970668277022477`, 0.01082778171708351}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307897$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.10833078115826877`, 0.}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307901$308328, FEPrivate`Not[DynamicChart`click$307901$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307901$308328, {{{1., 0}, {0, 1.}}, { 0.19970668277022477`, -0.01082778171708351}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307901$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.191638592740956, -0.10833078115826877`}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307905$308328, FEPrivate`Not[DynamicChart`click$307905$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307905$308328, {{{1., 0}, {0, 1.}}, { 0.15921861314112876`, -0.12103484303875306`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307905$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.2999693738992244`, -1.191638592740956}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307909$308328, FEPrivate`Not[DynamicChart`click$307909$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307909$308328, {{{1., 0}, {0, 1.}}, { 0.06386030602719604, -0.18953063423656047`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307909$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.4916079666401805`, -1.2999693738992244`}]}], StatusArea[#, 11]& , TagBoxNote -> "11"], StyleBox["11", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[11, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307913$308328, FEPrivate`Not[DynamicChart`click$307913$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307913$308328, {{{1., 0}, { 0, 1.}}, {-0.06386030602719593, -0.18953063423656052`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307913$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.599938747798449, -2.4916079666401805`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307917$308328, FEPrivate`Not[DynamicChart`click$307917$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307917$308328, {{{1., 0}, { 0, 1.}}, {-0.16553779963137805`, -0.11223741307247657`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307917$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.9249310912732556`, -2.599938747798449}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307921$308328, FEPrivate`Not[DynamicChart`click$307921$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307921$308328, {{{1., 0}, { 0, 1.}}, {-0.18579534396335828`, -0.07402763106798296}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307921$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.033261872431524, -2.9249310912732556`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307925$308328, FEPrivate`Not[DynamicChart`click$307925$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307925$308328, {{{1., 0}, { 0, 1.}}, {-0.19736530450830525`, -0.03235639931055303}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307925$308328}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.8, 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -3.033261872431524}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307929$308328, FEPrivate`Not[DynamicChart`click$307929$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307929$308328, {{{1., 0}, { 0, 1.}}, {-0.19970668277022477`, -0.01082778171708358}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307929$308328}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307881$308328, FEPrivate`Not[DynamicChart`click$307881$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307881$308328, {{{1., 0}, { 0, 1.}}, {-0.18579534396335828`, 0.07402763106798288}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307881$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307885$308328, FEPrivate`Not[DynamicChart`click$307885$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307885$308328, {{{1., 0}, { 0, 1.}}, {-0.09368168813995802, 0.1767024088892046}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307885$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307889$308328, FEPrivate`Not[DynamicChart`click$307889$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307889$308328, {{{1., 0}, {0, 1.}}, { 1.2246467991473533`*^-17, 0.2}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307889$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 12]& , TagBoxNote -> "12"], StyleBox["12", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[12, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307893$308328, FEPrivate`Not[DynamicChart`click$307893$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307893$308328, {{{1., 0}, {0, 1.}}, { 0.14519909838462616`, 0.13753989177068468`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307893$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307897$308328, FEPrivate`Not[DynamicChart`click$307897$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307897$308328, {{{1., 0}, {0, 1.}}, { 0.19970668277022477`, 0.01082778171708351}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307897$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307901$308328, FEPrivate`Not[DynamicChart`click$307901$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307901$308328, {{{1., 0}, {0, 1.}}, { 0.19970668277022477`, -0.01082778171708351}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307901$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307905$308328, FEPrivate`Not[DynamicChart`click$307905$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307905$308328, {{{1., 0}, {0, 1.}}, { 0.15921861314112876`, -0.12103484303875306`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307905$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307909$308328, FEPrivate`Not[DynamicChart`click$307909$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307909$308328, {{{1., 0}, {0, 1.}}, { 0.06386030602719604, -0.18953063423656047`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307909$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 11]& , TagBoxNote -> "11"], StyleBox["11", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[11, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307913$308328, FEPrivate`Not[DynamicChart`click$307913$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307913$308328, {{{1., 0}, { 0, 1.}}, {-0.06386030602719593, -0.18953063423656052`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307913$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307917$308328, FEPrivate`Not[DynamicChart`click$307917$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307917$308328, {{{1., 0}, { 0, 1.}}, {-0.16553779963137805`, -0.11223741307247657`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307917$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307921$308328, FEPrivate`Not[DynamicChart`click$307921$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307921$308328, {{{1., 0}, { 0, 1.}}, {-0.18579534396335828`, -0.07402763106798296}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307921$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307925$308328, FEPrivate`Not[DynamicChart`click$307925$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307925$308328, {{{1., 0}, { 0, 1.}}, {-0.19736530450830525`, -0.03235639931055303}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307925$308328}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307929$308328, FEPrivate`Not[DynamicChart`click$307929$308328]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307929$308328, {{{1., 0}, { 0, 1.}}, {-0.19970668277022477`, -0.01082778171708358}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307929$308328}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Tuesday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Wednesday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Wednesday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$307986$308352 = False, DynamicChart`click$307990$308352 = False, DynamicChart`click$307994$308352 = False, DynamicChart`click$307998$308352 = False, DynamicChart`click$308002$308352 = False, DynamicChart`click$308006$308352 = False, DynamicChart`click$308010$308352 = False, DynamicChart`click$308014$308352 = False, DynamicChart`click$308018$308352 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.9055561997183992`, 3.141592653589793}]}], StatusArea[#, 12]& , TagBoxNote -> "12"], StyleBox["12", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[12, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307986$308352, FEPrivate`Not[DynamicChart`click$307986$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307986$308352, {{{1., 0}, { 0, 1.}}, {-0.16300566750336226`, 0.11588421964091276`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307986$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.390541010605318, 1.9055561997183992`}]}], StatusArea[#, 5]& , TagBoxNote -> "5"], StyleBox["5", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[5, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307990$308352, FEPrivate`Not[DynamicChart`click$307990$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307990$308352, {{{1., 0}, { 0, 1.}}, {-0.015435092425329236`, 0.19940350528970535`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307990$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.0815318971374697`, 1.390541010605318}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307994$308352, FEPrivate`Not[DynamicChart`click$307994$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307994$308352, {{{1., 0}, {0, 1.}}, { 0.06570847638216702, 0.18889784575673224`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307994$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.2575075945565404, 1.0815318971374697`}]}], StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307998$308352, FEPrivate`Not[DynamicChart`click$307998$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307998$308352, {{{1., 0}, {0, 1.}}, { 0.15682396131534213`, 0.12412189636548454`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307998$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.05150151891130772, 0.2575075945565404}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308002$308352, FEPrivate`Not[DynamicChart`click$308002$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308002$308352, {{{1., 0}, {0, 1.}}, { 0.19761757921821543`, 0.030778115340812318`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308002$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.4935440484279345`, 0.05150151891130772}]}], StatusArea[#, 15]& , TagBoxNote -> "15"], StyleBox["15", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[15, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308006$308352, FEPrivate`Not[DynamicChart`click$308006$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308006$308352, {{{1., 0}, {0, 1.}}, { 0.15022638617410397`, -0.13203042413424637`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308006$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.8025531618957826`, -1.4935440484279345`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308010$308352, FEPrivate`Not[DynamicChart`click$308010$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308010$308352, {{{1., 0}, { 0, 1.}}, {-0.015435092425329236`, \ -0.19940350528970535`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308010$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.7295805022993287`, -1.8025531618957826`}]}], StatusArea[#, 9]& , TagBoxNote -> "9"], StyleBox["9", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[9, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308014$308352, FEPrivate`Not[DynamicChart`click$308014$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308014$308352, {{{1., 0}, { 0, 1.}}, {-0.12811863573963503`, -0.15357608920732002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308014$308352}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.7295805022993287`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308018$308352, FEPrivate`Not[DynamicChart`click$308018$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308018$308352, {{{1., 0}, { 0, 1.}}, {-0.19577113701907156`, \ -0.040910413225240166`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308018$308352}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 12]& , TagBoxNote -> "12"], StyleBox["12", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[12, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307986$308352, FEPrivate`Not[DynamicChart`click$307986$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307986$308352, {{{1., 0}, { 0, 1.}}, {-0.16300566750336226`, 0.11588421964091276`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307986$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 5]& , TagBoxNote -> "5"], StyleBox["5", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[5, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307990$308352, FEPrivate`Not[DynamicChart`click$307990$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307990$308352, {{{1., 0}, { 0, 1.}}, {-0.015435092425329236`, 0.19940350528970535`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$307990$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307994$308352, FEPrivate`Not[DynamicChart`click$307994$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307994$308352, {{{1., 0}, {0, 1.}}, { 0.06570847638216702, 0.18889784575673224`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307994$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$307998$308352, FEPrivate`Not[DynamicChart`click$307998$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$307998$308352, {{{1., 0}, {0, 1.}}, { 0.15682396131534213`, 0.12412189636548454`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$307998$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308002$308352, FEPrivate`Not[DynamicChart`click$308002$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308002$308352, {{{1., 0}, {0, 1.}}, { 0.19761757921821543`, 0.030778115340812318`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308002$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 15]& , TagBoxNote -> "15"], StyleBox["15", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[15, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308006$308352, FEPrivate`Not[DynamicChart`click$308006$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308006$308352, {{{1., 0}, {0, 1.}}, { 0.15022638617410397`, -0.13203042413424637`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308006$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308010$308352, FEPrivate`Not[DynamicChart`click$308010$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308010$308352, {{{1., 0}, { 0, 1.}}, {-0.015435092425329236`, \ -0.19940350528970535`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308010$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 9]& , TagBoxNote -> "9"], StyleBox["9", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[9, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308014$308352, FEPrivate`Not[DynamicChart`click$308014$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308014$308352, {{{1., 0}, { 0, 1.}}, {-0.12811863573963503`, -0.15357608920732002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308014$308352}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308018$308352, FEPrivate`Not[DynamicChart`click$308018$308352]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308018$308352, {{{1., 0}, { 0, 1.}}, {-0.19577113701907156`, \ -0.040910413225240166`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308018$308352}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Wednesday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Thursday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Thursday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$308067$308364 = False, DynamicChart`click$308071$308364 = False, DynamicChart`click$308075$308364 = False, DynamicChart`click$308079$308364 = False, DynamicChart`click$308083$308364 = False, DynamicChart`click$308087$308364 = False, DynamicChart`click$308091$308364 = False, DynamicChart`click$308095$308364 = False, DynamicChart`click$308099$308364 = False, DynamicChart`click$308103$308364 = False, DynamicChart`click$308107$308364 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.6265774644767124`, 3.141592653589793}]}], StatusArea[#, 5]& , TagBoxNote -> "5"], StyleBox["5", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[5, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308067$308364, FEPrivate`Not[DynamicChart`click$308067$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308067$308364, {{{1., 0}, { 0, 1.}}, {-0.1934055449582641, 0.05093422404824576}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308067$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.6995501240731667`, 2.6265774644767124`}]}], StatusArea[#, 9]& , TagBoxNote -> "9"], StyleBox["9", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[9, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308071$308364, FEPrivate`Not[DynamicChart`click$308071$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308071$308364, {{{1., 0}, { 0, 1.}}, {-0.11164874440537292`, 0.16593540271052382`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308071$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.2575075945565404, 1.6995501240731667`}]}], StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308075$308364, FEPrivate`Not[DynamicChart`click$308075$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308075$308364, {{{1., 0}, {0, 1.}}, { 0.11164874440537297`, 0.16593540271052376`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308075$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.1545045567339245, 0.2575075945565404}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308079$308364, FEPrivate`Not[DynamicChart`click$308079$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308079$308364, {{{1., 0}, {0, 1.}}, { 0.19973481797696613`, 0.01029575095406928}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308079$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.2575075945565408, -0.1545045567339245}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308083$308364, FEPrivate`Not[DynamicChart`click$308083$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308083$308364, {{{1., 0}, {0, 1.}}, { 0.19577113701907156`, -0.04091041322524023}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308083$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.36051063237915715`, -0.2575075945565408}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308087$308364, FEPrivate`Not[DynamicChart`click$308087$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308087$308364, {{{1., 0}, {0, 1.}}, { 0.1905270761606765, -0.06082296646550367}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308087$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.08153189713747, -0.36051063237915715`}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308091$308364, FEPrivate`Not[DynamicChart`click$308091$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308091$308364, {{{1., 0}, {0, 1.}}, { 0.15022638617410394`, -0.13203042413424643`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308091$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.1115622753636316`, -1.08153189713747}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308095$308364, FEPrivate`Not[DynamicChart`click$308095$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308095$308364, {{{1., 0}, { 0, 1.}}, {-0.005149582730997752, -0.1999336935028626}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308095$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.9355865779445613`, -2.1115622753636316`}]}], StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308099$308364, FEPrivate`Not[DynamicChart`click$308099$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308099$308364, {{{1., 0}, { 0, 1.}}, {-0.16300566750336232`, -0.1158842196409127}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308099$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[ 0.5019607843137255, 0.5019607843137255, 0.25098039215686274`]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.0385896157671777`, -2.9355865779445613`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308103$308364, FEPrivate`Not[DynamicChart`click$308103$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308103$308364, {{{1., 0}, { 0, 1.}}, {-0.19761757921821546`, -0.03077811534081225}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308103$308364}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -3.0385896157671777`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308107$308364, FEPrivate`Not[DynamicChart`click$308107$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308107$308364, {{{1., 0}, { 0, 1.}}, {-0.19973481797696613`, \ -0.010295750954069259`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308107$308364}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 5]& , TagBoxNote -> "5"], StyleBox["5", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[5, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308067$308364, FEPrivate`Not[DynamicChart`click$308067$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308067$308364, {{{1., 0}, { 0, 1.}}, {-0.1934055449582641, 0.05093422404824576}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308067$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 9]& , TagBoxNote -> "9"], StyleBox["9", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[9, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308071$308364, FEPrivate`Not[DynamicChart`click$308071$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308071$308364, {{{1., 0}, { 0, 1.}}, {-0.11164874440537292`, 0.16593540271052382`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308071$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308075$308364, FEPrivate`Not[DynamicChart`click$308075$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308075$308364, {{{1., 0}, {0, 1.}}, { 0.11164874440537297`, 0.16593540271052376`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308075$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308079$308364, FEPrivate`Not[DynamicChart`click$308079$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308079$308364, {{{1., 0}, {0, 1.}}, { 0.19973481797696613`, 0.01029575095406928}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308079$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308083$308364, FEPrivate`Not[DynamicChart`click$308083$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308083$308364, {{{1., 0}, {0, 1.}}, { 0.19577113701907156`, -0.04091041322524023}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308083$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308087$308364, FEPrivate`Not[DynamicChart`click$308087$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308087$308364, {{{1., 0}, {0, 1.}}, { 0.1905270761606765, -0.06082296646550367}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308087$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308091$308364, FEPrivate`Not[DynamicChart`click$308091$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308091$308364, {{{1., 0}, {0, 1.}}, { 0.15022638617410394`, -0.13203042413424643`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308091$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308095$308364, FEPrivate`Not[DynamicChart`click$308095$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308095$308364, {{{1., 0}, { 0, 1.}}, {-0.005149582730997752, -0.1999336935028626}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308095$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308099$308364, FEPrivate`Not[DynamicChart`click$308099$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308099$308364, {{{1., 0}, { 0, 1.}}, {-0.16300566750336232`, -0.1158842196409127}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308099$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308103$308364, FEPrivate`Not[DynamicChart`click$308103$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308103$308364, {{{1., 0}, { 0, 1.}}, {-0.19761757921821546`, -0.03077811534081225}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308103$308364}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308107$308364, FEPrivate`Not[DynamicChart`click$308107$308364]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308107$308364, {{{1., 0}, { 0, 1.}}, {-0.19973481797696613`, \ -0.010295750954069259`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308107$308364}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Thursday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Friday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Friday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$308160$308376 = False, DynamicChart`click$308164$308376 = False, DynamicChart`click$308168$308376 = False, DynamicChart`click$308172$308376 = False, DynamicChart`click$308176$308376 = False, DynamicChart`click$308180$308376 = False, DynamicChart`click$308184$308376 = False, DynamicChart`click$308188$308376 = False, DynamicChart`click$308192$308376 = False, DynamicChart`click$308196$308376 = False, DynamicChart`click$308200$308376 = False, DynamicChart`click$308204$308376 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.715613988696262, 3.141592653589793}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308160$308376, FEPrivate`Not[DynamicChart`click$308160$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308160$308376, {{{1., 0}, { 0, 1.}}, {-0.19548067796357335`, 0.04227652472592487}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308160$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.9701513251325822`, 2.715613988696262}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308164$308376, FEPrivate`Not[DynamicChart`click$308164$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308164$308376, {{{1., 0}, { 0, 1.}}, {-0.13952630422699694`, 0.14329134805966307`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308164$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.4792259980052229, 1.9701513251325822`}]}], StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308168$308376, FEPrivate`Not[DynamicChart`click$308168$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308168$308376, {{{1., 0}, {0, 1.}}, { 0.06784777322360604, 0.1881400533342067}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308168$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.15974199933507416`, 0.4792259980052229}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308172$308376, FEPrivate`Not[DynamicChart`click$308172$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308172$308376, {{{1., 0}, {0, 1.}}, { 0.18987952169367628`, 0.06281534240438978}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308172$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.053247333111691386`, 0.15974199933507416`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308176$308376, FEPrivate`Not[DynamicChart`click$308176$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308176$308376, {{{1., 0}, {0, 1.}}, { 0.1997165391353524, 0.010644434968435727`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308176$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.26623666555845693`, -0.053247333111691386`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308180$308376, FEPrivate`Not[DynamicChart`click$308180$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308180$308376, {{{1., 0}, {0, 1.}}, { 0.1974536709442689, -0.0318126992038144}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308180$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.905204662898754, -0.26623666555845693`}]}], StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308184$308376, FEPrivate`Not[DynamicChart`click$308184$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308184$308376, {{{1., 0}, {0, 1.}}, { 0.166662783816503, -0.11056001307223867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308184$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.3961299900261137`, -0.905204662898754}]}], StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308188$308376, FEPrivate`Not[DynamicChart`click$308188$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308188$308376, {{{1., 0}, { 0, 1.}}, {-0.01595722111061664, -0.19936240140615002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308188$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.5026246562494965`, -2.3961299900261137`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308192$308376, FEPrivate`Not[DynamicChart`click$308192$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308192$308376, {{{1., 0}, { 0, 1.}}, {-0.1539667966859813, -0.127648836728964}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308192$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.9286033211430276`, -2.5026246562494965`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308196$308376, FEPrivate`Not[DynamicChart`click$308196$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308196$308376, {{{1., 0}, { 0, 1.}}, {-0.18212695457098266`, -0.08264243715367563}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308196$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.0350979873664103`, -2.9286033211430276`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308200$308376, FEPrivate`Not[DynamicChart`click$308200$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308200$308376, {{{1., 0}, { 0, 1.}}, {-0.1974536709442689, -0.031812699203814424`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308200$308376}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.8, 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -3.0350979873664103`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308204$308376, FEPrivate`Not[DynamicChart`click$308204$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308204$308376, {{{1., 0}, { 0, 1.}}, {-0.1997165391353524, -0.010644434968435751`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308204$308376}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308160$308376, FEPrivate`Not[DynamicChart`click$308160$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308160$308376, {{{1., 0}, { 0, 1.}}, {-0.19548067796357335`, 0.04227652472592487}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308160$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308164$308376, FEPrivate`Not[DynamicChart`click$308164$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308164$308376, {{{1., 0}, { 0, 1.}}, {-0.13952630422699694`, 0.14329134805966307`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308164$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308168$308376, FEPrivate`Not[DynamicChart`click$308168$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308168$308376, {{{1., 0}, {0, 1.}}, { 0.06784777322360604, 0.1881400533342067}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308168$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308172$308376, FEPrivate`Not[DynamicChart`click$308172$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308172$308376, {{{1., 0}, {0, 1.}}, { 0.18987952169367628`, 0.06281534240438978}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308172$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308176$308376, FEPrivate`Not[DynamicChart`click$308176$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308176$308376, {{{1., 0}, {0, 1.}}, { 0.1997165391353524, 0.010644434968435727`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308176$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308180$308376, FEPrivate`Not[DynamicChart`click$308180$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308180$308376, {{{1., 0}, {0, 1.}}, { 0.1974536709442689, -0.0318126992038144}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308180$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308184$308376, FEPrivate`Not[DynamicChart`click$308184$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308184$308376, {{{1., 0}, {0, 1.}}, { 0.166662783816503, -0.11056001307223867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308184$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308188$308376, FEPrivate`Not[DynamicChart`click$308188$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308188$308376, {{{1., 0}, { 0, 1.}}, {-0.01595722111061664, -0.19936240140615002`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308188$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308192$308376, FEPrivate`Not[DynamicChart`click$308192$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308192$308376, {{{1., 0}, { 0, 1.}}, {-0.1539667966859813, -0.127648836728964}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308192$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308196$308376, FEPrivate`Not[DynamicChart`click$308196$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308196$308376, {{{1., 0}, { 0, 1.}}, {-0.18212695457098266`, -0.08264243715367563}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308196$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308200$308376, FEPrivate`Not[DynamicChart`click$308200$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308200$308376, {{{1., 0}, { 0, 1.}}, {-0.1974536709442689, -0.031812699203814424`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308200$308376}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308204$308376, FEPrivate`Not[DynamicChart`click$308204$308376]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308204$308376, {{{1., 0}, { 0, 1.}}, {-0.1997165391353524, -0.010644434968435751`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308204$308376}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Friday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Saturday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Saturday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$308259$308399 = False, DynamicChart`click$308263$308399 = False, DynamicChart`click$308267$308399 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.0471975511965979`, 3.141592653589793}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308259$308399, FEPrivate`Not[DynamicChart`click$308259$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308259$308399, {{{1., 0}, { 0, 1.}}, {-0.10000000000000005`, 0.1732050807568877}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308259$308399}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.0471975511965974`, 1.0471975511965979`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308263$308399, FEPrivate`Not[DynamicChart`click$308263$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308263$308399, {{{1., 0}, {0, 1.}}, { 0.2, 4.4408920985006264`*^-17}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308263$308399}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -1.0471975511965974`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308267$308399, FEPrivate`Not[DynamicChart`click$308267$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308267$308399, {{{1., 0}, { 0, 1.}}, {-0.09999999999999996, -0.17320508075688776`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308267$308399}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308259$308399, FEPrivate`Not[DynamicChart`click$308259$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308259$308399, {{{1., 0}, { 0, 1.}}, {-0.10000000000000005`, 0.1732050807568877}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308259$308399}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308263$308399, FEPrivate`Not[DynamicChart`click$308263$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308263$308399, {{{1., 0}, {0, 1.}}, { 0.2, 4.4408920985006264`*^-17}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$308263$308399}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308267$308399, FEPrivate`Not[DynamicChart`click$308267$308399]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308267$308399, {{{1., 0}, { 0, 1.}}, {-0.09999999999999996, -0.17320508075688776`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308267$308399}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Saturday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Pane[ Annotation[ RawBoxes[ StyleBox[ "Sunday", FontFamily -> "Source Code Pro", FontSize -> 13, ShowStringCharacters -> True]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1197332303][ GeneralUtilities`Slice[ Key[Sunday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}], ImageSize -> {{60, Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$308304$308400 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, 3.141592653589793}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308304$308400, FEPrivate`Not[DynamicChart`click$308304$308400]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308304$308400, {{{1., 0}, {0, 1.}}, { 0.2, 0}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308304$308400}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$308304$308400, FEPrivate`Not[DynamicChart`click$308304$308400]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$308304$308400, {{{1., 0}, {0, 1.}}, { 0.2, 0}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$308304$308400}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ GeneralUtilities`Slice[ Key[Sunday]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}}, BaseStyle -> {ContextMenu -> { MenuItem["Copy position to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], MenuItem["Copy data to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], Delimiter, MenuItem["Paste position in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic], MenuItem["Paste data in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic]}, FontFamily -> "Verdana", FontSize -> 12}, Alignment -> Left, RowMinHeight -> 1.5, Dividers -> All, FrameStyle -> GrayLevel[0.85], BaseStyle -> {FontFamily -> "Verdana", FontSize -> 12}], LineBreakWithin -> False, ContextMenu -> {}, NumberMarks -> False, ShowAutoStyles -> False]], TypeSystem`NestedGrid`PackagePrivate`initialQ = True, TypeSystem`NestedGrid`PackagePrivate`self = $Failed}, Dynamic[ TypeSystem`NestedGrid`PackagePrivate`setupViewPath[ TypeSystem`NestedGrid`PackagePrivate`$path$$, If[ Not[TypeSystem`NestedGrid`PackagePrivate`initialQ], Module[{TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = $Failed, TypeSystem`NestedGrid`PackagePrivate`tmpData$ = TypeSystem`NestedGrid`PackagePrivate`LookupCacheValue[ TypeSystem`NestedGrid`PackagePrivate`$state$$["Data"]]}, TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = If[TypeSystem`NestedGrid`PackagePrivate`tmpData$ === TypeSystem`NestedGrid`PackagePrivate`$NotCached, TypeSystem`NestedGrid`PackagePrivate`renderedGrid, TypeSystem`NestedGrid`PackagePrivate`renderGrid[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1197332303][ TypeSystem`NestedGrid`PackagePrivate`tmpData$]]; If[ Not[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]], TypeSystem`NestedGrid`PackagePrivate`renderedGrid = TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]; Null]]; TypeSystem`NestedGrid`PackagePrivate`initialQ = False; TypeSystem`NestedGrid`PackagePrivate`$pos$$; If[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`renderedGrid], TypeSystem`SparseGrid[ TypeSystem`H["(data no longer present)"]], If[GeneralUtilities`$DebugMode, Row[{TypeSystem`NestedGrid`PackagePrivate`renderedGrid, " ", TypeSystem`NestedGrid`PackagePrivate`formatState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$]}], TypeSystem`NestedGrid`PackagePrivate`renderedGrid]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$pos$$}], DynamicModuleValues :> {}], TypeSystem`NestedGrid`PackagePrivate`$posCell$$, TypeSystem`NestedGrid`PackagePrivate`$topBar$$ = Dynamic[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`makeFramedBar[ TypeSystem`PackageScope`Pathbar[ TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1197332303]]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$path$$}], TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$ = Framed[ Dynamic[ Replace[ MouseAnnotation[Null], { TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][Null] -> "", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1197332303][ Pattern[TypeSystem`NestedGrid`PackagePrivate`path, Blank[]]] :> ( TypeSystem`NestedGrid`PackagePrivate`$lastPath = TypeSystem`NestedGrid`PackagePrivate`path; TypeSystem`NestedGrid`PackagePrivate`makePathTrail[ TypeSystem`NestedGrid`PackagePrivate`path, TypeSystem`NestedGrid`PackagePrivate`makePathElements]), Null :> Spacer[10], Blank[] :> Spacer[10]}], TrackedSymbols :> {}], FrameStyle -> None, ImageMargins -> 0, FrameMargins -> 0, Alignment -> Top, ImageSize -> {Automatic, 14}]}, DynamicBox[ ToBoxes[ Column[ If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, { TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}, { TypeSystem`NestedGrid`PackagePrivate`$topBar$$, TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}], Spacings -> If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, 0, {{}, {0, 0.05, 0}}]], StandardForm], ImageSizeCache -> {178., {361.134033203125, 366.865966796875}}, TrackedSymbols :> { TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$}], BaseStyle -> {LineBreakWithin -> False}, Deinitialization :> TypeSystem`NestedGrid`PackagePrivate`deleteState[ TypeSystem`NestedGrid`PackagePrivate`$state$$], DynamicModuleValues :> {}, Initialization :> Block[{$ContextPath = $ContextPath}, Needs["TypeSystem`"]]], Deploy, DefaultBaseStyle -> "Deploy"]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("Dataset[<>]"& )]], "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704132442896029*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"PieChart", "[", RowBox[{"#", ",", RowBox[{"ChartStyle", "\[Rule]", RowBox[{"Normal", "[", RowBox[{"Keys", "[", "#", "]"}], "]"}]}]}], "]"}], "&"}], "/@", RowBox[{"(", RowBox[{"Counts", "/@", RowBox[{ RowBox[{"GroupBy", "[", RowBox[{ RowBox[{ "ResourceData", "[", "\"\\"", "]"}], ",", RowBox[{ RowBox[{"#Date", "[", "\"\\"", "]"}], "&"}]}], "]"}], "[", RowBox[{"All", ",", "All", ",", "\"\\""}], "]"}]}], ")"}]}]], "Input", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704132475138033*^9}], Cell[BoxData[ TemplateBox[{ TagBox[ DynamicModuleBox[{ TypeSystem`NestedGrid`PackagePrivate`$state$$ = Data`UnorderedAssociation[ "DisplayedRowCount" -> 20, "RowCount" -> 10, "Length" -> 10, "InitialType" -> TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration[ "April", "August", "February", "July", "June", "March", "May", "November", "October", "September"]], TypeSystem`Atom[Graphics], 10], "DisplayedColumnCount" -> 20, "DataRowCount" -> 0, "Shape" -> TypeSystem`PackageScope`Limited[ TypeSystem`PackageScope`ColumnShape[ TypeSystem`PackageScope`KeyValueShape[ TypeSystem`PackageScope`AtomShape[81.], TypeSystem`PackageScope`AtomShape[60]]], 10, {}], "DataColumnCount" -> 0, "InitialData" -> TypeSystem`PackageScope`CacheHandle[1885956130], "Type" -> TypeSystem`Assoc[ TypeSystem`Atom[ TypeSystem`Enumeration[ "April", "August", "February", "July", "June", "March", "May", "November", "October", "September"]], TypeSystem`Atom[Graphics], 10], "HandleQ" -> True, "Meta" -> {}, "RowTarget" -> 20, "Data" -> TypeSystem`PackageScope`CacheHandle[1885956130]], TypeSystem`NestedGrid`PackagePrivate`$path$$ = {}, TypeSystem`NestedGrid`PackagePrivate`$pos$$ = 1, TypeSystem`NestedGrid`PackagePrivate`$grid$$ = DynamicModule[{ TypeSystem`NestedGrid`PackagePrivate`renderedGrid = Deploy[ Style[ Grid[{{ Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["August", Style[ "August", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["August"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["August"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$310800$311657 = False, DynamicChart`click$310804$311657 = False, DynamicChart`click$310808$311657 = False, DynamicChart`click$310812$311657 = False, DynamicChart`click$310816$311657 = False, DynamicChart`click$310820$311657 = False, DynamicChart`click$310824$311657 = False, DynamicChart`click$310828$311657 = False, DynamicChart`click$310832$311657 = False, DynamicChart`click$310836$311657 = False, DynamicChart`click$310840$311657 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.8951932297788288`, 3.141592653589793}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310800$311657, FEPrivate`Not[DynamicChart`click$310800$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310800$311657, {{{1., 0}, { 0, 1.}}, {-0.19848410193438715`, 0.024577658132942867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310800$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.648793805967865, 2.8951932297788288`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310804$311657, FEPrivate`Not[DynamicChart`click$310804$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310804$311657, {{{1., 0}, { 0, 1.}}, {-0.18649444588087116`, 0.07224833323743059}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310804$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.8007981273856335, 2.648793805967865}]}], StatusArea[#, 15]& , TagBoxNote -> "15"], StyleBox["15", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[15, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310808$311657, FEPrivate`Not[DynamicChart`click$310808$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310808$311657, {{{1., 0}, { 0, 1.}}, {-0.030678330975737064`, 0.19763309441625188`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310808$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.6775984154801513, 0.8007981273856335}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310812$311657, FEPrivate`Not[DynamicChart`click$310812$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310812$311657, {{{1., 0}, {0, 1.}}, { 0.14780178344413183`, 0.13473912872931143`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310812$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.18479956785822305`, 0.6775984154801513}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310816$311657, FEPrivate`Not[DynamicChart`click$310816$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310816$311657, {{{1., 0}, {0, 1.}}, { 0.1939593872070019, 0.04878274402167543}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310816$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.4167966869130435`, -0.18479956785822305`}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310820$311657, FEPrivate`Not[DynamicChart`click$310820$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310820$311657, {{{1., 0}, {0, 1.}}, { 0.13922678919258535`, -0.14358238461288836`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310820$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.2, 0.2, 0.2]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.5399963988185261`, -1.4167966869130435`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310824$311657, FEPrivate`Not[DynamicChart`click$310824$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310824$311657, {{{1., 0}, {0, 1.}}, { 0.018453671892660447`, -0.1991468352590069}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310824$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.7863958226294905`, -1.5399963988185261`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310828$311657, FEPrivate`Not[DynamicChart`click$310828$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310828$311657, {{{1., 0}, { 0, 1.}}, {-0.018453671892660423`, -0.1991468352590069}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310828$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[ 0.5019607843137255, 0.5019607843137255, 0.25098039215686274`]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.9095955345349722`, -1.7863958226294905`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310832$311657, FEPrivate`Not[DynamicChart`click$310832$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310832$311657, {{{1., 0}, { 0, 1.}}, {-0.05473259801441658, -0.19236512863456381`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310832$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.8951932297788288`, -1.9095955345349722`}]}], StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310836$311657, FEPrivate`Not[DynamicChart`click$310836$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310836$311657, {{{1., 0}, { 0, 1.}}, {-0.1478017834441318, -0.13473912872931149`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310836$311657}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.8951932297788288`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310840$311657, FEPrivate`Not[DynamicChart`click$310840$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310840$311657, {{{1., 0}, { 0, 1.}}, {-0.19848410193438715`, \ -0.024577658132942867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310840$311657}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310800$311657, FEPrivate`Not[DynamicChart`click$310800$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310800$311657, {{{1., 0}, { 0, 1.}}, {-0.19848410193438715`, 0.024577658132942867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310800$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310804$311657, FEPrivate`Not[DynamicChart`click$310804$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310804$311657, {{{1., 0}, { 0, 1.}}, {-0.18649444588087116`, 0.07224833323743059}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310804$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 15]& , TagBoxNote -> "15"], StyleBox["15", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[15, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310808$311657, FEPrivate`Not[DynamicChart`click$310808$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310808$311657, {{{1., 0}, { 0, 1.}}, {-0.030678330975737064`, 0.19763309441625188`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310808$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310812$311657, FEPrivate`Not[DynamicChart`click$310812$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310812$311657, {{{1., 0}, {0, 1.}}, { 0.14780178344413183`, 0.13473912872931143`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310812$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310816$311657, FEPrivate`Not[DynamicChart`click$310816$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310816$311657, {{{1., 0}, {0, 1.}}, { 0.1939593872070019, 0.04878274402167543}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310816$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310820$311657, FEPrivate`Not[DynamicChart`click$310820$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310820$311657, {{{1., 0}, {0, 1.}}, { 0.13922678919258535`, -0.14358238461288836`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310820$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310824$311657, FEPrivate`Not[DynamicChart`click$310824$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310824$311657, {{{1., 0}, {0, 1.}}, { 0.018453671892660447`, -0.1991468352590069}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310824$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310828$311657, FEPrivate`Not[DynamicChart`click$310828$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310828$311657, {{{1., 0}, { 0, 1.}}, {-0.018453671892660423`, -0.1991468352590069}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310828$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310832$311657, FEPrivate`Not[DynamicChart`click$310832$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310832$311657, {{{1., 0}, { 0, 1.}}, {-0.05473259801441658, -0.19236512863456381`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310832$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 8]& , TagBoxNote -> "8"], StyleBox["8", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[8, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310836$311657, FEPrivate`Not[DynamicChart`click$310836$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310836$311657, {{{1., 0}, { 0, 1.}}, {-0.1478017834441318, -0.13473912872931149`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310836$311657}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310840$311657, FEPrivate`Not[DynamicChart`click$310840$311657]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310840$311657, {{{1., 0}, { 0, 1.}}, {-0.19848410193438715`, \ -0.024577658132942867`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310840$311657}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["August"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["February", Style[ "February", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["February"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["February"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$310893$311658 = False, DynamicChart`click$310897$311658 = False, DynamicChart`click$310901$311658 = False, DynamicChart`click$310905$311658 = False, DynamicChart`click$310909$311658 = False, DynamicChart`click$310913$311658 = False, DynamicChart`click$310917$311658 = False, DynamicChart`click$310921$311658 = False, DynamicChart`click$310925$311658 = False, DynamicChart`click$310929$311658 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.5848547149789436`, 3.141592653589793}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310893$311658, FEPrivate`Not[DynamicChart`click$310893$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310893$311658, {{{1., 0}, { 0, 1.}}, {-0.19230098086548408`, 0.054957554150205104`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310893$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.2667187500584585`, 2.5848547149789436`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310897$311658, FEPrivate`Not[DynamicChart`click$310897$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310897$311658, {{{1., 0}, { 0, 1.}}, {-0.15091292403164605`, 0.1312451498540751}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310897$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.709980811447609, 2.2667187500584585`}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310901$311658, FEPrivate`Not[DynamicChart`click$310901$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310901$311658, {{{1., 0}, { 0, 1.}}, {-0.08110506416259879, 0.18281676227080693`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310901$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.03976699561506081, 1.709980811447609}]}], StatusArea[#, 21]& , TagBoxNote -> "21"], StyleBox["21", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[21, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310905$311658, FEPrivate`Not[DynamicChart`click$310905$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310905$311658, {{{1., 0}, {0, 1.}}, { 0.12821872751844401`, 0.1534925337387816}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310905$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.11930098684518198`, 0.03976699561506081}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310909$311658, FEPrivate`Not[DynamicChart`click$310909$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310909$311658, {{{1., 0}, {0, 1.}}, { 0.1998418794454604, -0.00795130301938511}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310909$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.19883497807530315`, -0.11930098684518198`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310913$311658, FEPrivate`Not[DynamicChart`click$310913$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310913$311658, {{{1., 0}, {0, 1.}}, { 0.1974750683872667, -0.03167960488144297}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310913$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.3123108552970022`, -0.19883497807530315`}]}], StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310917$311658, FEPrivate`Not[DynamicChart`click$310917$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310917$311658, {{{1., 0}, {0, 1.}}, { 0.14557576207389886`, -0.1371411590172826}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310917$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.1076507675982157`, -1.3123108552970022`}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310921$311658, FEPrivate`Not[DynamicChart`click$310921$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310921$311658, {{{1., 0}, { 0, 1.}}, {-0.027747106397813637`, -0.1980658932945004}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310921$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.98252467112955, -2.1076507675982157`}]}], StatusArea[#, 11]& , TagBoxNote -> "11"], StyleBox["11", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[11, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310925$311658, FEPrivate`Not[DynamicChart`click$310925$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310925$311658, {{{1., 0}, { 0, 1.}}, {-0.16546080650861142`, -0.11235088566415424`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310925$311658}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.98252467112955}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310929$311658, FEPrivate`Not[DynamicChart`click$310929$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310929$311658, {{{1., 0}, { 0, 1.}}, {-0.1993677678029392, -0.015890033394342952`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310929$311658}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310893$311658, FEPrivate`Not[DynamicChart`click$310893$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310893$311658, {{{1., 0}, { 0, 1.}}, {-0.19230098086548408`, 0.054957554150205104`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310893$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310897$311658, FEPrivate`Not[DynamicChart`click$310897$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310897$311658, {{{1., 0}, { 0, 1.}}, {-0.15091292403164605`, 0.1312451498540751}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310897$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310901$311658, FEPrivate`Not[DynamicChart`click$310901$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310901$311658, {{{1., 0}, { 0, 1.}}, {-0.08110506416259879, 0.18281676227080693`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310901$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 21]& , TagBoxNote -> "21"], StyleBox["21", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[21, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310905$311658, FEPrivate`Not[DynamicChart`click$310905$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310905$311658, {{{1., 0}, {0, 1.}}, { 0.12821872751844401`, 0.1534925337387816}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310905$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310909$311658, FEPrivate`Not[DynamicChart`click$310909$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310909$311658, {{{1., 0}, {0, 1.}}, { 0.1998418794454604, -0.00795130301938511}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310909$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310913$311658, FEPrivate`Not[DynamicChart`click$310913$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310913$311658, {{{1., 0}, {0, 1.}}, { 0.1974750683872667, -0.03167960488144297}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310913$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310917$311658, FEPrivate`Not[DynamicChart`click$310917$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310917$311658, {{{1., 0}, {0, 1.}}, { 0.14557576207389886`, -0.1371411590172826}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310917$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310921$311658, FEPrivate`Not[DynamicChart`click$310921$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310921$311658, {{{1., 0}, { 0, 1.}}, {-0.027747106397813637`, -0.1980658932945004}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310921$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 11]& , TagBoxNote -> "11"], StyleBox["11", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[11, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310925$311658, FEPrivate`Not[DynamicChart`click$310925$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310925$311658, {{{1., 0}, { 0, 1.}}, {-0.16546080650861142`, -0.11235088566415424`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310925$311658}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310929$311658, FEPrivate`Not[DynamicChart`click$310929$311658]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310929$311658, {{{1., 0}, { 0, 1.}}, {-0.1993677678029392, -0.015890033394342952`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310929$311658}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["February"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["May", Style[ "May", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["May"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["May"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$310980$311659 = False, DynamicChart`click$310984$311659 = False, DynamicChart`click$310988$311659 = False, DynamicChart`click$310992$311659 = False, DynamicChart`click$310996$311659 = False, DynamicChart`click$311000$311659 = False, DynamicChart`click$311004$311659 = False, DynamicChart`click$311008$311659 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.0327952464404544`, 3.141592653589793}]}], StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310980$311659, FEPrivate`Not[DynamicChart`click$310980$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310980$311659, {{{1., 0}, { 0, 1.}}, {-0.1700434271459228, 0.10528643257547121`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310980$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.478396542865785, 2.0327952464404544`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310984$311659, FEPrivate`Not[DynamicChart`click$310984$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310984$311659, {{{1., 0}, { 0, 1.}}, {-0.036749903563314035`, 0.19659461993678037`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310984$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.18479956785822305`, 1.478396542865785}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310988$311659, FEPrivate`Not[DynamicChart`click$310988$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310988$311659, {{{1., 0}, {0, 1.}}, { 0.13473912872931146`, 0.14780178344413183`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310988$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.6631961107240079`, 0.18479956785822305`}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310992$311659, FEPrivate`Not[DynamicChart`click$310992$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310992$311659, {{{1., 0}, {0, 1.}}, { 0.14780178344413183`, -0.13473912872931143`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310992$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.8479956785822313`, -1.6631961107240079`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310996$311659, FEPrivate`Not[DynamicChart`click$310996$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310996$311659, {{{1., 0}, { 0, 1.}}, {-0.036749903563314035`, \ -0.19659461993678037`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310996$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.4023943821569, -1.8479956785822313`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311000$311659, FEPrivate`Not[DynamicChart`click$311000$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311000$311659, {{{1., 0}, { 0, 1.}}, {-0.1052864325754711, -0.17004342714592288`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311000$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.9567930857315696`, -2.4023943821569}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311004$311659, FEPrivate`Not[DynamicChart`click$311004$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311004$311659, {{{1., 0}, { 0, 1.}}, {-0.17903265827101245`, -0.08914767115530776}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311004$311659}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.9567930857315696`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311008$311659, FEPrivate`Not[DynamicChart`click$311008$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311008$311659, {{{1., 0}, { 0, 1.}}, {-0.1991468352590069, -0.01845367189266046}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311008$311659}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310980$311659, FEPrivate`Not[DynamicChart`click$310980$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310980$311659, {{{1., 0}, { 0, 1.}}, {-0.1700434271459228, 0.10528643257547121`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310980$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310984$311659, FEPrivate`Not[DynamicChart`click$310984$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310984$311659, {{{1., 0}, { 0, 1.}}, {-0.036749903563314035`, 0.19659461993678037`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$310984$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310988$311659, FEPrivate`Not[DynamicChart`click$310988$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310988$311659, {{{1., 0}, {0, 1.}}, { 0.13473912872931146`, 0.14780178344413183`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310988$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310992$311659, FEPrivate`Not[DynamicChart`click$310992$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310992$311659, {{{1., 0}, {0, 1.}}, { 0.14780178344413183`, -0.13473912872931143`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310992$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$310996$311659, FEPrivate`Not[DynamicChart`click$310996$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$310996$311659, {{{1., 0}, { 0, 1.}}, {-0.036749903563314035`, \ -0.19659461993678037`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$310996$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311000$311659, FEPrivate`Not[DynamicChart`click$311000$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311000$311659, {{{1., 0}, { 0, 1.}}, {-0.1052864325754711, -0.17004342714592288`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311000$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311004$311659, FEPrivate`Not[DynamicChart`click$311004$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311004$311659, {{{1., 0}, { 0, 1.}}, {-0.17903265827101245`, -0.08914767115530776}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311004$311659}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311008$311659, FEPrivate`Not[DynamicChart`click$311008$311659]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311008$311659, {{{1., 0}, { 0, 1.}}, {-0.1991468352590069, -0.01845367189266046}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311008$311659}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["May"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["June", Style[ "June", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["June"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["June"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311055$311660 = False, DynamicChart`click$311059$311660 = False, DynamicChart`click$311063$311660 = False, DynamicChart`click$311067$311660 = False, DynamicChart`click$311071$311660 = False, DynamicChart`click$311075$311660 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.9991953250116865`, 3.141592653589793}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311055$311660, FEPrivate`Not[DynamicChart`click$311055$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311055$311660, {{{1., 0}, { 0, 1.}}, {-0.16825070656623622`, 0.10812816349111956`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311055$311660}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.8567979964335799, 1.9991953250116865`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311059$311660, FEPrivate`Not[DynamicChart`click$311059$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311059$311660, {{{1., 0}, {0, 1.}}, { 0.028462967654657025`, 0.19796428837618654`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311059$311660}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.2855993321445265, 0.8567979964335799}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311063$311660, FEPrivate`Not[DynamicChart`click$311063$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311063$311660, {{{1., 0}, {0, 1.}}, { 0.1918985947228995, 0.056346511368285945`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311063$311660}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.9991953250116872`, -0.2855993321445265}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311067$311660, FEPrivate`Not[DynamicChart`click$311067$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311067$311660, {{{1., 0}, {0, 1.}}, { 0.08308300260037726, -0.1819263990709037}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311067$311660}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.2, 1., 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.57039398930074, -1.9991953250116872`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311071$311660, FEPrivate`Not[DynamicChart`click$311071$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311071$311660, {{{1., 0}, { 0, 1.}}, {-0.13097214678905708`, -0.1511499148708516}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311071$311660}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.57039398930074}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311075$311660, FEPrivate`Not[DynamicChart`click$311075$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311075$311660, {{{1., 0}, { 0, 1.}}, {-0.1918985947228995, -0.05634651136828594}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311075$311660}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311055$311660, FEPrivate`Not[DynamicChart`click$311055$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311055$311660, {{{1., 0}, { 0, 1.}}, {-0.16825070656623622`, 0.10812816349111956`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311055$311660}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311059$311660, FEPrivate`Not[DynamicChart`click$311059$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311059$311660, {{{1., 0}, {0, 1.}}, { 0.028462967654657025`, 0.19796428837618654`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311059$311660}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311063$311660, FEPrivate`Not[DynamicChart`click$311063$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311063$311660, {{{1., 0}, {0, 1.}}, { 0.1918985947228995, 0.056346511368285945`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311063$311660}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311067$311660, FEPrivate`Not[DynamicChart`click$311067$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311067$311660, {{{1., 0}, {0, 1.}}, { 0.08308300260037726, -0.1819263990709037}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311067$311660}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311071$311660, FEPrivate`Not[DynamicChart`click$311071$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311071$311660, {{{1., 0}, { 0, 1.}}, {-0.13097214678905708`, -0.1511499148708516}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311071$311660}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311075$311660, FEPrivate`Not[DynamicChart`click$311075$311660]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311075$311660, {{{1., 0}, { 0, 1.}}, {-0.1918985947228995, -0.05634651136828594}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311075$311660}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["June"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["July", Style[ "July", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["July"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["July"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311118$311661 = False, DynamicChart`click$311122$311661 = False, DynamicChart`click$311126$311661 = False, DynamicChart`click$311130$311661 = False, DynamicChart`click$311134$311661 = False, DynamicChart`click$311138$311661 = False, DynamicChart`click$311142$311661 = False, DynamicChart`click$311146$311661 = False, DynamicChart`click$311150$311661 = False, DynamicChart`click$311154$311661 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.5707963267948966`, 3.141592653589793}]}], StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311118$311661, FEPrivate`Not[DynamicChart`click$311118$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311118$311661, {{{1., 0}, { 0, 1.}}, {-0.1414213562373095, 0.14142135623730953`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311118$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.3089969389957474`, 1.5707963267948966`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311122$311661, FEPrivate`Not[DynamicChart`click$311122$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311122$311661, {{{1., 0}, {0, 1.}}, { 0.0261052384440103, 0.19828897227476208`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311122$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.7853981633974483, 1.3089969389957474`}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311126$311661, FEPrivate`Not[DynamicChart`click$311126$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311126$311661, {{{1., 0}, {0, 1.}}, { 0.09999999999999998, 0.17320508075688776`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311126$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.5235987755982991, 0.7853981633974483}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311130$311661, FEPrivate`Not[DynamicChart`click$311130$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311130$311661, {{{1., 0}, {0, 1.}}, { 0.15867066805824703`, 0.12175228580174416`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311130$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.2617993877991496, 0.5235987755982991}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311134$311661, FEPrivate`Not[DynamicChart`click$311134$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311134$311661, {{{1., 0}, {0, 1.}}, { 0.18477590650225734`, 0.07653668647301799}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311134$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.5707963267948966`, 0.2617993877991496}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311138$311661, FEPrivate`Not[DynamicChart`click$311138$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311138$311661, {{{1., 0}, {0, 1.}}, { 0.15867066805824706`, -0.12175228580174412`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311138$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.8325957145940457`, -1.5707963267948966`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311142$311661, FEPrivate`Not[DynamicChart`click$311142$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311142$311661, {{{1., 0}, { 0, 1.}}, {-0.026105238444010276`, -0.1982889722747621}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311142$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.617993877991494, -1.8325957145940457`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311146$311661, FEPrivate`Not[DynamicChart`click$311146$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311146$311661, {{{1., 0}, { 0, 1.}}, {-0.12175228580174408`, -0.1586706680582471}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311146$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.879793265790643, -2.617993877991494}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311150$311661, FEPrivate`Not[DynamicChart`click$311150$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311150$311661, {{{1., 0}, { 0, 1.}}, {-0.1847759065022573, -0.07653668647301806}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311150$311661}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.8, 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.879793265790643}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311154$311661, FEPrivate`Not[DynamicChart`click$311154$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311154$311661, {{{1., 0}, { 0, 1.}}, {-0.19828897227476208`, -0.0261052384440104}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311154$311661}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311118$311661, FEPrivate`Not[DynamicChart`click$311118$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311118$311661, {{{1., 0}, { 0, 1.}}, {-0.1414213562373095, 0.14142135623730953`}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311118$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311122$311661, FEPrivate`Not[DynamicChart`click$311122$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311122$311661, {{{1., 0}, {0, 1.}}, { 0.0261052384440103, 0.19828897227476208`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311122$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311126$311661, FEPrivate`Not[DynamicChart`click$311126$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311126$311661, {{{1., 0}, {0, 1.}}, { 0.09999999999999998, 0.17320508075688776`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311126$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311130$311661, FEPrivate`Not[DynamicChart`click$311130$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311130$311661, {{{1., 0}, {0, 1.}}, { 0.15867066805824703`, 0.12175228580174416`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311130$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311134$311661, FEPrivate`Not[DynamicChart`click$311134$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311134$311661, {{{1., 0}, {0, 1.}}, { 0.18477590650225734`, 0.07653668647301799}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311134$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311138$311661, FEPrivate`Not[DynamicChart`click$311138$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311138$311661, {{{1., 0}, {0, 1.}}, { 0.15867066805824706`, -0.12175228580174412`}}, {{1, 0}, { 0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311138$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311142$311661, FEPrivate`Not[DynamicChart`click$311142$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311142$311661, {{{1., 0}, { 0, 1.}}, {-0.026105238444010276`, -0.1982889722747621}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311142$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311146$311661, FEPrivate`Not[DynamicChart`click$311146$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311146$311661, {{{1., 0}, { 0, 1.}}, {-0.12175228580174408`, -0.1586706680582471}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311146$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311150$311661, FEPrivate`Not[DynamicChart`click$311150$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311150$311661, {{{1., 0}, { 0, 1.}}, {-0.1847759065022573, -0.07653668647301806}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311150$311661}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311154$311661, FEPrivate`Not[DynamicChart`click$311154$311661]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311154$311661, {{{1., 0}, { 0, 1.}}, {-0.19828897227476208`, -0.0261052384440104}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311154$311661}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["July"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["March", Style[ "March", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["March"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["March"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311216$311662 = False, DynamicChart`click$311220$311662 = False, DynamicChart`click$311224$311662 = False, DynamicChart`click$311240$311662 = False, DynamicChart`click$311255$311662 = False, DynamicChart`click$311259$311662 = False, DynamicChart`click$311263$311662 = False, DynamicChart`click$311267$311662 = False, DynamicChart`click$311271$311662 = False, DynamicChart`click$311275$311662 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.842393353247908, 3.141592653589793}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311216$311662, FEPrivate`Not[DynamicChart`click$311216$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311216$311662, {{{1., 0}, { 0, 1.}}, {-0.19776616524502572`, 0.029808453235234858`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311216$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.944795452222253, 2.842393353247908}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311220$311662, FEPrivate`Not[DynamicChart`click$311220$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311220$311662, {{{1., 0}, { 0, 1.}}, {-0.14661037436596527`, 0.13603454755418387`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311220$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.3463968515384828`, 1.944795452222253}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311224$311662, FEPrivate`Not[DynamicChart`click$311224$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311224$311662, {{{1., 0}, { 0, 1.}}, {-0.014946018717284855`, 0.19944075943623604`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311224$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.0471975511965979`, 1.3463968515384828`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311240$311662, FEPrivate`Not[DynamicChart`click$311240$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311240$311662, {{{1., 0}, {0, 1.}}, { 0.073068204873279, 0.18617474972884085`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311240$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.14959965017094268`, 1.0471975511965979`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311255$311662, FEPrivate`Not[DynamicChart`click$311255$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311255$311662, {{{1., 0}, {0, 1.}}, { 0.16524775486319898`, 0.11266401161272444`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311255$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.0471975511965974`, 0.14959965017094268`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311259$311662, FEPrivate`Not[DynamicChart`click$311259$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311259$311662, {{{1., 0}, {0, 1.}}, { 0.18019377358048386`, -0.08677674782351158}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311259$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.9447954522222526`, -1.0471975511965974`}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311263$311662, FEPrivate`Not[DynamicChart`click$311263$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311263$311662, {{{1., 0}, {0, 1.}}, { 0.01494601871728492, -0.19944075943623604`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311263$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.243994752564138, -1.9447954522222526`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311267$311662, FEPrivate`Not[DynamicChart`click$311267$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311267$311662, {{{1., 0}, { 0, 1.}}, {-0.09999999999999996, -0.17320508075688776`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311267$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.8423933532479078`, -2.243994752564138}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311271$311662, FEPrivate`Not[DynamicChart`click$311271$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311271$311662, {{{1., 0}, { 0, 1.}}, {-0.16524775486319895`, -0.11266401161272446`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311271$311662}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.8, 0.4, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.8423933532479078`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311275$311662, FEPrivate`Not[DynamicChart`click$311275$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311275$311662, {{{1., 0}, { 0, 1.}}, {-0.19776616524502572`, \ -0.029808453235234945`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311275$311662}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311216$311662, FEPrivate`Not[DynamicChart`click$311216$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311216$311662, {{{1., 0}, { 0, 1.}}, {-0.19776616524502572`, 0.029808453235234858`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311216$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311220$311662, FEPrivate`Not[DynamicChart`click$311220$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311220$311662, {{{1., 0}, { 0, 1.}}, {-0.14661037436596527`, 0.13603454755418387`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311220$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311224$311662, FEPrivate`Not[DynamicChart`click$311224$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311224$311662, {{{1., 0}, { 0, 1.}}, {-0.014946018717284855`, 0.19944075943623604`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311224$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311240$311662, FEPrivate`Not[DynamicChart`click$311240$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311240$311662, {{{1., 0}, {0, 1.}}, { 0.073068204873279, 0.18617474972884085`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311240$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311255$311662, FEPrivate`Not[DynamicChart`click$311255$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311255$311662, {{{1., 0}, {0, 1.}}, { 0.16524775486319898`, 0.11266401161272444`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311255$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311259$311662, FEPrivate`Not[DynamicChart`click$311259$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311259$311662, {{{1., 0}, {0, 1.}}, { 0.18019377358048386`, -0.08677674782351158}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311259$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311263$311662, FEPrivate`Not[DynamicChart`click$311263$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311263$311662, {{{1., 0}, {0, 1.}}, { 0.01494601871728492, -0.19944075943623604`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311263$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311267$311662, FEPrivate`Not[DynamicChart`click$311267$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311267$311662, {{{1., 0}, { 0, 1.}}, {-0.09999999999999996, -0.17320508075688776`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311267$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311271$311662, FEPrivate`Not[DynamicChart`click$311271$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311271$311662, {{{1., 0}, { 0, 1.}}, {-0.16524775486319895`, -0.11266401161272446`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311271$311662}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311275$311662, FEPrivate`Not[DynamicChart`click$311275$311662]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311275$311662, {{{1., 0}, { 0, 1.}}, {-0.19776616524502572`, \ -0.029808453235234945`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311275$311662}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["March"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["November", Style[ "November", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["November"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["November"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311348$311698 = False, DynamicChart`click$311352$311698 = False, DynamicChart`click$311356$311698 = False, DynamicChart`click$311360$311698 = False, DynamicChart`click$311364$311698 = False, DynamicChart`click$311368$311698 = False, DynamicChart`click$311385$311698 = False, DynamicChart`click$311389$311698 = False, DynamicChart`click$311393$311698 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.542236393580444, 3.141592653589793}]}], StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311348$311698, FEPrivate`Not[DynamicChart`click$311348$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311348$311698, {{{1., 0}, { 0, 1.}}, {-0.13938751373105868`, 0.14342636095179273`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311348$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.7425582635757695, 1.542236393580444}]}], StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311352$311698, FEPrivate`Not[DynamicChart`click$311352$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311352$311698, {{{1., 0}, {0, 1.}}, { 0.08308300260037726, 0.1819263990709037}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311352$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.39983906500233735`, 0.7425582635757695}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311356$311698, FEPrivate`Not[DynamicChart`click$311356$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311356$311698, {{{1., 0}, {0, 1.}}, { 0.16825070656623622`, 0.10812816349111953`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311356$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.05711986642890521, 0.39983906500233735`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311360$311698, FEPrivate`Not[DynamicChart`click$311360$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311360$311698, {{{1., 0}, {0, 1.}}, { 0.1970707671695386, 0.034104438526524776`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311360$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.5140787978601478, -0.05711986642890521}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311364$311698, FEPrivate`Not[DynamicChart`click$311364$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311364$311698, {{{1., 0}, {0, 1.}}, { 0.1918985947228995, -0.056346511368285904`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311364$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.8567979964335799, -0.5140787978601478}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311368$311698, FEPrivate`Not[DynamicChart`click$311368$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311368$311698, {{{1., 0}, {0, 1.}}, { 0.1548283221278165, -0.12660249076177407`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311368$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.5422363935804437`, -0.8567979964335799}]}], StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311385$311698, FEPrivate`Not[DynamicChart`click$311385$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311385$311698, {{{1., 0}, {0, 1.}}, { 0.07256154107012823, -0.18637280584229046`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311385$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.6846337221585506`, -1.5422363935804437`}]}], StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311389$311698, FEPrivate`Not[DynamicChart`click$311389$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311389$311698, {{{1., 0}, { 0, 1.}}, {-0.10327949232779238`, -0.17126980605031783`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311389$311698}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.6846337221585506`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311393$311698, FEPrivate`Not[DynamicChart`click$311393$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311393$311698, {{{1., 0}, { 0, 1.}}, {-0.1948023833884667, -0.04529935348515289}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311393$311698}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 14]& , TagBoxNote -> "14"], StyleBox["14", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[14, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311348$311698, FEPrivate`Not[DynamicChart`click$311348$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311348$311698, {{{1., 0}, { 0, 1.}}, {-0.13938751373105868`, 0.14342636095179273`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311348$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 7]& , TagBoxNote -> "7"], StyleBox["7", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[7, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311352$311698, FEPrivate`Not[DynamicChart`click$311352$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311352$311698, {{{1., 0}, {0, 1.}}, { 0.08308300260037726, 0.1819263990709037}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311352$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311356$311698, FEPrivate`Not[DynamicChart`click$311356$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311356$311698, {{{1., 0}, {0, 1.}}, { 0.16825070656623622`, 0.10812816349111953`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311356$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311360$311698, FEPrivate`Not[DynamicChart`click$311360$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311360$311698, {{{1., 0}, {0, 1.}}, { 0.1970707671695386, 0.034104438526524776`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311360$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311364$311698, FEPrivate`Not[DynamicChart`click$311364$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311364$311698, {{{1., 0}, {0, 1.}}, { 0.1918985947228995, -0.056346511368285904`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311364$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311368$311698, FEPrivate`Not[DynamicChart`click$311368$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311368$311698, {{{1., 0}, {0, 1.}}, { 0.1548283221278165, -0.12660249076177407`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311368$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 6]& , TagBoxNote -> "6"], StyleBox["6", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[6, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311385$311698, FEPrivate`Not[DynamicChart`click$311385$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311385$311698, {{{1., 0}, {0, 1.}}, { 0.07256154107012823, -0.18637280584229046`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311385$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 10]& , TagBoxNote -> "10"], StyleBox["10", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[10, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311389$311698, FEPrivate`Not[DynamicChart`click$311389$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311389$311698, {{{1., 0}, { 0, 1.}}, {-0.10327949232779238`, -0.17126980605031783`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311389$311698}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311393$311698, FEPrivate`Not[DynamicChart`click$311393$311698]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311393$311698, {{{1., 0}, { 0, 1.}}, {-0.1948023833884667, -0.04529935348515289}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311393$311698}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["November"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["April", Style[ "April", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["April"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["April"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311486$311710 = False, DynamicChart`click$311490$311710 = False, DynamicChart`click$311494$311710 = False, DynamicChart`click$311498$311710 = False, DynamicChart`click$311502$311710 = False, DynamicChart`click$311506$311710 = False, DynamicChart`click$311510$311710 = False, DynamicChart`click$311514$311710 = False, DynamicChart`click$311518$311710 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.6, 0.6, 0.6]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.8849555921538759`, 3.141592653589793}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311486$311710, FEPrivate`Not[DynamicChart`click$311486$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311486$311710, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, 0.11755705045849466`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311486$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.2094395102393194, 1.8849555921538759`}]}], StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311490$311710, FEPrivate`Not[DynamicChart`click$311490$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311490$311710, {{{1., 0}, {0, 1.}}, { 0.10000000000000003`, 0.17320508075688773`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311490$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 1., 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.2094395102393194, 0.2094395102393194}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311494$311710, FEPrivate`Not[DynamicChart`click$311494$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311494$311710, {{{1., 0}, {0, 1.}}, { 0.2, 0}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311494$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.0471975511965974`, -0.2094395102393194}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311498$311710, FEPrivate`Not[DynamicChart`click$311498$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311498$311710, {{{1., 0}, {0, 1.}}, { 0.1618033988749895, -0.11755705045849459`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311498$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.2, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.4660765716752362`, -1.0471975511965974`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311502$311710, FEPrivate`Not[DynamicChart`click$311502$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311502$311710, {{{1., 0}, {0, 1.}}, { 0.06180339887498958, -0.19021130325903068`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311502$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.4]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.8849555921538759`, -1.4660765716752362`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311506$311710, FEPrivate`Not[DynamicChart`click$311506$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311506$311710, {{{1., 0}, { 0, 1.}}, {-0.020905692653530622`, \ -0.19890437907365469`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311506$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.3038346126325155`, -1.8849555921538759`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311510$311710, FEPrivate`Not[DynamicChart`click$311510$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311510$311710, {{{1., 0}, { 0, 1.}}, {-0.10000000000000005`, -0.1732050807568877}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311510$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.7227136331111543`, -2.3038346126325155`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311514$311710, FEPrivate`Not[DynamicChart`click$311514$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311514$311710, {{{1., 0}, { 0, 1.}}, {-0.16180339887498954`, -0.11755705045849457`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311514$311710}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.7227136331111543`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311518$311710, FEPrivate`Not[DynamicChart`click$311518$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311518$311710, {{{1., 0}, { 0, 1.}}, {-0.19562952014676116`, -0.04158233816355186}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311518$311710}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311486$311710, FEPrivate`Not[DynamicChart`click$311486$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311486$311710, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, 0.11755705045849466`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311486$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 4]& , TagBoxNote -> "4"], StyleBox["4", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[4, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311490$311710, FEPrivate`Not[DynamicChart`click$311490$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311490$311710, {{{1., 0}, {0, 1.}}, { 0.10000000000000003`, 0.17320508075688773`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311490$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311494$311710, FEPrivate`Not[DynamicChart`click$311494$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311494$311710, {{{1., 0}, {0, 1.}}, { 0.2, 0}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311494$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311498$311710, FEPrivate`Not[DynamicChart`click$311498$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311498$311710, {{{1., 0}, {0, 1.}}, { 0.1618033988749895, -0.11755705045849459`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311498$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311502$311710, FEPrivate`Not[DynamicChart`click$311502$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311502$311710, {{{1., 0}, {0, 1.}}, { 0.06180339887498958, -0.19021130325903068`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311502$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311506$311710, FEPrivate`Not[DynamicChart`click$311506$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311506$311710, {{{1., 0}, { 0, 1.}}, {-0.020905692653530622`, \ -0.19890437907365469`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311506$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311510$311710, FEPrivate`Not[DynamicChart`click$311510$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311510$311710, {{{1., 0}, { 0, 1.}}, {-0.10000000000000005`, -0.1732050807568877}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311510$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311514$311710, FEPrivate`Not[DynamicChart`click$311514$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311514$311710, {{{1., 0}, { 0, 1.}}, {-0.16180339887498954`, -0.11755705045849457`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311514$311710}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311518$311710, FEPrivate`Not[DynamicChart`click$311518$311710]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311518$311710, {{{1., 0}, { 0, 1.}}, {-0.19562952014676116`, -0.04158233816355186}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311518$311710}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["April"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["September", Style[ "September", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["September"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["September"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311567$311735 = False, DynamicChart`click$311571$311735 = False, DynamicChart`click$311575$311735 = False, DynamicChart`click$311579$311735 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {2.243994752564138, 3.141592653589793}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311567$311735, FEPrivate`Not[DynamicChart`click$311567$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311567$311735, {{{1., 0}, { 0, 1.}}, {-0.18019377358048383`, 0.08677674782351165}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311567$311735}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-0.4487989505128276, 2.243994752564138}]}], StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311571$311735, FEPrivate`Not[DynamicChart`click$311571$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311571$311735, {{{1., 0}, {0, 1.}}, { 0.12469796037174673`, 0.15636629649360598`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311571$311735}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-2.243994752564138, -0.4487989505128276}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311575$311735, FEPrivate`Not[DynamicChart`click$311575$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311575$311735, {{{1., 0}, {0, 1.}}, { 0.04450418679126289, -0.19498558243636474`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311575$311735}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -2.243994752564138}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311579$311735, FEPrivate`Not[DynamicChart`click$311579$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311579$311735, {{{1., 0}, { 0, 1.}}, {-0.18019377358048383`, -0.08677674782351165}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311579$311735}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311567$311735, FEPrivate`Not[DynamicChart`click$311567$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311567$311735, {{{1., 0}, { 0, 1.}}, {-0.18019377358048383`, 0.08677674782351165}}, {{ 1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311567$311735}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 3]& , TagBoxNote -> "3"], StyleBox["3", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[3, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311571$311735, FEPrivate`Not[DynamicChart`click$311571$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311571$311735, {{{1., 0}, {0, 1.}}, { 0.12469796037174673`, 0.15636629649360598`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311571$311735}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311575$311735, FEPrivate`Not[DynamicChart`click$311575$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311575$311735, {{{1., 0}, {0, 1.}}, { 0.04450418679126289, -0.19498558243636474`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311575$311735}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311579$311735, FEPrivate`Not[DynamicChart`click$311579$311735]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311579$311735, {{{1., 0}, { 0, 1.}}, {-0.18019377358048383`, -0.08677674782351165}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311579$311735}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["September"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { Item[ Pane[ Annotation[ EventHandler[ MouseAppearance[ Mouseover["October", Style[ "October", FontColor -> RGBColor[ 0.27450980392156865`, 0.5372549019607843, 0.792156862745098]]], "LinkHand"], {"MouseClicked", 1} :> TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][{ Key["October"]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ 1263850458][ GeneralUtilities`Slice[ Key["October"]]], "Mouse"], ImageSize -> {{81., Full}, Automatic}], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}], Pane[ Annotation[ RawBoxes[ GraphicsBox[{{}, {}, DynamicModuleBox[{ DynamicChart`click$311618$311758 = False, DynamicChart`click$311622$311758 = False, DynamicChart`click$311626$311758 = False, DynamicChart`click$311630$311758 = False}, {{ Directive[ RGBColor[0.5, 0.5, 1.], EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]]], {{{{{{}, {{ Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.6, 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {1.8849555921538759`, 3.141592653589793}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311618$311758, FEPrivate`Not[DynamicChart`click$311618$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311618$311758, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, 0.11755705045849466`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311618$311758}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0.4, 0.4, 0.8]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {0.6283185307179586, 1.8849555921538759`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311622$311758, FEPrivate`Not[DynamicChart`click$311622$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311622$311758, {{{1., 0}, {0, 1.}}, { 0.06180339887498949, 0.1902113032590307}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311622$311758}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[1., 0., 0.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-1.8849555921538759`, 0.6283185307179586}]}], StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311626$311758, FEPrivate`Not[DynamicChart`click$311626$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311626$311758, {{{1., 0}, {0, 1.}}, { 0.1618033988749895, -0.11755705045849463`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311626$311758}]]}, { Directive[ EdgeForm[ Directive[ GrayLevel[0], Opacity[0.5]]], RGBColor[0., 0.2, 1.]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[2.5], Opacity[0.66]}], {}, {}], DiskBox[{0, 0}, 1., {-3.141592653589793, -1.8849555921538759`}]}], StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311630$311758, FEPrivate`Not[DynamicChart`click$311630$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311630$311758, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, -0.11755705045849466`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311630$311758}]]}}}}}, {}}, {{}}}}, {{{{ GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311618$311758, FEPrivate`Not[DynamicChart`click$311618$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311618$311758, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, 0.11755705045849466`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311618$311758}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311622$311758, FEPrivate`Not[DynamicChart`click$311622$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311622$311758, {{{1., 0}, {0, 1.}}, { 0.06180339887498949, 0.1902113032590307}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311622$311758}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 2]& , TagBoxNote -> "2"], StyleBox["2", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[2, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311626$311758, FEPrivate`Not[DynamicChart`click$311626$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311626$311758, {{{1., 0}, {0, 1.}}, { 0.1618033988749895, -0.11755705045849463`}}, {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> {DynamicChart`click$311626$311758}]], GeometricTransformationBox[ TagBox[ TagBox[ TooltipBox[ TagBox[{{}, {}}, StatusArea[#, 1]& , TagBoxNote -> "1"], StyleBox["1", { GrayLevel[0], FontFamily -> "Arial"}, StripOnInput -> False]], Annotation[#, Style[1, { GrayLevel[0], FontFamily -> "Arial"}], "Tooltip"]& ], EventHandlerTag[{ "MouseClicked" :> FEPrivate`Set[DynamicChart`click$311630$311758, FEPrivate`Not[DynamicChart`click$311630$311758]], PassEventsDown -> True, Method -> "Preemptive", PassEventsUp -> True}]], Dynamic[ If[ DynamicChart`click$311630$311758, {{{1., 0}, { 0, 1.}}, {-0.16180339887498948`, -0.11755705045849466`}}, \ {{1, 0}, {0, 1}}, {{1, 0}, {0, 1}}], TrackedSymbols :> { DynamicChart`click$311630$311758}]]}, {}}}, {}}, {}, {}}, DynamicModuleValues :> {}], {{{}, {}}}, {{{{}, {}, {}, \ {}}}, {}}}, {PlotRangeClipping -> True, Frame -> True, FrameStyle -> GrayLevel[0.85], Ticks -> None, FrameTicks -> None, Axes -> None, ImageSize -> 96, ContentSelectable -> False, GridLinesStyle -> Directive[ GrayLevel[0.5, 0.4]], LabelStyle -> { GrayLevel[0], FontFamily -> "Arial"}, PlotRange -> {{-1., 1.}, {-1., 1.}}, PlotRangePadding -> Scaled[0.09166666666666669]}]], TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ GeneralUtilities`Slice[ Key["October"]]], "Mouse"], ImageSize -> {{60, Full}, Automatic}, Alignment -> {Left, Baseline}]}}, BaseStyle -> {ContextMenu -> { MenuItem["Copy position to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], MenuItem["Copy data to clipboard", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`copyClip]], MenuEvaluator -> Automatic], Delimiter, MenuItem["Paste position in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentPosition[ TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic], MenuItem["Paste data in new cell", KernelExecute[ TypeSystem`NestedGrid`PackagePrivate`toCurrentData[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`cellPaste]], MenuEvaluator -> Automatic]}, FontFamily -> "Verdana", FontSize -> 12}, Alignment -> Left, RowMinHeight -> 1.5, Dividers -> All, FrameStyle -> GrayLevel[0.85], BaseStyle -> {FontFamily -> "Verdana", FontSize -> 12}], LineBreakWithin -> False, ContextMenu -> {}, NumberMarks -> False, ShowAutoStyles -> False]], TypeSystem`NestedGrid`PackagePrivate`initialQ = True, TypeSystem`NestedGrid`PackagePrivate`self = $Failed}, Dynamic[ TypeSystem`NestedGrid`PackagePrivate`setupViewPath[ TypeSystem`NestedGrid`PackagePrivate`$path$$, If[ Not[TypeSystem`NestedGrid`PackagePrivate`initialQ], Module[{TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = $Failed, TypeSystem`NestedGrid`PackagePrivate`tmpData$ = TypeSystem`NestedGrid`PackagePrivate`LookupCacheValue[ TypeSystem`NestedGrid`PackagePrivate`$state$$["Data"]]}, TypeSystem`NestedGrid`PackagePrivate`tmpGrid$ = If[TypeSystem`NestedGrid`PackagePrivate`tmpData$ === TypeSystem`NestedGrid`PackagePrivate`$NotCached, TypeSystem`NestedGrid`PackagePrivate`renderedGrid, TypeSystem`NestedGrid`PackagePrivate`renderGrid[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458][ TypeSystem`NestedGrid`PackagePrivate`tmpData$]]; If[ Not[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]], TypeSystem`NestedGrid`PackagePrivate`renderedGrid = TypeSystem`NestedGrid`PackagePrivate`tmpGrid$]; Null]]; TypeSystem`NestedGrid`PackagePrivate`initialQ = False; TypeSystem`NestedGrid`PackagePrivate`$pos$$; If[ FailureQ[TypeSystem`NestedGrid`PackagePrivate`renderedGrid], TypeSystem`SparseGrid[ TypeSystem`H["(data no longer present)"]], If[GeneralUtilities`$DebugMode, Row[{TypeSystem`NestedGrid`PackagePrivate`renderedGrid, " ", TypeSystem`NestedGrid`PackagePrivate`formatState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$]}], TypeSystem`NestedGrid`PackagePrivate`renderedGrid]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$pos$$}], DynamicModuleValues :> {}], TypeSystem`NestedGrid`PackagePrivate`$posCell$$, TypeSystem`NestedGrid`PackagePrivate`$topBar$$ = Dynamic[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`makeFramedBar[ TypeSystem`PackageScope`Pathbar[ TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`updateState[ TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$path$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$, 1263850458]]]], TrackedSymbols :> {TypeSystem`NestedGrid`PackagePrivate`$path$$}], TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$ = Framed[ Dynamic[ Replace[ MouseAnnotation[Null], { TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][Null] -> "", TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[1263850458][ Pattern[TypeSystem`NestedGrid`PackagePrivate`path, Blank[]]] :> ( TypeSystem`NestedGrid`PackagePrivate`$lastPath = TypeSystem`NestedGrid`PackagePrivate`path; TypeSystem`NestedGrid`PackagePrivate`makePathTrail[ TypeSystem`NestedGrid`PackagePrivate`path, TypeSystem`NestedGrid`PackagePrivate`makePathElements]), Null :> Spacer[10], Blank[] :> Spacer[10]}], TrackedSymbols :> {}], FrameStyle -> None, ImageMargins -> 0, FrameMargins -> 0, Alignment -> Top, ImageSize -> {Automatic, 14}]}, DynamicBox[ ToBoxes[ Column[ If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, { TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}, { TypeSystem`NestedGrid`PackagePrivate`$topBar$$, TypeSystem`NestedGrid`PackagePrivate`displayScrollBar[ TypeSystem`NestedGrid`PackagePrivate`$grid$$, TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$pos$$], TypeSystem`NestedGrid`PackagePrivate`onDesktopShow[ TypeSystem`NestedGrid`PackagePrivate`alignBar[ TypeSystem`NestedGrid`PackagePrivate`$state$$][ TypeSystem`NestedGrid`PackagePrivate`$bottomBar$$]]}], Spacings -> If[TypeSystem`NestedGrid`PackagePrivate`$path$$ == {}, 0, {{}, {0, 0.05, 0}}]], StandardForm], ImageSizeCache -> {189., {514.134033203125, 519.865966796875}}, TrackedSymbols :> { TypeSystem`NestedGrid`PackagePrivate`$state$$, TypeSystem`NestedGrid`PackagePrivate`$grid$$}], BaseStyle -> {LineBreakWithin -> False}, Deinitialization :> TypeSystem`NestedGrid`PackagePrivate`deleteState[ TypeSystem`NestedGrid`PackagePrivate`$state$$], DynamicModuleValues :> {}, Initialization :> Block[{$ContextPath = $ContextPath}, Needs["TypeSystem`"]]], Deploy, DefaultBaseStyle -> "Deploy"]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("Dataset[<>]"& )]], "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.704132478403183*^9}] }, Open ]] }, Open ]] }, ClosingSaveDialog->False, WindowSize->{808, 846}, WindowMargins->{{-1144, Automatic}, {45, 43}}, WindowTitle->"Mister Rogers' Sweater Colors | Example Notebook", Visible->True, DockedCells->{}, FrontEndVersion->"13.2 for Mac OS X x86 (64-bit) (November 18, 2022)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[642, 23, 36, 0, 70, "Subsection",ExpressionUUID->"1973caf0-3b16-45ef-94bc-db03902427e2"], Cell[681, 25, 162, 2, 70, "Text",ExpressionUUID->"9f282de5-271b-40b7-946a-83fdb9d71106"], Cell[CellGroupData[{ Cell[868, 31, 343, 8, 70, "Input",ExpressionUUID->"de00623b-a06a-43fe-9dec-053b84c0cb05"], Cell[1214, 41, 99048, 1844, 70, "Output",ExpressionUUID->"dbf3818b-ce73-4c11-8c2f-e13c2e482e00"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[100311, 1891, 351, 5, 70, "Subsection",ExpressionUUID->"9045740a-bcb4-440e-9b18-b89aaa883dfb"], Cell[100665, 1898, 404, 5, 70, "Text",ExpressionUUID->"7c9e071c-23e5-4819-bb29-4b773ee6df26"], Cell[CellGroupData[{ Cell[101094, 1907, 1403, 35, 70, "Input",ExpressionUUID->"40927246-2037-436a-9111-64b3c9289928"], Cell[102500, 1944, 507336, 10866, 70, "Output",ExpressionUUID->"f8102026-d653-4356-99dc-05e00f884225"] }, Open ]], Cell[609851, 12813, 423, 5, 70, "Text",ExpressionUUID->"898dfa4d-8856-40dc-ac01-a0616d61bac9"], Cell[CellGroupData[{ Cell[610299, 12822, 879, 21, 70, "Input",ExpressionUUID->"2a151750-60b2-427d-acc5-f0fe9c4dbc11"], Cell[611181, 12845, 7252, 178, 70, "Output",ExpressionUUID->"dd3020fa-973a-4e36-ad68-3b39f7e481b0"] }, Open ]], Cell[618448, 13026, 457, 7, 70, "Text",ExpressionUUID->"50a9e30a-0147-4dd4-84b3-1aac7fed840f"], Cell[CellGroupData[{ Cell[618930, 13037, 909, 23, 70, "Input",ExpressionUUID->"fb504fd3-76a3-45a3-91d8-3dca9ee0cd11"], Cell[619842, 13062, 204769, 4360, 70, "Output",ExpressionUUID->"397a113b-30f0-462a-93ee-8e8a92d2ea11"] }, Open ]], Cell[CellGroupData[{ Cell[824648, 17427, 911, 23, 70, "Input",ExpressionUUID->"c38d8f17-aac3-46a6-8892-f20872a55096"], Cell[825562, 17452, 279376, 5942, 70, "Output",ExpressionUUID->"f3d3c4ef-d81c-4707-b66a-44a81f0ae89a"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)