(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 548772, 13531] NotebookOptionsPosition[ 529591, 13112] NotebookOutlinePosition[ 531351, 13164] CellTagsIndexPosition[ 531308, 13161] WindowTitle->RecordsSummary | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(5)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->644364796], Cell["Summarize a vector of numbers:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778584957328423*^9, 3.778584979660367*^9}}, CellID->611815071], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", "100"}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583662959978*^9}, { 3.778584840992298*^9, 3.778584841384425*^9}, {3.778681241482809*^9, 3.7786812678166943`*^9}, {3.778681324981306*^9, 3.778681329005924*^9}}, CellLabel->"In[1]:=", CellID->212522592], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.788364638841273`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "5.9724035989121145`"}]}, {"\<\"Median\"\>", RowBox[{"-", "1.6134890173021628`"}]}, {"\<\"Mean\"\>", RowBox[{"-", "0.4856435687805951`"}]}, {"\<\"3rd Qu\"\>", "5.00191583793919`"}, {"\<\"Max\"\>", "9.98062452099746`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778583664329051*^9, 3.778584841853203*^9, 3.7786062418926477`*^9, 3.7786066402887278`*^9, 3.778679532218795*^9, {3.778679593797565*^9, 3.7786796165618887`*^9}, 3.7786796739889402`*^9, 3.778679832997581*^9, 3.7786812681479197`*^9, 3.7786813295064507`*^9, 3.7786822456486464`*^9, 3.7786822866653337`*^9}, CellLabel->"Out[1]=", CellID->342988610] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->787296252], Cell["Summarize a matrix of strings and specify the column names:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778584957328423*^9, 3.778584995691251*^9}, { 3.778602023939871*^9, 3.778602032378319*^9}, {3.778682317413468*^9, 3.778682346561445*^9}}, CellID->820975443], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"sarr", "=", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", "20"}], "]"}], ",", RowBox[{"RandomWord", "[", RowBox[{"\"\\"", ",", "20"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"sarr", ",", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583662959978*^9}, { 3.778584840992298*^9, 3.778584841384425*^9}, {3.778584999946435*^9, 3.778585019103347*^9}, {3.778589378946919*^9, 3.778589379406481*^9}, { 3.7786020353704357`*^9, 3.778602043471384*^9}, {3.7786823491070967`*^9, 3.778682477930565*^9}}, CellLabel->"In[1]:=", CellID->638118361], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 random letter\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"D\"\>", "2"}, {"\<\"G\"\>", "2"}, {"\<\"I\"\>", "2"}, {"\<\"O\"\>", "2"}, {"\<\"S\"\>", "2"}, {"\<\"T\"\>", "2"}, {"\<\"(Other)\"\>", "8"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 random word\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"ascribe\"\>", "1"}, {"\<\"capsicum\"\>", "1"}, {"\<\"cropper\"\>", "1"}, {"\<\"encrypt\"\>", "1"}, {"\<\"filtration\"\>", "1"}, {"\<\"hear\"\>", "1"}, {"\<\"(Other)\"\>", "14"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7786823985098886`*^9, 3.778682414020213*^9}, { 3.778682453130061*^9, 3.778682478302412*^9}}, CellLabel->"Out[1]=", CellID->168435583] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1441358197], Cell["Summarize a vector of numbers with missing values:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7786813010725307`*^9, 3.778681318925953*^9}}, CellID->537451583], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"RandomSample", "[", RowBox[{"Join", "[", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", "100"}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Missing", "[", "]"}], ",", "4"}], "]"}]}], "]"}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778681338750873*^9, 3.7786813593931923`*^9}}, CellLabel->"In[1]:=", CellID->590529427], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.864078419535936`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "5.163553857765887`"}]}, {"\<\"Median\"\>", RowBox[{"-", "0.739200202801019`"}]}, {"\<\"Mean\"\>", RowBox[{"-", "0.4130410471731924`"}]}, {"\<\"3rd Qu\"\>", "3.8528199332673765`"}, {"\<\"Max\"\>", "9.894383410173042`"}, {"\<\"Missing[___]\"\>", "4"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778681322325452*^9, 3.7786813509987993`*^9}, 3.77868206783673*^9, 3.778682245691514*^9, 3.778682286704081*^9}, CellLabel->"Out[1]=", CellID->916685375] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1291678819], Cell["\<\ Summarize a full 2D array with numerical and categorical columns (numbers, \ strings, and symbols):\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.77858502751897*^9, 3.7785850344487953`*^9}, { 3.7785851352054167`*^9, 3.778585153543391*^9}, {3.7785852412383947`*^9, 3.7785852551550694`*^9}, {3.778681372498598*^9, 3.778681372982493*^9}}, CellID->335720918], Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "200"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"arr", "=", RowBox[{"Flatten", "/@", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"MapAt", "[", RowBox[{"ToLowerCase", ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"All", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[ExponentialE]", ",", "\[ImaginaryI]", ",", "\[CapitalGamma]"}], "}"}], ",", "n"}], "]"}]}], "}"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778585279029354*^9, 3.778585285485841*^9}, { 3.778585781013956*^9, 3.778585781451531*^9}, {3.778586134648794*^9, 3.7785861352322693`*^9}, {3.7785861844096117`*^9, 3.778586273657926*^9}, { 3.778586370127515*^9, 3.778586372409463*^9}, {3.778596276331737*^9, 3.7785964334113417`*^9}, {3.7785964936068077`*^9, 3.778596593318696*^9}, { 3.778596721334202*^9, 3.778596721781822*^9}, 3.7786813670225897`*^9}, CellLabel->"In[1]:=", CellID->962553592], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "arr", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583662959978*^9}, { 3.7785851013672*^9, 3.7785851199505167`*^9}, {3.778585159182123*^9, 3.77858517613548*^9}, {3.778585207050366*^9, 3.7785852276714363`*^9}, { 3.7785852751045427`*^9, 3.778585291618374*^9}, {3.778585787684513*^9, 3.7785857947477007`*^9}}, CellLabel->"In[2]:=", CellID->487636156], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 column 2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 column 3\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 column 4\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 column 5\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778583664329051*^9, {3.778585115570018*^9, 3.778585120357267*^9}, { 3.778585228994788*^9, 3.7785852579495363`*^9}, 3.7785852940053253`*^9, 3.7785857950971947`*^9, 3.7785861368320503`*^9, 3.7785862751209106`*^9, 3.778586374307794*^9, 3.778587395769451*^9, {3.7785965803629923`*^9, 3.778596595633894*^9}, 3.778596723355136*^9, 3.778606241940711*^9, 3.7786066403639517`*^9, 3.778679532284956*^9, {3.77867959384839*^9, 3.778679616623481*^9}, 3.778679674047832*^9, 3.778679833064748*^9, 3.7786813782564087`*^9, 3.778682245729743*^9, 3.778682286740728*^9}, CellLabel->"Out[2]=", CellID->99523271] }, Open ]], Cell["Summarize a dataset:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778585305252619*^9, 3.778585310517274*^9}, 3.7785857335583563`*^9, {3.778602073216752*^9, 3.778602094580274*^9}, { 3.7786021295017347`*^9, 3.778602129996419*^9}}, CellID->683680975], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"Dataset", "[", "arr", "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583763548526*^9}, { 3.77858390986963*^9, 3.7785839769100924`*^9}, {3.778584501427535*^9, 3.778584502865631*^9}, {3.778585758334724*^9, 3.778585762158557*^9}, { 3.77858580356843*^9, 3.77858580429959*^9}, {3.7785966702576733`*^9, 3.7785966749804897`*^9}, {3.778596730344008*^9, 3.778596730657712*^9}, { 3.77868084589675*^9, 3.778680882081326*^9}}, CellLabel->"In[3]:=", CellID->726096189], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778583964022846*^9, 3.778583977311606*^9}, 3.778584825551426*^9, 3.778585581331245*^9, 3.7785856767542143`*^9, 3.778585759189137*^9, 3.778585805033785*^9, 3.778586139812977*^9, 3.778586381821598*^9, {3.778596655407751*^9, 3.77859667544029*^9}, 3.778596731069653*^9, {3.778606241984527*^9, 3.778606269076683*^9}, 3.778606640435729*^9, 3.778679532344461*^9, {3.7786795939143953`*^9, 3.778679616677596*^9}, 3.778679674100259*^9, 3.7786798331282454`*^9, { 3.7786808465921497`*^9, 3.778680882680822*^9}, 3.778682245742058*^9, 3.778682286773325*^9}, CellLabel->"Out[3]=", CellID->585088798] }, Open ]], Cell["Summarize a dataset with column names:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778585305252619*^9, 3.778585310517274*^9}, 3.7785857335583563`*^9, {3.778602073216752*^9, 3.778602094580274*^9}, { 3.7786021295017347`*^9, 3.778602129996419*^9}, {3.778680837586628*^9, 3.778680840489369*^9}}, CellID->241822484], Cell[BoxData[ RowBox[{ RowBox[{"ds", "=", RowBox[{ RowBox[{"Dataset", "[", "arr", "]"}], "[", RowBox[{"All", ",", RowBox[{ RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "#"}], "]"}], "&"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584505802436*^9, 3.778584537336824*^9}, 3.778584823181785*^9, {3.778585594452361*^9, 3.778585599446268*^9}, { 3.778585637031931*^9, 3.778585674328209*^9}, {3.778585738061111*^9, 3.7785858014536753`*^9}, {3.778586143301951*^9, 3.778586143715995*^9}, { 3.778596657960989*^9, 3.778596661536813*^9}, {3.7785967257883253`*^9, 3.7785967260005407`*^9}}, CellLabel->"In[4]:=", CellID->788629173], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "ds", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583763548526*^9}, { 3.77858390986963*^9, 3.7785839769100924`*^9}, {3.778584501427535*^9, 3.778584502865631*^9}, {3.778585758334724*^9, 3.778585762158557*^9}, { 3.77858580356843*^9, 3.77858580429959*^9}, {3.7785966702576733`*^9, 3.7785966749804897`*^9}, {3.778596730344008*^9, 3.778596730657712*^9}}, CellLabel->"In[5]:=", CellID->617298977], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.778680852243393*^9, 3.77868224578265*^9, 3.778682286816595*^9}, CellLabel->"Out[5]=", CellID->935414465] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->333723410], Cell["Summarize an association of vectors:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778681517637712*^9, 3.7786815408351316`*^9}}, CellID->608453598], Cell[BoxData[ RowBox[{ RowBox[{"asc", "=", RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"Range", "[", "10", "]"}], "\[Rule]", RowBox[{"Table", "[", RowBox[{ RowBox[{"Append", "[", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{"1", ",", "2"}], "]"}], ",", RowBox[{"RandomWord", "[", "]"}]}], "]"}], ",", "10"}], "]"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778681660750711*^9, 3.7786816696524773`*^9}}, CellLabel->"In[1]:=", CellID->428315645], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"asc", ",", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7786813995618677`*^9, 3.778681467191579*^9}, { 3.778681507233931*^9, 3.7786815111365843`*^9}, {3.7786815446751757`*^9, 3.7786816580517263`*^9}}, CellLabel->"In[2]:=", CellID->288302114], Cell[BoxData[ RowBox[{ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "3"}, {"\<\"Mean\"\>", "5.5`"}, {"\<\"Median\"\>", "5.5`"}, {"\<\"3rd Qu\"\>", "8"}, {"\<\"Max\"\>", "10"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}], "\[Rule]", RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.0031001305498514764`"}, {"\<\"1st Qu\"\>", "0.23547729819283858`"}, {"\<\"Mean\"\>", "0.5105537663374927`"}, {"\<\"Median\"\>", "0.5459112958811708`"}, {"\<\"3rd Qu\"\>", "0.8272044635394529`"}, {"\<\"Max\"\>", "0.9943318513003794`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 column 2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.10413178175694582`"}, {"\<\"1st Qu\"\>", "0.2587655182008597`"}, {"\<\"Median\"\>", "0.44503808277181967`"}, {"\<\"Mean\"\>", "0.4709749489381466`"}, {"\<\"3rd Qu\"\>", "0.6517632785948835`"}, {"\<\"Max\"\>", "0.9459341673474384`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 column 3\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"elephant\"\>", "1"}, {"\<\"expectorate\"\>", "1"}, {"\<\"gusto\"\>", "1"}, {"\<\"jar\"\>", "1"}, {"\<\"magic\"\>", "1"}, {"\<\"operating\"\>", "1"}, {"\<\"(Other)\"\>", "4"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778681616919621*^9, 3.778681639393935*^9}, 3.778681670929557*^9, 3.778682245907701*^9, 3.778682286939764*^9}, CellLabel->"Out[2]=", CellID->304219246] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(4)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->625340094], Cell["Define a dataset:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7785859456915617`*^9, 3.7785859916693087`*^9}, 3.7786031195518093`*^9, 3.779038248778358*^9, {3.859301388667245*^9, 3.859301391593398*^9}}, CellID->435928457], Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "200"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"arr", "=", RowBox[{"Flatten", "/@", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"MapAt", "[", RowBox[{"ToLowerCase", ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"All", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[ExponentialE]", ",", "\[ImaginaryI]", ",", "\[CapitalGamma]"}], "}"}], ",", "n"}], "]"}]}], "}"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->1737348337], Cell[BoxData[ RowBox[{ RowBox[{"ds", "=", RowBox[{ RowBox[{"Dataset", "[", "arr", "]"}], "[", RowBox[{"All", ",", RowBox[{ RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "#"}], "]"}], "&"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584505802436*^9, 3.778584537336824*^9}, 3.778584823181785*^9, {3.778585594452361*^9, 3.778585599446268*^9}, { 3.778585637031931*^9, 3.778585674328209*^9}, {3.778585738061111*^9, 3.7785858014536753`*^9}, {3.778586143301951*^9, 3.778586143715995*^9}, { 3.778596657960989*^9, 3.778596661536813*^9}, {3.7785967257883253`*^9, 3.7785967260005407`*^9}}, CellLabel->"In[2]:=", CellID->1582856882], Cell[TextData[{ "A larger number of categorical values can be seen using the option ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7785859456915617`*^9, 3.7785859916693087`*^9}, 3.7786031195518093`*^9, 3.779038248778358*^9}, CellID->695856405], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", ",", RowBox[{"\"\\"", "\[Rule]", "12"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77858581784783*^9, 3.778585832695211*^9}}, CellLabel->"In[3]:=", CellID->335610403], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"H\"\>", "9"}, {"\<\"J\"\>", "9"}, {"\<\"N\"\>", "9"}, {"\<\"Y\"\>", "9"}, {"\<\"D\"\>", "8"}, {"\<\"(Other)\"\>", "93"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"s\"\>", "10"}, {"\<\"v\"\>", "10"}, {"\<\"e\"\>", "9"}, {"\<\"i\"\>", "9"}, {"\<\"q\"\>", "9"}, {"\<\"(Other)\"\>", "83"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778585828107436*^9, 3.778585833023527*^9}, 3.778586146352063*^9, 3.7785863852419167`*^9, 3.778587399379025*^9, { 3.778606242077119*^9, 3.778606297253542*^9}, 3.778606640524544*^9, 3.7786795324246273`*^9, {3.7786795940071497`*^9, 3.778679616754468*^9}, 3.778679674199753*^9, 3.778679833273975*^9, 3.778682245991949*^9, 3.778682287023875*^9}, CellLabel->"Out[3]=", CellID->493729250] }, Open ]], Cell["\<\ The function works with missing values and summarizes them separately of the \ rest of the values in a column:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.778585995584674*^9, 3.77858604968578*^9}}, CellID->205108667], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", "[", RowBox[{"All", ",", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"#", ">", "2"}], ",", RowBox[{"Missing", "[", "]"}], ",", "#"}], "]"}], "&"}], ")"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"(", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"ToCharacterCode", "[", "#", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], ">", "76"}], ",", RowBox[{"Missing", "[", "]"}], ",", "#"}], "]"}], "&"}], ")"}]}]}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778585861338176*^9, 3.778585940359727*^9}, { 3.778586056493795*^9, 3.778586100166257*^9}, {3.7785861500956697`*^9, 3.778586150523818*^9}, {3.778587012523745*^9, 3.77858701993545*^9}, { 3.778587092581504*^9, 3.7785870994975357`*^9}, {3.778587411423023*^9, 3.77858741642657*^9}}, CellLabel->"In[4]:=", CellID->795263724], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "7.28725191149661`"}]}, {"\<\"Median\"\>", RowBox[{"-", "4.392111680967162`"}]}, {"\<\"Mean\"\>", RowBox[{"-", "4.180573337078875`"}]}, {"\<\"3rd Qu\"\>", RowBox[{"-", "1.3812121773447723`"}]}, {"\<\"Max\"\>", "1.8715334799394014`"}, {"\<\"Missing[___]\"\>", "91"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"B\"\>", "9"}, {"\<\"H\"\>", "9"}, {"\<\"J\"\>", "9"}, {"\<\"D\"\>", "8"}, {"\<\"(Other)\"\>", "35"}, { RowBox[{"Missing", "[", "]"}], "108"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778585917720016*^9, 3.77858593451374*^9}, { 3.7785860876889067`*^9, 3.778586100624156*^9}, 3.778586150774969*^9, 3.7785863882458153`*^9, 3.778586849086813*^9, 3.778586963672114*^9, { 3.778586994811081*^9, 3.778587020309842*^9}, {3.7785870885750313`*^9, 3.778587099898424*^9}, {3.7785874009910097`*^9, 3.7785874167942142`*^9}, 3.7786062421088057`*^9, 3.778606640584964*^9, 3.778679532478544*^9, { 3.778679594044685*^9, 3.778679616802335*^9}, 3.77867967424608*^9, 3.778679833332527*^9, 3.7786822460249777`*^9, 3.778682287060343*^9}, CellLabel->"Out[4]=", CellID->987527422] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->278351700], Cell["Here we make a list of date objects with missing values:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778595089165333*^9, 3.778595136899387*^9}}, CellID->611898442], Cell[BoxData[ RowBox[{ RowBox[{"dateObjs", "=", RowBox[{"RandomSample", "[", RowBox[{"Join", "[", RowBox[{ RowBox[{"DateObject", "/@", RowBox[{"DateRange", "[", RowBox[{ RowBox[{"{", RowBox[{"2011", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"2019", ",", "12", ",", "31"}], "}"}], ",", RowBox[{"Quantity", "[", RowBox[{"3", ",", "\"\\""}], "]"}]}], "]"}]}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Missing", "[", "]"}], ",", RowBox[{"{", "4", "}"}]}], "]"}]}], "]"}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785949896123333`*^9, 3.7785949937773457`*^9}, { 3.778595112060288*^9, 3.778595198618104*^9}, {3.778679791075006*^9, 3.7786798170490932`*^9}}, CellLabel->"In[5]:=", CellID->91964261], Cell["\<\ Here is the summary of the date objects list and with a specified column name:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.77859510385763*^9, 3.778595108594117*^9}, { 3.778595171809119*^9, 3.778595184171691*^9}, {3.7786819802342157`*^9, 3.778681997840282*^9}}, CellID->160285205], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"dateObjs", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778589718231942*^9, 3.778589775781721*^9}, { 3.77859498726476*^9, 3.778594996137355*^9}, {3.778679808940466*^9, 3.778679820733259*^9}, {3.7786820007221746`*^9, 3.7786820406133204`*^9}, { 3.778682266518735*^9, 3.77868227024102*^9}}, CellLabel->"In[6]:=", CellID->251581869], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 date object\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", TemplateBox[{ RowBox[{"\"Sat 1 Jan 2011 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2011", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"1st Qu\"\>", TemplateBox[{ RowBox[{"\"Fri 15 Feb 2013 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2013", ",", "2", ",", "15", ",", "0", ",", "0", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"Median\"\>", TemplateBox[{ RowBox[{"\"Sat 16 May 2015 12:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2015", ",", "5", ",", "16", ",", "12", ",", "0", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"Mean\"\>", TemplateBox[{ RowBox[{"\"Sun 17 May 2015 06:40:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2015", ",", "5", ",", "17", ",", "6", ",", "40", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"3rd Qu\"\>", TemplateBox[{ RowBox[{"\"Wed 16 Aug 2017 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2017", ",", "8", ",", "16", ",", "0", ",", "0", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"Max\"\>", TemplateBox[{ RowBox[{"\"Tue 1 Oct 2019 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2019", ",", "10", ",", "1", ",", "0", ",", "0", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}, {"\<\"Missing[___]\"\>", "4"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778595100837763*^9, 3.778595167539364*^9, 3.778595200824785*^9, 3.778606242149982*^9, 3.778606640656065*^9, 3.778679532555277*^9, { 3.778679594087103*^9, 3.77867961685331*^9}, 3.778679674740499*^9, { 3.778679821533071*^9, 3.7786798333963423`*^9}, {3.77868201354602*^9, 3.77868204101545*^9}, {3.77868224606427*^9, 3.778682287100897*^9}}, CellLabel->"Out[6]=", CellID->80065118] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1037638734], Cell["Here we make an association of random images:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7785890230898867`*^9, 3.778589033057523*^9}}, CellID->112853907], Cell[BoxData[ RowBox[{ RowBox[{"asc", "=", RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"Range", "[", "40", "]"}], "\[Rule]", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"RandomImage", "[", RowBox[{"4", ",", RowBox[{"{", RowBox[{"40", ",", "12"}], "}"}]}], "]"}], ",", "5"}], "]"}], ",", "40"}], "]"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778589034801162*^9, 3.778589069013393*^9}}, CellLabel->"In[7]:=", CellID->796645345], Cell["This summarizes the list of rules in the association:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778589112798369*^9, 3.778589128875272*^9}}, CellID->390575210], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "asc", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785883307265673`*^9, 3.778588403868355*^9}, { 3.778588451302216*^9, 3.7785885193067017`*^9}, {3.778588938243574*^9, 3.778588939200267*^9}, 3.7785890185700283`*^9, {3.778589072973014*^9, 3.7785890744249907`*^9}}, CellLabel->"In[8]:=", CellID->21058234], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { RowBox[{"1", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVUXlUD/gDjDadUm1KooOQKB2ulu9npuj6pktZKrqL0kZFWuXKkVKOiBId WEeUIneKTX7xK0SH5EiOUsmx/Dbsb237x8x78+a9mfdmDIOWzQ0bKCMjE6vQ T3MDV9nExAT+6jnoXxEaGGllGfmvqdIP436YfJWwUrMbTp3K9LF6L8wN4vnz SHvuSdXnhsnyLNi4DeqHGlCh8RZtulKqzK1CkM9n4dWiT+nxNOQ81uabZX5s eL4Vk0bpsKdqOhs8/GmvpgKX3jniUv4pfDENoJzCIZF3zIzxPeNoG5YDNZ0X kuQcdzYfjWXWXjeOObYYuT9OYuZmFyRXfpTkbo3nAtM/UXrTA2PPSTk54wHq Zq9kt8MJlJytE6YXEtir6kfzR9vw7bA2ewtU0JgoeNvHgveqI3Asez4LwsM4 0jqat8Y48OXoEGbI18Axdhodb93AKbtNImanEXckjOb4DcspbTVByjwXZo32 EoHf/aHelT9zwLM6FA9uEWumeuFZaqL4wumsUxtH+7Z3sD47CO/fP5SsnbKO fwcqQO1iAjUuxzE3fSY6nUrQbJ6GvpqNWOHRLvaaFIsum0zctm7EqB0T6T/t OlZs/Iq2pMO4phrKLTprYZuZij26g/gw+Bc+PZvA7nPfoHleHtGX1lA75TCc h37EvuQoyn+JpoNeBMtPTGWG1TIebunPDBnPidlG1HDz4F9yvnisqkAPHTtm KDzD7z3uyLY9JPFub4B/tBcjf9uCkC5N2Dv5srulBeHF4bjsHMhXeddxpWse 4gy78OwPJbp8uov1q+S4+XUASnVzEDBLQu0CE8reuCnilFfzaE61mN97DT5R tnB/4wG3w5uQ35OFa65ebN79Gv5aFdCcdV8YNjbOGLLJhfMt/enXZMqhx4dz jIjEySkHcV13PO4vTcTuEyUS0zptmCg60bU2mvsv9Ag9mX1osN+Pof8rg7fh //EhwZEv9DuQF2XGNpt4KtTrsUF2CBzyTamYlIVqm0VMrBvGCTUzWRU9hk8D nBkg1Dmq3JFHQttEeoY2217KMuKDK3/flSUST49Chq0G9zlYY+RrwVEapjyS vJqvCmbT2zicZxqs0e1kK2KvVmHFuR7cPe9NxZVTOaJtFtufxHBKnoHk1NsW LJ/hCbVuK44NWoomA1nenpkkWo10+T7eV1gNNeIfeockY4vUsLS+HZMrYrhb L4AdXxL4aMRFeG6/guRnFvh+QpExhQdQZx8C18Rg5vxQIXbRk93Fegz4tpSj izyZozmHzX5j6eddhMLSAbSy04Jj0iJ66VWjrH/vckkp4ho1mFpZB82SCWw7 VYosqQsbTGV5dEc5tJAMXY8RVMufLBIN5Lmr7zuS0tOx0luV6t5vxMO7Vpxm ZsOVRR0QspcwTsmTYQP248HsFjwqvo3bn+4jNV0VSh8GcXvzJgybYMUjVZF0 6llL5UkDqaebAhMLJb5y1kSnpRzXhExi2eN38GuV8hdFd1qkrxP1yQsp+8aJ vy2z5M2gnULBKBIB6y2ZOkOOGuV7hfUsE768txs99xqQEKaBBYpyaPQFt0md ER5ugNBJA2HXdxLfjKNYWXhHMtH7NMKjKxB9xR6N160p92os7TKDMCypA3Mu b8DcfDOxpVWDg0MLYS614t3LoWScPjKDVFntKU+jsGBOPPAcHyotGRHlzasH VflwULUkOEFJFLwP5PKTUhq/3gzVp+poau/BguM/8c4QF15NcRHNmsq0/75T 6NZKqbt0HDf79IkyJz/YKNuKHf+NpG/ZCXH+1xU06LNDmqE6ax0WMDlhGPV0 MuAvcWfGy17MUPTp73QUUZ5lyP37EgpNZPnJPAk2EaexJ+gjvNtOYLWbEivy S9FVOxsXa9zwk0U81ao6YDNsO3SOrUXnHTNoha7hA6tT8I5aKco3aLLpll3/ H5txQOJHxTozLjQfwRaZTthnD8H206+Fh74mkxzXMbvwKGL3fMGPndbIbgsW 4SbzJK11vQhvr8PbIxGi1WGKuFB8HGlblZEWnYaWNVKOVNNi0ydfNiWpc5ui M97dW4wfovNx5thnEVJrzLgSVzoNtGBQgIS9M1ZTzV4q6kPz8bygEAOmDqZb 0XkkfzSg/pID4vGf81kT4Ms9ynqYWuqHjAo5Pml24l/bP2Hh+HEzK+Zr01hl vYiMUeZC1xTxWb5S6FxpEgEl0/l+H/EftXQsvmHOfSO2SYovanNVx008XrgT H5ZMZpGPH50WZCLQZ4lwf6vH3OAghmd+hW+eBktW6PLdQRm6edWgfLo9K0ry ofWwFj+vrRAOISlY7ajBvPsnEf+cmJa2ivn1igx5YkWLkEVsuGoorIPMqRBq zhdn7DlS151vVKKQ+y0Zww94si9qOLOWrWVuXyzP1g7m3i9VsPy7Hiebwlm0 KVpIZyeyPdsb3ddnsMbAn/8AE+Il/g== "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, { RowBox[{"2", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVkHlUDXgDhttVYqhGi0yTdNv3CLm/9/XZysjaZild6ipuaTtKC0kmTYNE Uw26nMqSZQopEdFII8tXSCFLYXzR0NDY+cwfz3vOc97/HoslK+fK1VRUVOK1 v85cWeLEuDjZ6nla/0q4TOHupvj31PuKzVfqzFajuziEAWOncdazf+B2+jBi bkXQaUqV9L65EXvu74aT23PUntVlga0PR073I2VHwbhCsbW8Bd6utlS2BmJg 2nS+j3Hj2jRHZBQtlFYUSLjqzrcc6V2F53WxnJQxhIF6pKNVAJWT+7BetRZp z0GfyARY3nuLLTcEjf5YTEWyCmt+mckjyc7ioZs7ny21oqtBMgdrB7KweAi0 N7uI36eNYKOlmSiKU1Ds1GXh3GhuGJQlcgxUaDOvQdSn+vH2oqfiWokptf0N 8E2dOWeX/QxM9sOUD0bMfvQGn3d5CUXgGn60icW7Haq8XvoGrQu8mFL/AJse OWCoeworNtuy7IUbqvIj6Vop2N++UTqw7irsLffD47gdVT1dROsuKVJywE+5 kbT2WQ/N8X9iwk1N/FbTh7fLpnOW7mn0FTkzdIAFR6kbiBODZ3C0ci+cH+SK 234raaMIYHS+BXt3ZiLieZf0VL8Dzlfp89EdU5rXpPF17gAmulzAY3N31hRe hLzcif6xYdx2qBJDTAvQtcqLIZcXsrb9I7oS/oKLkyqvuMfTwsCDWh2JjO0s ExtHJnKn1IhaJo14+DpEujDHlGd95FQp9KNu8jC+mePNJ00OIrmb3OMZwO7j K3mvI5RTd0voOEiPxXkKOjVNpqGbD5Nc06FxUwmDBk2Gm6nR5ZyEj7R0GGCj Cj3fD+Ko4jxyT52DDb3Zt04dlR1tQuqxGep/JmDx2QmU+y2jSYE9Xty2xrHi ExOy/jsC1a3+0sqGCpQHxzKz4cqE3pRKjGtWYsyjWlgsbEV+515c7+xBfeZd XDhQitxNVuJCrCVzEs8j7W0YXhUlcJ2WMRcs6kedMgh9v5aCY5P4onEyT3XX QRm9gjExr5G+Lg+fIrLFsXE9sGrNQd89itFtw5m8ZxqrF9dDTSGhvucIJoUO 4gffcUyV1eNBu6cYH+UM+5UedG+XsSHWA72ZXzBJXiXaSrS4z+glrr7S5LPc gTSeeFQ0r2uDcqoOB5sESh8P24xNz25hw9BLMHJdwKJVOoSOjHk9/TD+ezav pn/H4Eur6XwpkqlnrbhP9gCjZneh6KSEUlkpzuTZoXqqKS43n0VW6EkM263O rVnRIszRARqmOjR/kszHHn2IiRnFQstO9KQPYH6ZXNjbzGLexXnsiZoDj/4l 8O825OmmcxjbekXEDM8RSfV2PPZuNBUpaeJaQbLIeVYOkyUtCAwKZHSIjE7y YJrnfs+RCU+gZa8BjaczkTN0Da0l30FTz4PnQ4Zzm6456wxLxIiEZbT9WIes 9Gwc+HgRGV9bF5c7U183TzgYmTM2zhjxmh1wn2FPRaYv9+fEsrHMSng6VOCM STg8M0fTTmLIRS1yDhiagrD6H+ic5MP4yDvSljoNNhw2ZsP7QQxfYcxtr6RY UvwJzdcSmFHpyFMt7+GxvAQHfwzjzQfdGNoWBWWDrdT/4F74VOtRWXEE4z5H 0K00lN4RIbi7vAlm/qG81aoQs+Yl4vLjDVjzcBmvn3+Ip3p+PGjZK0yTnqP6 xEa0NsuYahWNMdur8cw3jHE751D1P6n8WaHD0kyB+UEurJpnwZ7prvx+0kb0 ZkfRVE0btx52YpXjXmSaWVFlhzV2TKvAL/KdMM5/Ly6f92at/H/oilrD9dtm MyfVnb3ZbjwldWTofguWOOtg60Z9pvyUwLvv9mK74Rnh/3gcc1+OR4e7hLX1 ggWjOhGoPRb3lcfxa5UFauJ+R2e6G/VrguH3zx1hNmqLePfAncufhDOxxYrJ 7RNh0NSFH7WX8pKGgg2Jqnz9dh9KgzO9gp4eQ/4uNXY0TKDXND9Kso5hQVoE C4+s4KeF6ZijtOZfTVfEy5PbMcarAId3L+CbVg8Ym7Si6aKULU4pvHrShEti NGjYNpOV1yTsvLOWP2i347TWXOG/ZwlvLItD90RLpv3ULA3XfYnev3UQeTiZ QfsNebc8hg+NNel1cQhi9dbyxMEkli+34HVfwZoj78SGIymsmuEm9hk14miw AiZFhlyncQHB6h1C/cZiHlKuZcmGy0hNtURl5XhmlMtomhHE+REDGV/pz6fp rmjXUmHJYQe+9tkCC7W1aBxjx37D33DLCdRZ5cmmk7Zi0LcmnJ5hxb5bA/ml pA6+y+2gH7mUE6d8lJY5xzNaYsbbIbXCWtOXUddfiPka8dI1A8cy9tpnFH8Z yeKOmTxwyITZcnPKZ5nBKecbRnUv5447BfC9tBXHT0u4a7E38149weA/bIT/ al8GDCjF7BYp/w9r4SYE "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, { RowBox[{"3", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVlWs01XkfxY97SSUOTi7jKA8SuT8j+v++WzgISSQ1kssp58mRVEjnRKhU IyYmNVTT5XSMVjwyDU2mpJuwUE9XSjcalCmm6Koe82Lvtfba++VnrW0Rl7x4 tSqPx9swYdwWx6Z7rV8fmxGm+U9YFSt1cZb+U+qMy2ZcV0/4IzFZQg/X5pKb 1xyc/fqRSeUKprM4E91fbaFTbQxf68lQ/OpEyg3+1P3QjbQX8ZGZJELvUTWy 6l1EE/usAVdTBLZxFLLUEJ/6UmjuO2vcUHVCXnkshfra4ITl99RU+g0CooOw 5HAexTdbwm7/Ac591xpalp1Dh6sWQbxwOdqEznj4+ybW2iFGmECb3PV9ofH8 NnkL1qHQeZSzmRlM116dIeoZITN3EU7pJ3DqD8LI3iWRdp7hw8tHBMvsOiqe tgIHKg0wFGLMrvy5g64Jn3DJZZqw+KuC3Lz1sSzRgd25VU+KyDxyrciE8rI5 1i1oYEcqrTxVwl5TQNFcjIg6yfGOgh4disTrU/7Iif/ImeZrY2uZJ4I/mGFO uj/OFmtTuLSR5C4j1OplRcfKFqB0ewktNgvHyVYR6ldroSbTAsslWmzToClp R3jAPzWIzmnb4nz4O9aQvgkXBx6Q6ORrrubCE9oicKB78kDYH7xI0n3+RPNS 8TjgFbe8qJiuRkVh56ss6OhdobzYxUiLTsDjjAAKeWbBNmbyEDAph03ZZIWC hDrKORPLhH4Mej90kv3Hw/RsvhcKjsmxZPd6yJ8bYxI5g1eWiP4fHaGSK4cK J0a6ko9+g3k4uoZD48lj9CWqmeW3z4f8TTxGTzQztW+LqaPiKxWemw15SyY3 Nbefnv7MR/dAF6s0zKbYXD1Er8uCXLgaakfdobExBAadMgT8PUKFPyUguimH Bvaow8lsBqtqecnGsp6TeXUwubWM0u736VjQPxNv34cg674r6v1KaKdzHK7M toFtmR9d3GOKHHcG18F8avbzJR3drnk9DvFonG5AjVF8TE+W4lagJXMMjqJJ Qn8yvhpHelenUmWGnFnx4thNixOsyf4IM/pQRr319tAbCsRh7hArVBfi+MUc entJBdEd1iSV2SI1eogLG9lL+2u3Uru+J/bnRYBfq4rQm0E4VidEZdcHrlWs SZVcAlaGZlBR8Hq0Oy+k4lPm9Ka2jSQyPYpplyHmP+5Ufl8L26zE6Da2Q/SO tTDs0cV1xwo68Pc29ljyiZmsXApdqSpao8xh84cJpLZp1LerhorTHNHtLsPP 00vossQXN74UskJ5OElqo1BVNQk6w6c9E90mQn1hBGTjvIR/Tac1K5dji6UL PnyKg3eOBAelSqbtI8QDk2+x4QYPv9n3Ev/dE1rimIyppv54L7tBJoM+mPlW BwHjmzxJEkmSBFCbkIp5cw7RUfs2etIhxefoDO5uhRBKjzvUrdlJJZUC7OkQ waZ8M0pXiCHaFYRkEwfUBXVRzF17mq7ug3V+c1DrfYq+fBRCpOghhUYO+Q0L MFK2BfdcbSExj8RY6xBp9i2k1ypjVOhxmz2ef4HER36h9iWRqLdqnJfakzdO aRJOJm5gA4189KaKcfCXIiKd2aio80BTUgayw34lo4VJeHltFkYfvqWqzlFS /Z2Hg3ZpKCl5QNt3NpCPMJE2K8JZ3TemNJoSD/0X16lp/2lidJGKfG/SZ2N3 shjWQ2tbGBdXNw1HDzfR8C4Cv24jxVy3A/9uIKQH1ZAlnY8PtZoI4VRwkgWh P08TJS/U0eY2Rn/EauCsMgm3vo9AT+Rx0vWuplK7UJx7+T9q/uyHveJnrNy3 mZQuTmjoiEC+jYKc78fQoMYqGAZM4PaVy/D+thttbpWhdocRnrZoILvfBL2e KzHn0FMqbe9ih1wa6FFPCKrK0xA5sBYNM1uYbEyMshKgd8pjCrxnxK16Phne +cDeFDFKeApm8DIFt29okFmLL2aJJkPQYowBxGL4uQyymkB6k19PDdsNKNjw Et1d9o7eqfIQoTcTB2ZMgn3aRBx3daAvlglk51hLRhd0EXpvCjlWp8PZS0kW Kq7wtDIhZUg8ytqfUjC/jsakfEybn4of3X2QubqajEM9IDCSQ99sBQyLC6hA cItCevXh8GoVXtWnoNY6irVm/5er6puF2B8m4qmAYf+/GH5y8qE4sTrLPeGB 3Z5OXKDWF2YpeEIK8Sj19Z2nwlwR5paupvCJtXR6qT3qD9iwoVtvSBI+TMej UxDeraSh2wWkbh0GR7u7VL9LHa34Nwb1i4gtuMe90HVGpw0fO8oMYZk+l1yr r3F/RRDbtyCf+T1wxpnPmnT9WShpXf+OElbE4VxVEAwtXdi1GRowwguWOf4/ 00x00OagBeVWH86IJ4FazFqst3KlfC6dup4doz+3mGPCp8u0u2aA6rdJWNb5 ybigMGMFDTHjX/mIdl5yoP8DAN8dLQ== "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, { RowBox[{"4", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwViXk8FPgfh6f8ipzlHBEZUkNWUsg23887lSGNM7YLMyPThlyTMP0sO5YU QvWqaJXtZlmV0PXLWWrTdmybKSpNSiLdqa2tX/vH87xez+uxkSYEy0ZzOBy5 1lcFS1LnJSdL0kPG/hvRkjjXmXH/Tt2vTPvKovOZ2CyqplG1kfjIk+CE3Wkq PbYO2zgKGPydQT2fXLDV+S491ROCvdenwqku5Mj5QGl9CXD5aRSO6Vvhi+97 GqmxRgp3K8XbtVDPs2ek/dMn6mfmuJkxRB9zYlFxq59iXOVo/3yQvS1wYr/n mCPVsZxKPfSZTrIdcUIyyaRkFJJExiQcSMLEM89Ir0ZFU67NQ92UHqpclYh3 GfvJptMPhUGhaLuuC8fj3+HQxK3EIjKpJsIGbeld5Osspf/6h+PMaX8a1h2h tSaBKBs3IOAphcjS+ZlKukWYXSFE1SxbejkmCve9QjDLxp+tDzJAN9+X+FJr OF1eiHM6HEhP7WODomDU3/gBgUFviFdWIFh37jz7o9uesfHH6DKHi0c+Bnj+ jWruNnc9qCoV8MqrJqsj/ljRfomtSfNmfxVOQ/baPdTgyMMPz58wjcgl5HtI gYw+M9Sd98DDFm9KO+uOhiJbqFzDELzLlrhOu6lpmgLKmEuE/H7SWvGeHWx3 wyakwrJJSi9tLtI7R0tkb1iH0R/8MGz6TJD/sYoZLYnDKlkC1RU8Yu2aSmp7 tBAnpY44HVnDYoLVdGI1cL/5PO3gJ0G49SG5qrRpXSkXc6J9IJwvhspZhofH TjL7vGTMUvZS7qX1GJPqgyzJDdLUt8TEwJkIi3VFouEitOwfIO2wqchru8e0 sk3AaxNRe3k+i760l+VeiIXurrlUInYj8/JatpQAh5urMVwwDQmBmtiiqiWr ktUQuniS/fUyOsFPm3vOewItthcjolmOaGchPhbXCAb3AUaqw6Qs1seFqWb4 /JiR/gIjdGZwaMGCX2nC7le0Y3k3/WK9EgVxzohZkYk/lp6kwQ4LeA4fpG3+ ngia3kO+Y8SQaFrjVMJGQZGoiQ5a9JF5rREquWswqC6mSKM1aJSbo/VZJHrv jseBqHoWZlVKtpx/SJ0bCqeOxZiscYZm6AyQurWL3ZUF4kB/ukA25y2ZWeyl m2M6qHdvNVUNuUKUEo7bcjV79ZpD9+LVtHvjPJId4sPdYRkqJ3+PSmMpbIQt NFUSy6IiZLhhGIQ73zrijslDKnI6KXDR/0yVvQy5pVbI0W9gOR5XKFZZTcbO 2+m1xws6npOK0Xsr2EpzhsdyawpV+0HHrZGdGkrCg7YKsr07m0pmaqFQU4Eq Cxm9PiXGjgWa4M/OgPEqb2iEhSPrti07+OWawMeijz0Y3UNJX6QwkPXRrbHf IesGD1FZ70g3Xxc+6nBqxzmSdVhCOUPNatw1UH8zFJ0VVpS50Rm3pg9TYKQL tLd/YIrDC6HiBZBbuDecy1LQFbkcvX5RMMjzQr/RVbrFm46jdXKBw/o1+CfP AFz7GrJVWGJEO4dNrr5HP46bj50vWtjbDinyQv2Rls5H53/EMHgTgdamdGiJ RqjqsRHt/K2cXOc747ySj0uBUlzNz8TFimLWEbCB7Ma1EN8uGQrMoIaal5Q4 yR+W3vpUMVWM8Cce2Gd9gSY1grRGcWmIHwNpwCIUF0vxsTaB5K9G5j6Qa8Kk fSXNfh4FZf0v9EpXB0qTGExfImQpXatoQtkIvW3spV5zDj5VzMSd0CfskE09 BXm4IifWCf5nr9DTo/tZbH8BbbuXjs77KZiUw0Gd2Vh0T0rG/z6fJafBZQjv jqe+AD12wDUcB4qsqCk7EZQtglkyH6aNcTBgMdh+i4/LLXo4ZrGLhjYIkfqU sGdxK9Mtm4cfeQKkmjlSqBuDzjhPhEjuUrN1CsnqSqhMdIJmPd7KHKLWIffM DDikhcJwtA1067ezK6ZCmB/mYt/nvynhN0Dv0ER4+gTD9MgKnO1PRFBwFEnK ++jPvTzgKAe+VQEwOLOFrAzl6DbWwHaNAiowVeD4YXfYhVxlymY1rVbEQ/jI hiIi66nw4QBrKh8Dh9f1JLaeCf0tJUz8fRh8Bk+S6vZYitf0I2czc9SN3BQU LJwAJ+NIvPGchzsX6ymh9TQNd/1Mi6JmQPvwKIrPWIlan7Vwr5+M2CJv9muV C15oLIVsvgTNf6Zjg2oVu95wRHDA5A5tqkmjLxZeMN+ZzVq9ZoGnlc3msngy sTXE25dZJNuciUW/+8Ij+ATNEa9FK/ceNSYuZlV+coRfm4NvVo/H49pGlnZ5 MnKXL4XKrIg2j8yBW1EHKyn6RD1JTyl1ZQKa1VMgytMlQ7Edvs0LoA5vLuKy xPjLVoIhO0O8U0hhNDuMjkwzpa5lURgotUZnQxo8xy/DHit7XAyKxvSJ0Vjq NUjvuIvp+pNN9H9/Jxgz "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, { RowBox[{"5", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVUXlUD/gDjDadUm1KooOQKB2ulu9npuj6pktZKrqL0kZFWuXKkVKOiBId WEeUIneKTX7xK0SH5EiOUsmx/Dbsb237x8x78+a9mfdmDIOWzQ0bKCMjE6vQ T3MDV9nExAT+6jnoXxEaGGllGfmvqdIP436YfJWwUrMbTp3K9LF6L8wN4vnz SHvuSdXnhsnyLNi4DeqHGlCh8RZtulKqzK1CkM9n4dWiT+nxNOQ81uabZX5s eL4Vk0bpsKdqOhs8/GmvpgKX3jniUv4pfDENoJzCIZF3zIzxPeNoG5YDNZ0X kuQcdzYfjWXWXjeOObYYuT9OYuZmFyRXfpTkbo3nAtM/UXrTA2PPSTk54wHq Zq9kt8MJlJytE6YXEtir6kfzR9vw7bA2ewtU0JgoeNvHgveqI3Asez4LwsM4 0jqat8Y48OXoEGbI18Axdhodb93AKbtNImanEXckjOb4DcspbTVByjwXZo32 EoHf/aHelT9zwLM6FA9uEWumeuFZaqL4wumsUxtH+7Z3sD47CO/fP5SsnbKO fwcqQO1iAjUuxzE3fSY6nUrQbJ6GvpqNWOHRLvaaFIsum0zctm7EqB0T6T/t OlZs/Iq2pMO4phrKLTprYZuZij26g/gw+Bc+PZvA7nPfoHleHtGX1lA75TCc h37EvuQoyn+JpoNeBMtPTGWG1TIebunPDBnPidlG1HDz4F9yvnisqkAPHTtm KDzD7z3uyLY9JPFub4B/tBcjf9uCkC5N2Dv5srulBeHF4bjsHMhXeddxpWse 4gy78OwPJbp8uov1q+S4+XUASnVzEDBLQu0CE8reuCnilFfzaE61mN97DT5R tnB/4wG3w5uQ35OFa65ebN79Gv5aFdCcdV8YNjbOGLLJhfMt/enXZMqhx4dz jIjEySkHcV13PO4vTcTuEyUS0zptmCg60bU2mvsv9Ag9mX1osN+Pof8rg7fh //EhwZEv9DuQF2XGNpt4KtTrsUF2CBzyTamYlIVqm0VMrBvGCTUzWRU9hk8D nBkg1Dmq3JFHQttEeoY2217KMuKDK3/flSUST49Chq0G9zlYY+RrwVEapjyS vJqvCmbT2zicZxqs0e1kK2KvVmHFuR7cPe9NxZVTOaJtFtufxHBKnoHk1NsW LJ/hCbVuK44NWoomA1nenpkkWo10+T7eV1gNNeIfeockY4vUsLS+HZMrYrhb L4AdXxL4aMRFeG6/guRnFvh+QpExhQdQZx8C18Rg5vxQIXbRk93Fegz4tpSj izyZozmHzX5j6eddhMLSAbSy04Jj0iJ66VWjrH/vckkp4ho1mFpZB82SCWw7 VYosqQsbTGV5dEc5tJAMXY8RVMufLBIN5Lmr7zuS0tOx0luV6t5vxMO7Vpxm ZsOVRR0QspcwTsmTYQP248HsFjwqvo3bn+4jNV0VSh8GcXvzJgybYMUjVZF0 6llL5UkDqaebAhMLJb5y1kSnpRzXhExi2eN38GuV8hdFd1qkrxP1yQsp+8aJ vy2z5M2gnULBKBIB6y2ZOkOOGuV7hfUsE768txs99xqQEKaBBYpyaPQFt0md ER5ugNBJA2HXdxLfjKNYWXhHMtH7NMKjKxB9xR6N160p92os7TKDMCypA3Mu b8DcfDOxpVWDg0MLYS614t3LoWScPjKDVFntKU+jsGBOPPAcHyotGRHlzasH VflwULUkOEFJFLwP5PKTUhq/3gzVp+poau/BguM/8c4QF15NcRHNmsq0/75T 6NZKqbt0HDf79IkyJz/YKNuKHf+NpG/ZCXH+1xU06LNDmqE6ax0WMDlhGPV0 MuAvcWfGy17MUPTp73QUUZ5lyP37EgpNZPnJPAk2EaexJ+gjvNtOYLWbEivy S9FVOxsXa9zwk0U81ao6YDNsO3SOrUXnHTNoha7hA6tT8I5aKco3aLLpll3/ H5txQOJHxTozLjQfwRaZTthnD8H206+Fh74mkxzXMbvwKGL3fMGPndbIbgsW 4SbzJK11vQhvr8PbIxGi1WGKuFB8HGlblZEWnYaWNVKOVNNi0ydfNiWpc5ui M97dW4wfovNx5thnEVJrzLgSVzoNtGBQgIS9M1ZTzV4q6kPz8bygEAOmDqZb 0XkkfzSg/pID4vGf81kT4Ms9ynqYWuqHjAo5Pml24l/bP2Hh+HEzK+Zr01hl vYiMUeZC1xTxWb5S6FxpEgEl0/l+H/EftXQsvmHOfSO2SYovanNVx008XrgT H5ZMZpGPH50WZCLQZ4lwf6vH3OAghmd+hW+eBktW6PLdQRm6edWgfLo9K0ry ofWwFj+vrRAOISlY7ajBvPsnEf+cmJa2ivn1igx5YkWLkEVsuGoorIPMqRBq zhdn7DlS151vVKKQ+y0Zww94si9qOLOWrWVuXyzP1g7m3i9VsPy7Hiebwlm0 KVpIZyeyPdsb3ddnsMbAn/8AE+Il/g== "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, { RowBox[{"6", "\[Rule]", GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVkntczfcfx3N0kxSxrucUh8rppEMUZ/X9vF8RKRGVlHQ5bac76ZyTbkqz EjE9HGq26mfKpEy5rBaSkUvZJkbYL7GUxqopv9Zlil/74/V6PF6P13+v52tO RIJvJE9DQ0OpO2G+smQ3hUKW6qf9b5DL4hc7xv9b6k9o/oQ+dARTmnyYDLtq 6eO8Fpb6IBIJHQN046Um4tuy6E3aaToUYk2mos/Zmuf/sKLoRGjfMsBliQLC szL0j/VwxyOkpPjQRPLcQPQpm2kgzBVnFqfQgaYA9GfrIC4zih6kBCP6eDcL 6Z4KexchukSnSVRTSZqCSmqa3kUsMxS2HsF4tGU7uvZGouCCkO0ftYJ/kT/W XxAw05hGyv+mnK60e+Bxdiv3rE+A/syF+GTciP6XNwd+5Sr2jyqEdNc2UOol FSpiDOA1Oxkho9Y4sewnmrUjGtMCNmEg+hdSnermvh7VYzoqBsP1D9i72Zmw atXGqtTrJNT1wEevk6nfuoht2cOHroM1thrH4+QbHRipZ7PMi6dpjdk5KoUh LTr4MycusaHnlfeocFoETnv3UI3jp9Rm2UT11kNkt1UOZ9RRQ42EOnyKuKa3 1vAXbELiYhWzsJuE3KxINJpkQPIomOOcU7F/tgjNWxfBNiqcnDNe0AfLSgpu yiXjIwfpeHQLk+eLYFvnAG9REEZjt+G7wRr2pX48LmRtxKq4dvp0DLDSXAgz mZqdkwlR+dUCzH05hVz77XB06QHGn/qEhM2usOGusEE9RunjC6nlXRLsdLSh rvJA369tzIvnznR2etHqObFYp7xO/k4xVJcxCQV2YjSOxeL1sB3cbJeweL0R 4osWYMlBTyhsrtItr2A02MxBx0kHVM6YDJ9wIChNAHdJOtWYHaR7nBu0S8+S ns92lBvIcarHBS21EbDpAIVKiMJUK2DgZoAuYTJXrHhFkbvNUSWTw1WxhMQW k7mzBXNJ9lgMN6U9MrR8oQq8z9pfZ2J62g4UXa1j+Wod5AzrkMh2OZ4eWICT fx2hwUtDdGLx39xuJxFcnQIQd7+U5D4xsN5hiN82C8BrmYzSw7NwvlOD/owI Y5UnzWAaepSFWyrxzOgzKt8uwYzrvdydNk0y+15A+3y+5b7WUtH5+mt0e2cb y3MrpqwfhtmNhZHsaYmaukskZCzm4fqiQLxVp9Ci3d1kd0WPZBt8EbNkLRpM DrKUJDGMWlai10OAjyb+tnffdpx9kkf27TNQ3zkDZ7WzyD54PT4YpWFBjTue i4wQ+ugV7eVpQXmimg0VV1PPMSkkZkK8L7ZAQLULWh+uQsUfhJblK5FVmoYt dy6ww9/nUJSfCh6hWhDKV9Aam6mYl8RnntUTe7vMpQHNFHzboID9f/hk6e+I CnkmmZ/RIofPH5JCvZS6Evjozn5GWRnzcHvMCvqNVbRPP5foUivp2U/GplFv nLrYxC1TDtDdJ87kpxMPM5szFOEcDc6I0Hz7LokLzfCgopfG38uglJbRzKYs mrpDhfvCEMh0dfHTSDcVPoul1d6x8B1qZYd7hLhEFynmXS/ZDLaSNKyXfpxL ZDltC2Zot1PYmC2u1YGaR/QAsT7uPhZg29YRCinVwiG1O/ZfKaKq8/NRUFhG F9bcYserJAgscqIGlyMUXuZMJYZCtD0oYcocTYiFPEyXOmGXiZqirrWQp0c3 5YQ748eXn3G/Fnhix7gIpV4pONAnxpQmE/y+YD458qYiVv8vkq6RQPp7It6m B2IoSAKtQzeo/4UQikZPRASVcbap3lBzAuTJfSBob2ZfPaumV/N8wTvmA8cf /iSX8gYqupcA5R98JMdN8DF2JgR00obxRHo/lkuRu6zxzuJLWmYdygWlS2nf zdX4e+VGttSvmmo96sirMYnx3RTIvlrI0SwTXHz8ikJ0Q5Buaoalwe7ofLmH GxnSIHdPIQbjlqOsV0CFs6yQ9DKazOdXsIzkLeiJYZB13KHsClfwPDrJsXYS vktsIK8hPXQOXqX6vRzlVOQyQ1dvcsuVIv+3VPAdLKluYxySzlxmaZrR2Gaw ikYaVyJ8+TCVClQozp+H6E2+OJrIQ9Eb8wkm1XRxujvW3eRTYMNKlPmFgXdq Gfh73OA+cy4aY3bi+ugGtFqtY1OiZ6K95D3HizKH7zUnhAd+ghvK9Vx/WYLL Df9atmKxEu4fbFCyzwGviwUYnrOepP3m5H86DrtrDJC9tpL1bliHp/UMx0xv UnnrLuxhjfRG+oY8Hl4m5+YgMpX5oc/tv7TiC3N0q7dSeP5JmsZc8LSgnnSP XKIvjgHpC8XgP3ZFXmcjOStScPxjFZ2oaiXe82X0zR5t6M/z5kxqx5lG2gvW UquB2ZHXKNpiOobsQjGQsxZHd28m1YYwpG0OQsC5Si4nIwrq8xVsV4wU8gRX 9FgZw6vFGBbp89Hcl4r/A9jxE8c= "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}]}], "1"}, {"\<\"(Other)\"\>", "34"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778588371625779*^9, 3.7785884042824907`*^9}, { 3.77858845258366*^9, 3.7785885196818123`*^9}, {3.77858894031748*^9, 3.7785889506500893`*^9}, 3.778589001366495*^9, {3.778589075210165*^9, 3.778589088518497*^9}, 3.778606242200676*^9, 3.778606640730364*^9, 3.778679532623823*^9, {3.7786795941444273`*^9, 3.778679616914914*^9}, 3.7786796748970757`*^9, 3.7786798334667587`*^9, 3.778682246115679*^9, 3.77868228716538*^9}, CellLabel->"Out[8]=", CellID->495551100] }, Open ]], Cell[TextData[{ "We can summarize association\[CloseCurlyQuote]s keys and values separately \ using the option setting ", Cell[BoxData[ RowBox[{ TagBox[ ButtonBox[ StyleBox["Thread", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/Thread", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "\[Rule]", TagBox[ ButtonBox[ StyleBox["True", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]}]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778589145930526*^9, 3.778589206928031*^9}, 3.859301492703763*^9}, CellID->328442046], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"asc", ",", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785883307265673`*^9, 3.778588403868355*^9}, { 3.778588451302216*^9, 3.778588553473661*^9}, {3.778588617658463*^9, 3.778588702918603*^9}, {3.778589096229917*^9, 3.778589096565371*^9}, { 3.7785892146265078`*^9, 3.7785892148943577`*^9}}, CellLabel->"In[9]:=", CellID->149016170], Cell[BoxData[ RowBox[{ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "10.5`"}, {"\<\"Mean\"\>", "20.5`"}, {"\<\"Median\"\>", "20.5`"}, {"\<\"3rd Qu\"\>", "30.5`"}, {"\<\"Max\"\>", "40"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}], "\[Rule]", RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwViXk8FPgfh6f8ipzlHBEZUkNWUsg23887lSGNM7YLMyPThlyTMP0sO5YU QvWqaJXtZlmV0PXLWWrTdmybKSpNSiLdqa2tX/vH87xez+uxkSYEy0ZzOBy5 1lcFS1LnJSdL0kPG/hvRkjjXmXH/Tt2vTPvKovOZ2CyqplG1kfjIk+CE3Wkq PbYO2zgKGPydQT2fXLDV+S491ROCvdenwqku5Mj5QGl9CXD5aRSO6Vvhi+97 GqmxRgp3K8XbtVDPs2ek/dMn6mfmuJkxRB9zYlFxq59iXOVo/3yQvS1wYr/n mCPVsZxKPfSZTrIdcUIyyaRkFJJExiQcSMLEM89Ir0ZFU67NQ92UHqpclYh3 GfvJptMPhUGhaLuuC8fj3+HQxK3EIjKpJsIGbeld5Osspf/6h+PMaX8a1h2h tSaBKBs3IOAphcjS+ZlKukWYXSFE1SxbejkmCve9QjDLxp+tDzJAN9+X+FJr OF1eiHM6HEhP7WODomDU3/gBgUFviFdWIFh37jz7o9uesfHH6DKHi0c+Bnj+ jWruNnc9qCoV8MqrJqsj/ljRfomtSfNmfxVOQ/baPdTgyMMPz58wjcgl5HtI gYw+M9Sd98DDFm9KO+uOhiJbqFzDELzLlrhOu6lpmgLKmEuE/H7SWvGeHWx3 wyakwrJJSi9tLtI7R0tkb1iH0R/8MGz6TJD/sYoZLYnDKlkC1RU8Yu2aSmp7 tBAnpY44HVnDYoLVdGI1cL/5PO3gJ0G49SG5qrRpXSkXc6J9IJwvhspZhofH TjL7vGTMUvZS7qX1GJPqgyzJDdLUt8TEwJkIi3VFouEitOwfIO2wqchru8e0 sk3AaxNRe3k+i760l+VeiIXurrlUInYj8/JatpQAh5urMVwwDQmBmtiiqiWr ktUQuniS/fUyOsFPm3vOewItthcjolmOaGchPhbXCAb3AUaqw6Qs1seFqWb4 /JiR/gIjdGZwaMGCX2nC7le0Y3k3/WK9EgVxzohZkYk/lp6kwQ4LeA4fpG3+ ngia3kO+Y8SQaFrjVMJGQZGoiQ5a9JF5rREquWswqC6mSKM1aJSbo/VZJHrv jseBqHoWZlVKtpx/SJ0bCqeOxZiscYZm6AyQurWL3ZUF4kB/ukA25y2ZWeyl m2M6qHdvNVUNuUKUEo7bcjV79ZpD9+LVtHvjPJId4sPdYRkqJ3+PSmMpbIQt NFUSy6IiZLhhGIQ73zrijslDKnI6KXDR/0yVvQy5pVbI0W9gOR5XKFZZTcbO 2+m1xws6npOK0Xsr2EpzhsdyawpV+0HHrZGdGkrCg7YKsr07m0pmaqFQU4Eq Cxm9PiXGjgWa4M/OgPEqb2iEhSPrti07+OWawMeijz0Y3UNJX6QwkPXRrbHf IesGD1FZ70g3Xxc+6nBqxzmSdVhCOUPNatw1UH8zFJ0VVpS50Rm3pg9TYKQL tLd/YIrDC6HiBZBbuDecy1LQFbkcvX5RMMjzQr/RVbrFm46jdXKBw/o1+CfP AFz7GrJVWGJEO4dNrr5HP46bj50vWtjbDinyQv2Rls5H53/EMHgTgdamdGiJ RqjqsRHt/K2cXOc747ySj0uBUlzNz8TFimLWEbCB7Ma1EN8uGQrMoIaal5Q4 yR+W3vpUMVWM8Cce2Gd9gSY1grRGcWmIHwNpwCIUF0vxsTaB5K9G5j6Qa8Kk fSXNfh4FZf0v9EpXB0qTGExfImQpXatoQtkIvW3spV5zDj5VzMSd0CfskE09 BXm4IifWCf5nr9DTo/tZbH8BbbuXjs77KZiUw0Gd2Vh0T0rG/z6fJafBZQjv jqe+AD12wDUcB4qsqCk7EZQtglkyH6aNcTBgMdh+i4/LLXo4ZrGLhjYIkfqU sGdxK9Mtm4cfeQKkmjlSqBuDzjhPhEjuUrN1CsnqSqhMdIJmPd7KHKLWIffM DDikhcJwtA1067ezK6ZCmB/mYt/nvynhN0Dv0ER4+gTD9MgKnO1PRFBwFEnK ++jPvTzgKAe+VQEwOLOFrAzl6DbWwHaNAiowVeD4YXfYhVxlymY1rVbEQ/jI hiIi66nw4QBrKh8Dh9f1JLaeCf0tJUz8fRh8Bk+S6vZYitf0I2czc9SN3BQU LJwAJ+NIvPGchzsX6ymh9TQNd/1Mi6JmQPvwKIrPWIlan7Vwr5+M2CJv9muV C15oLIVsvgTNf6Zjg2oVu95wRHDA5A5tqkmjLxZeMN+ZzVq9ZoGnlc3msngy sTXE25dZJNuciUW/+8Ij+ATNEa9FK/ceNSYuZlV+coRfm4NvVo/H49pGlnZ5 MnKXL4XKrIg2j8yBW1EHKyn6RD1JTyl1ZQKa1VMgytMlQ7Edvs0LoA5vLuKy xPjLVoIhO0O8U0hhNDuMjkwzpa5lURgotUZnQxo8xy/DHit7XAyKxvSJ0Vjq NUjvuIvp+pNN9H9/Jxgz "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}], "12"}, { GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVkHlUDXgDhttVYqhGi0yTdNv3CLm/9/XZysjaZild6ipuaTtKC0kmTYNE Uw26nMqSZQopEdFII8tXSCFLYXzR0NDY+cwfz3vOc97/HoslK+fK1VRUVOK1 v85cWeLEuDjZ6nla/0q4TOHupvj31PuKzVfqzFajuziEAWOncdazf+B2+jBi bkXQaUqV9L65EXvu74aT23PUntVlga0PR073I2VHwbhCsbW8Bd6utlS2BmJg 2nS+j3Hj2jRHZBQtlFYUSLjqzrcc6V2F53WxnJQxhIF6pKNVAJWT+7BetRZp z0GfyARY3nuLLTcEjf5YTEWyCmt+mckjyc7ioZs7ny21oqtBMgdrB7KweAi0 N7uI36eNYKOlmSiKU1Ds1GXh3GhuGJQlcgxUaDOvQdSn+vH2oqfiWokptf0N 8E2dOWeX/QxM9sOUD0bMfvQGn3d5CUXgGn60icW7Haq8XvoGrQu8mFL/AJse OWCoeworNtuy7IUbqvIj6Vop2N++UTqw7irsLffD47gdVT1dROsuKVJywE+5 kbT2WQ/N8X9iwk1N/FbTh7fLpnOW7mn0FTkzdIAFR6kbiBODZ3C0ci+cH+SK 234raaMIYHS+BXt3ZiLieZf0VL8Dzlfp89EdU5rXpPF17gAmulzAY3N31hRe hLzcif6xYdx2qBJDTAvQtcqLIZcXsrb9I7oS/oKLkyqvuMfTwsCDWh2JjO0s ExtHJnKn1IhaJo14+DpEujDHlGd95FQp9KNu8jC+mePNJ00OIrmb3OMZwO7j K3mvI5RTd0voOEiPxXkKOjVNpqGbD5Nc06FxUwmDBk2Gm6nR5ZyEj7R0GGCj Cj3fD+Ko4jxyT52DDb3Zt04dlR1tQuqxGep/JmDx2QmU+y2jSYE9Xty2xrHi ExOy/jsC1a3+0sqGCpQHxzKz4cqE3pRKjGtWYsyjWlgsbEV+515c7+xBfeZd XDhQitxNVuJCrCVzEs8j7W0YXhUlcJ2WMRcs6kedMgh9v5aCY5P4onEyT3XX QRm9gjExr5G+Lg+fIrLFsXE9sGrNQd89itFtw5m8ZxqrF9dDTSGhvucIJoUO 4gffcUyV1eNBu6cYH+UM+5UedG+XsSHWA72ZXzBJXiXaSrS4z+glrr7S5LPc gTSeeFQ0r2uDcqoOB5sESh8P24xNz25hw9BLMHJdwKJVOoSOjHk9/TD+ezav pn/H4Eur6XwpkqlnrbhP9gCjZneh6KSEUlkpzuTZoXqqKS43n0VW6EkM263O rVnRIszRARqmOjR/kszHHn2IiRnFQstO9KQPYH6ZXNjbzGLexXnsiZoDj/4l 8O825OmmcxjbekXEDM8RSfV2PPZuNBUpaeJaQbLIeVYOkyUtCAwKZHSIjE7y YJrnfs+RCU+gZa8BjaczkTN0Da0l30FTz4PnQ4Zzm6456wxLxIiEZbT9WIes 9Gwc+HgRGV9bF5c7U183TzgYmTM2zhjxmh1wn2FPRaYv9+fEsrHMSng6VOCM STg8M0fTTmLIRS1yDhiagrD6H+ic5MP4yDvSljoNNhw2ZsP7QQxfYcxtr6RY UvwJzdcSmFHpyFMt7+GxvAQHfwzjzQfdGNoWBWWDrdT/4F74VOtRWXEE4z5H 0K00lN4RIbi7vAlm/qG81aoQs+Yl4vLjDVjzcBmvn3+Ip3p+PGjZK0yTnqP6 xEa0NsuYahWNMdur8cw3jHE751D1P6n8WaHD0kyB+UEurJpnwZ7prvx+0kb0 ZkfRVE0btx52YpXjXmSaWVFlhzV2TKvAL/KdMM5/Ly6f92at/H/oilrD9dtm MyfVnb3ZbjwldWTofguWOOtg60Z9pvyUwLvv9mK74Rnh/3gcc1+OR4e7hLX1 ggWjOhGoPRb3lcfxa5UFauJ+R2e6G/VrguH3zx1hNmqLePfAncufhDOxxYrJ 7RNh0NSFH7WX8pKGgg2Jqnz9dh9KgzO9gp4eQ/4uNXY0TKDXND9Kso5hQVoE C4+s4KeF6ZijtOZfTVfEy5PbMcarAId3L+CbVg8Ym7Si6aKULU4pvHrShEti NGjYNpOV1yTsvLOWP2i347TWXOG/ZwlvLItD90RLpv3ULA3XfYnev3UQeTiZ QfsNebc8hg+NNel1cQhi9dbyxMEkli+34HVfwZoj78SGIymsmuEm9hk14miw AiZFhlyncQHB6h1C/cZiHlKuZcmGy0hNtURl5XhmlMtomhHE+REDGV/pz6fp rmjXUmHJYQe+9tkCC7W1aBxjx37D33DLCdRZ5cmmk7Zi0LcmnJ5hxb5bA/ml pA6+y+2gH7mUE6d8lJY5xzNaYsbbIbXCWtOXUddfiPka8dI1A8cy9tpnFH8Z yeKOmTxwyITZcnPKZ5nBKecbRnUv5447BfC9tBXHT0u4a7E38149weA/bIT/ al8GDCjF7BYp/w9r4SYE "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}], "10"}, { GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVlWs01XkfxY97SSUOTi7jKA8SuT8j+v++WzgISSQ1kssp58mRVEjnRKhU IyYmNVTT5XSMVjwyDU2mpJuwUE9XSjcalCmm6Koe82Lvtfba++VnrW0Rl7x4 tSqPx9swYdwWx6Z7rV8fmxGm+U9YFSt1cZb+U+qMy2ZcV0/4IzFZQg/X5pKb 1xyc/fqRSeUKprM4E91fbaFTbQxf68lQ/OpEyg3+1P3QjbQX8ZGZJELvUTWy 6l1EE/usAVdTBLZxFLLUEJ/6UmjuO2vcUHVCXnkshfra4ITl99RU+g0CooOw 5HAexTdbwm7/Ac591xpalp1Dh6sWQbxwOdqEznj4+ybW2iFGmECb3PV9ofH8 NnkL1qHQeZSzmRlM116dIeoZITN3EU7pJ3DqD8LI3iWRdp7hw8tHBMvsOiqe tgIHKg0wFGLMrvy5g64Jn3DJZZqw+KuC3Lz1sSzRgd25VU+KyDxyrciE8rI5 1i1oYEcqrTxVwl5TQNFcjIg6yfGOgh4disTrU/7Iif/ImeZrY2uZJ4I/mGFO uj/OFmtTuLSR5C4j1OplRcfKFqB0ewktNgvHyVYR6ldroSbTAsslWmzToClp R3jAPzWIzmnb4nz4O9aQvgkXBx6Q6ORrrubCE9oicKB78kDYH7xI0n3+RPNS 8TjgFbe8qJiuRkVh56ss6OhdobzYxUiLTsDjjAAKeWbBNmbyEDAph03ZZIWC hDrKORPLhH4Mej90kv3Hw/RsvhcKjsmxZPd6yJ8bYxI5g1eWiP4fHaGSK4cK J0a6ko9+g3k4uoZD48lj9CWqmeW3z4f8TTxGTzQztW+LqaPiKxWemw15SyY3 Nbefnv7MR/dAF6s0zKbYXD1Er8uCXLgaakfdobExBAadMgT8PUKFPyUguimH Bvaow8lsBqtqecnGsp6TeXUwubWM0u736VjQPxNv34cg674r6v1KaKdzHK7M toFtmR9d3GOKHHcG18F8avbzJR3drnk9DvFonG5AjVF8TE+W4lagJXMMjqJJ Qn8yvhpHelenUmWGnFnx4thNixOsyf4IM/pQRr319tAbCsRh7hArVBfi+MUc entJBdEd1iSV2SI1eogLG9lL+2u3Uru+J/bnRYBfq4rQm0E4VidEZdcHrlWs SZVcAlaGZlBR8Hq0Oy+k4lPm9Ka2jSQyPYpplyHmP+5Ufl8L26zE6Da2Q/SO tTDs0cV1xwo68Pc29ljyiZmsXApdqSpao8xh84cJpLZp1LerhorTHNHtLsPP 00vossQXN74UskJ5OElqo1BVNQk6w6c9E90mQn1hBGTjvIR/Tac1K5dji6UL PnyKg3eOBAelSqbtI8QDk2+x4QYPv9n3Ev/dE1rimIyppv54L7tBJoM+mPlW BwHjmzxJEkmSBFCbkIp5cw7RUfs2etIhxefoDO5uhRBKjzvUrdlJJZUC7OkQ waZ8M0pXiCHaFYRkEwfUBXVRzF17mq7ug3V+c1DrfYq+fBRCpOghhUYO+Q0L MFK2BfdcbSExj8RY6xBp9i2k1ypjVOhxmz2ef4HER36h9iWRqLdqnJfakzdO aRJOJm5gA4189KaKcfCXIiKd2aio80BTUgayw34lo4VJeHltFkYfvqWqzlFS /Z2Hg3ZpKCl5QNt3NpCPMJE2K8JZ3TemNJoSD/0X16lp/2lidJGKfG/SZ2N3 shjWQ2tbGBdXNw1HDzfR8C4Cv24jxVy3A/9uIKQH1ZAlnY8PtZoI4VRwkgWh P08TJS/U0eY2Rn/EauCsMgm3vo9AT+Rx0vWuplK7UJx7+T9q/uyHveJnrNy3 mZQuTmjoiEC+jYKc78fQoMYqGAZM4PaVy/D+thttbpWhdocRnrZoILvfBL2e KzHn0FMqbe9ih1wa6FFPCKrK0xA5sBYNM1uYbEyMshKgd8pjCrxnxK16Phne +cDeFDFKeApm8DIFt29okFmLL2aJJkPQYowBxGL4uQyymkB6k19PDdsNKNjw Et1d9o7eqfIQoTcTB2ZMgn3aRBx3daAvlglk51hLRhd0EXpvCjlWp8PZS0kW Kq7wtDIhZUg8ytqfUjC/jsakfEybn4of3X2QubqajEM9IDCSQ99sBQyLC6hA cItCevXh8GoVXtWnoNY6irVm/5er6puF2B8m4qmAYf+/GH5y8qE4sTrLPeGB 3Z5OXKDWF2YpeEIK8Sj19Z2nwlwR5paupvCJtXR6qT3qD9iwoVtvSBI+TMej UxDeraSh2wWkbh0GR7u7VL9LHa34Nwb1i4gtuMe90HVGpw0fO8oMYZk+l1yr r3F/RRDbtyCf+T1wxpnPmnT9WShpXf+OElbE4VxVEAwtXdi1GRowwguWOf4/ 00x00OagBeVWH86IJ4FazFqst3KlfC6dup4doz+3mGPCp8u0u2aA6rdJWNb5 ybigMGMFDTHjX/mIdl5yoP8DAN8dLQ== "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}], "9"}, { GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVUXlUD/gDjDadUm1KooOQKB2ulu9npuj6pktZKrqL0kZFWuXKkVKOiBId WEeUIneKTX7xK0SH5EiOUsmx/Dbsb237x8x78+a9mfdmDIOWzQ0bKCMjE6vQ T3MDV9nExAT+6jnoXxEaGGllGfmvqdIP436YfJWwUrMbTp3K9LF6L8wN4vnz SHvuSdXnhsnyLNi4DeqHGlCh8RZtulKqzK1CkM9n4dWiT+nxNOQ81uabZX5s eL4Vk0bpsKdqOhs8/GmvpgKX3jniUv4pfDENoJzCIZF3zIzxPeNoG5YDNZ0X kuQcdzYfjWXWXjeOObYYuT9OYuZmFyRXfpTkbo3nAtM/UXrTA2PPSTk54wHq Zq9kt8MJlJytE6YXEtir6kfzR9vw7bA2ewtU0JgoeNvHgveqI3Asez4LwsM4 0jqat8Y48OXoEGbI18Axdhodb93AKbtNImanEXckjOb4DcspbTVByjwXZo32 EoHf/aHelT9zwLM6FA9uEWumeuFZaqL4wumsUxtH+7Z3sD47CO/fP5SsnbKO fwcqQO1iAjUuxzE3fSY6nUrQbJ6GvpqNWOHRLvaaFIsum0zctm7EqB0T6T/t OlZs/Iq2pMO4phrKLTprYZuZij26g/gw+Bc+PZvA7nPfoHleHtGX1lA75TCc h37EvuQoyn+JpoNeBMtPTGWG1TIebunPDBnPidlG1HDz4F9yvnisqkAPHTtm KDzD7z3uyLY9JPFub4B/tBcjf9uCkC5N2Dv5srulBeHF4bjsHMhXeddxpWse 4gy78OwPJbp8uov1q+S4+XUASnVzEDBLQu0CE8reuCnilFfzaE61mN97DT5R tnB/4wG3w5uQ35OFa65ebN79Gv5aFdCcdV8YNjbOGLLJhfMt/enXZMqhx4dz jIjEySkHcV13PO4vTcTuEyUS0zptmCg60bU2mvsv9Ag9mX1osN+Pof8rg7fh //EhwZEv9DuQF2XGNpt4KtTrsUF2CBzyTamYlIVqm0VMrBvGCTUzWRU9hk8D nBkg1Dmq3JFHQttEeoY2217KMuKDK3/flSUST49Chq0G9zlYY+RrwVEapjyS vJqvCmbT2zicZxqs0e1kK2KvVmHFuR7cPe9NxZVTOaJtFtufxHBKnoHk1NsW LJ/hCbVuK44NWoomA1nenpkkWo10+T7eV1gNNeIfeockY4vUsLS+HZMrYrhb L4AdXxL4aMRFeG6/guRnFvh+QpExhQdQZx8C18Rg5vxQIXbRk93Fegz4tpSj izyZozmHzX5j6eddhMLSAbSy04Jj0iJ66VWjrH/vckkp4ho1mFpZB82SCWw7 VYosqQsbTGV5dEc5tJAMXY8RVMufLBIN5Lmr7zuS0tOx0luV6t5vxMO7Vpxm ZsOVRR0QspcwTsmTYQP248HsFjwqvo3bn+4jNV0VSh8GcXvzJgybYMUjVZF0 6llL5UkDqaebAhMLJb5y1kSnpRzXhExi2eN38GuV8hdFd1qkrxP1yQsp+8aJ vy2z5M2gnULBKBIB6y2ZOkOOGuV7hfUsE768txs99xqQEKaBBYpyaPQFt0md ER5ugNBJA2HXdxLfjKNYWXhHMtH7NMKjKxB9xR6N160p92os7TKDMCypA3Mu b8DcfDOxpVWDg0MLYS614t3LoWScPjKDVFntKU+jsGBOPPAcHyotGRHlzasH VflwULUkOEFJFLwP5PKTUhq/3gzVp+poau/BguM/8c4QF15NcRHNmsq0/75T 6NZKqbt0HDf79IkyJz/YKNuKHf+NpG/ZCXH+1xU06LNDmqE6ax0WMDlhGPV0 MuAvcWfGy17MUPTp73QUUZ5lyP37EgpNZPnJPAk2EaexJ+gjvNtOYLWbEivy S9FVOxsXa9zwk0U81ao6YDNsO3SOrUXnHTNoha7hA6tT8I5aKco3aLLpll3/ H5txQOJHxTozLjQfwRaZTthnD8H206+Fh74mkxzXMbvwKGL3fMGPndbIbgsW 4SbzJK11vQhvr8PbIxGi1WGKuFB8HGlblZEWnYaWNVKOVNNi0ydfNiWpc5ui M97dW4wfovNx5thnEVJrzLgSVzoNtGBQgIS9M1ZTzV4q6kPz8bygEAOmDqZb 0XkkfzSg/pID4vGf81kT4Ms9ynqYWuqHjAo5Pml24l/bP2Hh+HEzK+Zr01hl vYiMUeZC1xTxWb5S6FxpEgEl0/l+H/EftXQsvmHOfSO2SYovanNVx008XrgT H5ZMZpGPH50WZCLQZ4lwf6vH3OAghmd+hW+eBktW6PLdQRm6edWgfLo9K0ry ofWwFj+vrRAOISlY7ajBvPsnEf+cmJa2ivn1igx5YkWLkEVsuGoorIPMqRBq zhdn7DlS151vVKKQ+y0Zww94si9qOLOWrWVuXyzP1g7m3i9VsPy7Hiebwlm0 KVpIZyeyPdsb3ddnsMbAn/8AE+Il/g== "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}], "6"}, { GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJwVkntczfcfx3N0kxSxrucUh8rppEMUZ/X9vF8RKRGVlHQ5bac76ZyTbkqz EjE9HGq26mfKpEy5rBaSkUvZJkbYL7GUxqopv9Zlil/74/V6PF6P13+v52tO RIJvJE9DQ0OpO2G+smQ3hUKW6qf9b5DL4hc7xv9b6k9o/oQ+dARTmnyYDLtq 6eO8Fpb6IBIJHQN046Um4tuy6E3aaToUYk2mos/Zmuf/sKLoRGjfMsBliQLC szL0j/VwxyOkpPjQRPLcQPQpm2kgzBVnFqfQgaYA9GfrIC4zih6kBCP6eDcL 6Z4KexchukSnSVRTSZqCSmqa3kUsMxS2HsF4tGU7uvZGouCCkO0ftYJ/kT/W XxAw05hGyv+mnK60e+Bxdiv3rE+A/syF+GTciP6XNwd+5Sr2jyqEdNc2UOol FSpiDOA1Oxkho9Y4sewnmrUjGtMCNmEg+hdSnermvh7VYzoqBsP1D9i72Zmw atXGqtTrJNT1wEevk6nfuoht2cOHroM1thrH4+QbHRipZ7PMi6dpjdk5KoUh LTr4MycusaHnlfeocFoETnv3UI3jp9Rm2UT11kNkt1UOZ9RRQ42EOnyKuKa3 1vAXbELiYhWzsJuE3KxINJpkQPIomOOcU7F/tgjNWxfBNiqcnDNe0AfLSgpu yiXjIwfpeHQLk+eLYFvnAG9REEZjt+G7wRr2pX48LmRtxKq4dvp0DLDSXAgz mZqdkwlR+dUCzH05hVz77XB06QHGn/qEhM2usOGusEE9RunjC6nlXRLsdLSh rvJA369tzIvnznR2etHqObFYp7xO/k4xVJcxCQV2YjSOxeL1sB3cbJeweL0R 4osWYMlBTyhsrtItr2A02MxBx0kHVM6YDJ9wIChNAHdJOtWYHaR7nBu0S8+S ns92lBvIcarHBS21EbDpAIVKiMJUK2DgZoAuYTJXrHhFkbvNUSWTw1WxhMQW k7mzBXNJ9lgMN6U9MrR8oQq8z9pfZ2J62g4UXa1j+Wod5AzrkMh2OZ4eWICT fx2hwUtDdGLx39xuJxFcnQIQd7+U5D4xsN5hiN82C8BrmYzSw7NwvlOD/owI Y5UnzWAaepSFWyrxzOgzKt8uwYzrvdydNk0y+15A+3y+5b7WUtH5+mt0e2cb y3MrpqwfhtmNhZHsaYmaukskZCzm4fqiQLxVp9Ci3d1kd0WPZBt8EbNkLRpM DrKUJDGMWlai10OAjyb+tnffdpx9kkf27TNQ3zkDZ7WzyD54PT4YpWFBjTue i4wQ+ugV7eVpQXmimg0VV1PPMSkkZkK8L7ZAQLULWh+uQsUfhJblK5FVmoYt dy6ww9/nUJSfCh6hWhDKV9Aam6mYl8RnntUTe7vMpQHNFHzboID9f/hk6e+I CnkmmZ/RIofPH5JCvZS6Evjozn5GWRnzcHvMCvqNVbRPP5foUivp2U/GplFv nLrYxC1TDtDdJ87kpxMPM5szFOEcDc6I0Hz7LokLzfCgopfG38uglJbRzKYs mrpDhfvCEMh0dfHTSDcVPoul1d6x8B1qZYd7hLhEFynmXS/ZDLaSNKyXfpxL ZDltC2Zot1PYmC2u1YGaR/QAsT7uPhZg29YRCinVwiG1O/ZfKaKq8/NRUFhG F9bcYserJAgscqIGlyMUXuZMJYZCtD0oYcocTYiFPEyXOmGXiZqirrWQp0c3 5YQ748eXn3G/Fnhix7gIpV4pONAnxpQmE/y+YD458qYiVv8vkq6RQPp7It6m B2IoSAKtQzeo/4UQikZPRASVcbap3lBzAuTJfSBob2ZfPaumV/N8wTvmA8cf /iSX8gYqupcA5R98JMdN8DF2JgR00obxRHo/lkuRu6zxzuJLWmYdygWlS2nf zdX4e+VGttSvmmo96sirMYnx3RTIvlrI0SwTXHz8ikJ0Q5Buaoalwe7ofLmH GxnSIHdPIQbjlqOsV0CFs6yQ9DKazOdXsIzkLeiJYZB13KHsClfwPDrJsXYS vktsIK8hPXQOXqX6vRzlVOQyQ1dvcsuVIv+3VPAdLKluYxySzlxmaZrR2Gaw ikYaVyJ8+TCVClQozp+H6E2+OJrIQ9Eb8wkm1XRxujvW3eRTYMNKlPmFgXdq Gfh73OA+cy4aY3bi+ugGtFqtY1OiZ6K95D3HizKH7zUnhAd+ghvK9Vx/WYLL Df9atmKxEu4fbFCyzwGviwUYnrOepP3m5H86DrtrDJC9tpL1bliHp/UMx0xv UnnrLuxhjfRG+oY8Hl4m5+YgMpX5oc/tv7TiC3N0q7dSeP5JmsZc8LSgnnSP XKIvjgHpC8XgP3ZFXmcjOStScPxjFZ2oaiXe82X0zR5t6M/z5kxqx5lG2gvW UquB2ZHXKNpiOobsQjGQsxZHd28m1YYwpG0OQsC5Si4nIwrq8xVsV4wU8gRX 9FgZw6vFGBbp89Hcl4r/A9jxE8c= "], {{0, 12}, {40, 0}}, {0., 1.}, ColorFunction->GrayLevel], BoxForm`ImageTag[ "Real32", ColorSpace -> Automatic, Interleaving -> None], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{40, 12}, PlotRange->{{0, 40}, {0, 12}}], "3"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778588537806834*^9, 3.77858855382403*^9}, 3.778588630652068*^9, {3.77858866367797*^9, 3.778588703892956*^9}, 3.778589003765769*^9, 3.778589097940077*^9, {3.7785892094451847`*^9, 3.7785892153422327`*^9}, 3.778606242233679*^9, 3.778606640790826*^9, 3.7786795326362343`*^9, {3.778679594156201*^9, 3.7786796169267187`*^9}, 3.7786796749356833`*^9, 3.778679833522253*^9, 3.778682246149354*^9, 3.778682287197349*^9}, CellLabel->"Out[9]=", CellID->180765572] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1589919601], Cell["A dataset does not have to have named columns:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7786021385694227`*^9, 3.778602180037195*^9}, 3.8593022976676807`*^9}, CellID->308564616], Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "200"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"arr", "=", RowBox[{"Flatten", "/@", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"MapAt", "[", RowBox[{"ToLowerCase", ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"All", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[ExponentialE]", ",", "\[ImaginaryI]", ",", "\[CapitalGamma]"}], "}"}], ",", "n"}], "]"}]}], "}"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->1376548620], Cell[BoxData[ RowBox[{ RowBox[{"ds", "=", RowBox[{ RowBox[{"Dataset", "[", "arr", "]"}], "[", RowBox[{"All", ",", RowBox[{ RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "#"}], "]"}], "&"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584505802436*^9, 3.778584537336824*^9}, 3.778584823181785*^9, {3.778585594452361*^9, 3.778585599446268*^9}, { 3.778585637031931*^9, 3.778585674328209*^9}, {3.778585738061111*^9, 3.7785858014536753`*^9}, {3.778586143301951*^9, 3.778586143715995*^9}, { 3.778596657960989*^9, 3.778596661536813*^9}, {3.7785967257883253`*^9, 3.7785967260005407`*^9}}, CellLabel->"In[2]:=", CellID->811327209], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", "[", "Values", "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583763548526*^9}, { 3.77858390986963*^9, 3.7785839769100924`*^9}, {3.778584501427535*^9, 3.778584502865631*^9}, {3.778585758334724*^9, 3.778585762158557*^9}, { 3.77858580356843*^9, 3.77858580429959*^9}, {3.7785966702576733`*^9, 3.7785966749804897`*^9}, {3.778596730344008*^9, 3.778596730657712*^9}, { 3.778602096797599*^9, 3.77860210034111*^9}}, CellLabel->"In[10]:=", CellID->877171405], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 \"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778602100685399*^9, 3.778602183804213*^9, 3.7786062422508574`*^9, 3.7786063016045227`*^9, 3.7786066408087254`*^9, {3.778679530002842*^9, 3.7786795326946783`*^9}, {3.778679594202849*^9, 3.778679616981455*^9}, 3.778679675010145*^9, 3.778679833534811*^9, 3.7786822461617804`*^9, 3.778682287211564*^9}, CellLabel->"Out[10]=", CellID->737590666] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Options", "\[NonBreakingSpace]", Cell["(7)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->340511252], Cell[CellGroupData[{ Cell[TextData[{ "MaxTallies", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.778602389965704*^9, 3.7786023967885113`*^9}, { 3.779038352589841*^9, 3.7790383537166*^9}}, CellID->758371717], Cell[TextData[{ "With the option ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " we specify how many of summarized items we want to see for each column \ (variable):" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778603040642866*^9, 3.778603081074931*^9}, 3.77903832607493*^9}, CellID->641493799], Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "200"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"arr", "=", RowBox[{"Flatten", "/@", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"MapAt", "[", RowBox[{"ToLowerCase", ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"All", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[ExponentialE]", ",", "\[ImaginaryI]", ",", "\[CapitalGamma]"}], "}"}], ",", "n"}], "]"}]}], "}"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->946898365], Cell[BoxData[ RowBox[{ RowBox[{"ds", "=", RowBox[{ RowBox[{"Dataset", "[", "arr", "]"}], "[", RowBox[{"All", ",", RowBox[{ RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "#"}], "]"}], "&"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584505802436*^9, 3.778584537336824*^9}, 3.778584823181785*^9, {3.778585594452361*^9, 3.778585599446268*^9}, { 3.778585637031931*^9, 3.778585674328209*^9}, {3.778585738061111*^9, 3.7785858014536753`*^9}, {3.778586143301951*^9, 3.778586143715995*^9}, { 3.778596657960989*^9, 3.778596661536813*^9}, {3.7785967257883253`*^9, 3.7785967260005407`*^9}}, CellLabel->"In[2]:=", CellID->1666996285], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", ",", RowBox[{"\"\\"", "\[Rule]", "12"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77860308491851*^9, 3.778603099672908*^9}, { 3.778603132895941*^9, 3.778603154079938*^9}}, CellLabel->"In[1]:=", CellID->335610404], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"H\"\>", "9"}, {"\<\"J\"\>", "9"}, {"\<\"N\"\>", "9"}, {"\<\"Y\"\>", "9"}, {"\<\"D\"\>", "8"}, {"\<\"(Other)\"\>", "93"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"s\"\>", "10"}, {"\<\"v\"\>", "10"}, {"\<\"e\"\>", "9"}, {"\<\"i\"\>", "9"}, {"\<\"q\"\>", "9"}, {"\<\"(Other)\"\>", "83"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778603100016202*^9, {3.7786031333839912`*^9, 3.778603156956633*^9}, 3.778606242360715*^9, 3.778606640901802*^9, 3.778679532816749*^9, { 3.778679594295004*^9, 3.778679617058382*^9}, 3.778679675119433*^9, 3.7786798337105427`*^9, 3.778682246299725*^9, 3.778682287330793*^9}, CellLabel->"Out[1]=", CellID->493729251] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", ",", RowBox[{"\"\\"", "\[Rule]", "1"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77860308491851*^9, 3.778603099672908*^9}, { 3.778603132895941*^9, 3.778603151017913*^9}}, CellLabel->"In[2]:=", CellID->806656409], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"(Other)\"\>", "200"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"(Other)\"\>", "200"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"(Other)\"\>", "200"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778603158560113*^9, 3.7786062423815613`*^9, 3.778606640922068*^9, 3.778679532840816*^9, {3.7786795943394423`*^9, 3.778679617115424*^9}, 3.7786796751672297`*^9, 3.778679833767374*^9, 3.7786822463491364`*^9, 3.7786822873426533`*^9}, CellLabel->"Out[2]=", CellID->890113321] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "NumberedColumns", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsubsection", TaggingRules->{}, CellChangeTimes->{ 3.778602877213673*^9, {3.779038348142948*^9, 3.7790383494608097`*^9}}, CellID->180319729], Cell["\<\ By default the summarized columns (variables) are automatically numbered:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.778602880741766*^9, 3.7786029306495657`*^9}, { 3.77860297323211*^9, 3.77860300033335*^9}}, CellID->302670623], Cell[BoxData[ RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"n", "=", "200"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"arr", "=", RowBox[{"Flatten", "/@", RowBox[{"Transpose", "[", RowBox[{"{", RowBox[{ RowBox[{"RandomReal", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"MapAt", "[", RowBox[{"ToLowerCase", ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"CharacterRange", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"{", RowBox[{"n", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"All", ",", "2"}], "}"}]}], "]"}], ",", RowBox[{"RandomChoice", "[", RowBox[{ RowBox[{"{", RowBox[{ "\[ExponentialE]", ",", "\[ImaginaryI]", ",", "\[CapitalGamma]"}], "}"}], ",", "n"}], "]"}]}], "}"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}], ";"}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->54435350], Cell[BoxData[ RowBox[{ RowBox[{"ds", "=", RowBox[{ RowBox[{"Dataset", "[", "arr", "]"}], "[", RowBox[{"All", ",", RowBox[{ RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "#"}], "]"}], "&"}]}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584505802436*^9, 3.778584537336824*^9}, 3.778584823181785*^9, {3.778585594452361*^9, 3.778585599446268*^9}, { 3.778585637031931*^9, 3.778585674328209*^9}, {3.778585738061111*^9, 3.7785858014536753`*^9}, {3.778586143301951*^9, 3.778586143715995*^9}, { 3.778596657960989*^9, 3.778596661536813*^9}, {3.7785967257883253`*^9, 3.7785967260005407`*^9}}, CellLabel->"In[2]:=", CellID->66893828], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "ds", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778602931541327*^9, 3.778602956772999*^9}, { 3.778603005071722*^9, 3.778603005407311*^9}}, CellLabel->"In[1]:=", CellID->687652750], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.77860295727637*^9, 3.778603006128848*^9, 3.7786062424309673`*^9, 3.7786066410012903`*^9, 3.77867953291993*^9, {3.778679594389007*^9, 3.778679617175301*^9}, 3.778679675222639*^9, 3.778679833828718*^9, 3.7786822463945303`*^9, 3.77868228740254*^9}, CellLabel->"Out[1]=", CellID->336896930] }, Open ]], Cell[TextData[{ "With the option ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " the automatic numbering can be prevented:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7786030086358213`*^9, 3.7786030345338*^9}, 3.77903836688898*^9}, CellID->47752612], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"ds", ",", RowBox[{"\"\\"", "\[Rule]", "False"}]}], "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.778602931541327*^9, 3.778602949133739*^9}}, CellLabel->"In[2]:=", CellID->24878839], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"num1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.787292420538304`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.842404273048157`"}]}, {"\<\"Mean\"\>", "0.24156797047792478`"}, {"\<\"Median\"\>", "0.4892566664722331`"}, {"\<\"3rd Qu\"\>", "5.4759591631523605`"}, {"\<\"Max\"\>", "9.816329952461473`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"num2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", RowBox[{"-", "9.911688664012157`"}]}, {"\<\"1st Qu\"\>", RowBox[{"-", "4.679947642761018`"}]}, {"\<\"Median\"\>", "0.4826306265540623`"}, {"\<\"Mean\"\>", "0.5051381107107659`"}, {"\<\"3rd Qu\"\>", "5.876399946947856`"}, {"\<\"Max\"\>", "9.964165778968571`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"char1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"U\"\>", "12"}, {"\<\"F\"\>", "11"}, {"\<\"I\"\>", "11"}, {"\<\"Q\"\>", "10"}, {"\<\"Z\"\>", "10"}, {"\<\"B\"\>", "9"}, {"\<\"(Other)\"\>", "137"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"char2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"z\"\>", "14"}, {"\<\"u\"\>", "12"}, {"\<\"g\"\>", "11"}, {"\<\"n\"\>", "11"}, {"\<\"p\"\>", "11"}, {"\<\"x\"\>", "11"}, {"\<\"(Other)\"\>", "130"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"symb\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\[ExponentialE]", "75"}, {"\[ImaginaryI]", "67"}, {"\[CapitalGamma]", "58"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.77860294942397*^9, 3.778606242473529*^9, 3.778606641078126*^9, 3.77867953298693*^9, {3.778679594409699*^9, 3.778679617195795*^9}, 3.7786796752455397`*^9, 3.778679833841825*^9, 3.778682246433073*^9, 3.7786822874151506`*^9}, CellLabel->"Out[2]=", CellID->708916440] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Thread", "\[NonBreakingSpace]", Cell["(4)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.77860239951694*^9, 3.778602400349553*^9}}, CellID->270377623], Cell[TextData[{ "The option ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Thread", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/Thread", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " is used to specify should the summarization be \"threaded\" if data to be \ summarized is an association or a list of rules." }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7786024043314877`*^9, 3.778602477548379*^9}, 3.859301863331374*^9, {3.8593022213618813`*^9, 3.859302223665222*^9}}, CellID->49820151], Cell["Here is an association of 3D points:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778602651835576*^9, 3.778602657381668*^9}, { 3.778602844449987*^9, 3.7786028504919*^9}}, CellID->917108318], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"asc", "=", RowBox[{"AssociationThread", "[", RowBox[{ RowBox[{"Range", "[", "40", "]"}], "\[Rule]", RowBox[{"RandomReal", "[", RowBox[{"10", ",", RowBox[{"{", RowBox[{"40", ",", "3"}], "}"}]}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Short", "[", "asc", "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.778602659025251*^9, 3.778602673335484*^9}}, CellLabel->"In[1]:=", CellID->925027573], Cell[BoxData[ TagBox[ RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"1", "\[Rule]", RowBox[{"{", RowBox[{ "2.6013027329126928`", ",", "7.478774249101619`", ",", "3.1987186650958854`"}], "}"}]}], ",", RowBox[{"2", "\[Rule]", RowBox[{"{", RowBox[{ "3.1096328017330848`", ",", "6.561668780744462`", ",", "8.50262164358616`"}], "}"}]}], ",", RowBox[{"\[LeftSkeleton]", "37", "\[RightSkeleton]"}], ",", RowBox[{"40", "\[Rule]", RowBox[{"{", RowBox[{ "9.498306780741363`", ",", "6.873900394121804`", ",", "7.106910858705323`"}], "}"}]}]}], "\[RightAssociation]"}], Short]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778602660183951*^9, 3.778602673745432*^9}, 3.77860624252573*^9, 3.7786066411515503`*^9, 3.778679533063662*^9, { 3.778679594458185*^9, 3.778679617254274*^9}, 3.778679675295348*^9, 3.778679833900029*^9, 3.778682246476009*^9, 3.778682287456669*^9}, CellLabel->"Out[2]//Short=", CellID->270168842] }, Open ]], Cell["Summarizing without threading:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778602693270933*^9, 3.778602707209794*^9}}, CellID->373331919], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"asc", ",", RowBox[{"Thread", "\[Rule]", "False"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778602497619136*^9, 3.7786026445688763`*^9}, { 3.778602683371018*^9, 3.778602683765068*^9}}, CellLabel->"In[2]:=", CellID->559463743], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { RowBox[{"1", "\[Rule]", RowBox[{"{", RowBox[{ "2.6013027329126928`", ",", "7.478774249101619`", ",", "3.1987186650958854`"}], "}"}]}], "1"}, { RowBox[{"2", "\[Rule]", RowBox[{"{", RowBox[{ "3.1096328017330848`", ",", "6.561668780744462`", ",", "8.50262164358616`"}], "}"}]}], "1"}, { RowBox[{"3", "\[Rule]", RowBox[{"{", RowBox[{ "2.3646012975517383`", ",", "3.5363094969179603`", ",", "2.663256374356724`"}], "}"}]}], "1"}, { RowBox[{"4", "\[Rule]", RowBox[{"{", RowBox[{ "6.145936411410148`", ",", "6.17808264829862`", ",", "8.032961502668794`"}], "}"}]}], "1"}, { RowBox[{"5", "\[Rule]", RowBox[{"{", RowBox[{ "1.6025605367931846`", ",", "9.707942358382976`", ",", "5.049684785797471`"}], "}"}]}], "1"}, { RowBox[{"6", "\[Rule]", RowBox[{"{", RowBox[{ "1.8917392580036907`", ",", "8.188751125247265`", ",", "2.8508944625087373`"}], "}"}]}], "1"}, {"\<\"(Other)\"\>", "34"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.778602684139742*^9, 3.778606242536612*^9, 3.778606641160459*^9, 3.778679533074561*^9, {3.778679594489827*^9, 3.778679617298561*^9}, 3.77867967532934*^9, 3.778679833950354*^9, 3.7786822465254183`*^9, 3.778682287489477*^9}, CellLabel->"Out[2]=", CellID->100710254] }, Open ]], Cell["Summarizing with threading:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778602711765863*^9, 3.7786027273135157`*^9}}, CellID->125703543], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"asc", ",", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778602497619136*^9, 3.778602679276366*^9}}, CellLabel->"In[3]:=", CellID->920991140], Cell[BoxData[ RowBox[{ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "10.5`"}, {"\<\"Mean\"\>", "20.5`"}, {"\<\"Median\"\>", "20.5`"}, {"\<\"3rd Qu\"\>", "30.5`"}, {"\<\"Max\"\>", "40"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}], "\[Rule]", RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.2096649696837911`"}, {"\<\"1st Qu\"\>", "2.1281702777777145`"}, {"\<\"Median\"\>", "5.260806901703738`"}, {"\<\"Mean\"\>", "5.340407282836546`"}, {"\<\"3rd Qu\"\>", "8.562682205117612`"}, {"\<\"Max\"\>", "9.956577577843696`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 column 2\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.6864518328280234`"}, {"\<\"1st Qu\"\>", "4.5434449279119145`"}, {"\<\"Mean\"\>", "6.371296205370636`"}, {"\<\"Median\"\>", "6.8321409859359665`"}, {"\<\"3rd Qu\"\>", "8.456788445454562`"}, {"\<\"Max\"\>", "9.829568973542763`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 column 3\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.5619021300091589`"}, {"\<\"1st Qu\"\>", "3.102553143068084`"}, {"\<\"Mean\"\>", "5.262697532852242`"}, {"\<\"Median\"\>", "5.552571151157566`"}, {"\<\"3rd Qu\"\>", "7.399101987552191`"}, {"\<\"Max\"\>", "9.545808358432907`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778602519633815*^9, 3.77860259427466*^9}, 3.778602629141491*^9, {3.77860267538549*^9, 3.778602679705592*^9}, 3.778602728540792*^9, 3.778606242570406*^9, 3.7786066412236757`*^9, 3.778679533134078*^9, {3.7786795945000257`*^9, 3.778679617331654*^9}, 3.77867967534131*^9, 3.778679834068294*^9, 3.778682246536572*^9, 3.7786822875015907`*^9}, CellLabel->"Out[3]=", CellID->539704748] }, Open ]], Cell["Optionally column names can be added:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7786027386537857`*^9, 3.778602753358143*^9}}, CellID->414916467], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"asc", ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", "False"}], ",", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778602497619136*^9, 3.778602679276366*^9}, { 3.7786027358080378`*^9, 3.778602816955089*^9}, {3.778606482011441*^9, 3.778606488072007*^9}, {3.778606621704138*^9, 3.778606624604334*^9}}, CellLabel->"In[4]:=", CellID->238615592], Cell[BoxData[ RowBox[{ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"Key\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "10.5`"}, {"\<\"Mean\"\>", "20.5`"}, {"\<\"Median\"\>", "20.5`"}, {"\<\"3rd Qu\"\>", "30.5`"}, {"\<\"Max\"\>", "40"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}], "\[Rule]", RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"X\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.2096649696837911`"}, {"\<\"1st Qu\"\>", "2.1281702777777145`"}, {"\<\"Median\"\>", "5.260806901703738`"}, {"\<\"Mean\"\>", "5.340407282836546`"}, {"\<\"3rd Qu\"\>", "8.562682205117612`"}, {"\<\"Max\"\>", "9.956577577843696`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"Y\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.6864518328280234`"}, {"\<\"1st Qu\"\>", "4.5434449279119145`"}, {"\<\"Mean\"\>", "6.371296205370636`"}, {"\<\"Median\"\>", "6.8321409859359665`"}, {"\<\"3rd Qu\"\>", "8.456788445454562`"}, {"\<\"Max\"\>", "9.829568973542763`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"Z\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.5619021300091589`"}, {"\<\"1st Qu\"\>", "3.102553143068084`"}, {"\<\"Mean\"\>", "5.262697532852242`"}, {"\<\"Median\"\>", "5.552571151157566`"}, {"\<\"3rd Qu\"\>", "7.399101987552191`"}, {"\<\"Max\"\>", "9.545808358432907`"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778602783764187*^9, 3.778602817566207*^9}, 3.778606242583178*^9, 3.778606490657859*^9, {3.7786066273076897`*^9, 3.778606641374894*^9}, 3.778679533249043*^9, {3.7786795945312347`*^9, 3.7786796173878613`*^9}, 3.7786796753774233`*^9, 3.778679834080812*^9, 3.778682246573983*^9, 3.778682287553788*^9}, CellLabel->"Out[4]=", CellID->18843707] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Applications", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->702122688], Cell[CellGroupData[{ Cell[TextData[{ "Summarize Classify-ready data", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.778603975868582*^9, 3.7786040030711*^9}, { 3.77860412005096*^9, 3.778604120464737*^9}}, CellID->45921486], Cell[TextData[{ "Here we summarize the ", StyleBox["Titanic", FontSlant->"Italic"], " data:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7786042389873457`*^9, 3.778604254691461*^9}}, CellID->67809342], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ExampleData", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ExampleData", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778603201412479*^9, 3.778603266601295*^9}, { 3.778603955249117*^9, 3.778603966598692*^9}, {3.778604016698316*^9, 3.7786040210286407`*^9}, {3.778604219436742*^9, 3.7786042230692596`*^9}}, CellLabel->"In[1]:=", CellID->93508378], Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 passenger class\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"3rd\"\>", "709"}, {"\<\"1st\"\>", "323"}, {"\<\"2nd\"\>", "277"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 passenger age\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "0.1667`"}, {"\<\"1st Qu\"\>", "21.`"}, {"\<\"Median\"\>", "28.`"}, {"\<\"Mean\"\>", "29.8811345124283`"}, {"\<\"3rd Qu\"\>", "39.`"}, {"\<\"Max\"\>", "80.`"}, {"\<\"Missing[___]\"\>", "263"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 passenger sex\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"male\"\>", "843"}, {"\<\"female\"\>", "466"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}], "\[Rule]", RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 passenger survival\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"died\"\>", "809"}, {"\<\"survived\"\>", "500"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778603245376219*^9, 3.778603291828574*^9}, { 3.778603956576136*^9, 3.778604022223053*^9}, 3.77860419204771*^9, 3.778604224310788*^9, 3.77860624284376*^9, 3.778606641507958*^9, 3.7786795334341583`*^9, {3.778679594692183*^9, 3.778679617536557*^9}, 3.778679676313695*^9, 3.7786798342569227`*^9, 3.77868224674431*^9, 3.778682287665769*^9}, CellLabel->"Out[1]=", CellID->347864215] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->985263640], Cell["Here we summarize the Mushroom data:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77860425848392*^9, 3.7786042674503813`*^9}}, CellID->873469996], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"ExampleData", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"ExampleData", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Thread", "\[Rule]", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778603201412479*^9, 3.778603266601295*^9}, { 3.778603955249117*^9, 3.778603966598692*^9}, {3.778604016698316*^9, 3.7786040210286407`*^9}, {3.7786041996342907`*^9, 3.778604230279994*^9}}, CellLabel->"In[2]:=", CellID->40919298], Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 cap-shape\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"convex\"\>", "3656"}, {"\<\"flat\"\>", "3152"}, {"\<\"knobbed\"\>", "828"}, {"\<\"bell\"\>", "452"}, {"\<\"sunken\"\>", "32"}, {"\<\"conical\"\>", "4"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 cap-surface\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"scaly\"\>", "3244"}, {"\<\"smooth\"\>", "2556"}, {"\<\"fibrous\"\>", "2320"}, {"\<\"grooves\"\>", "4"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 cap-color\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"brown\"\>", "2284"}, {"\<\"gray\"\>", "1840"}, {"\<\"red\"\>", "1500"}, {"\<\"yellow\"\>", "1072"}, {"\<\"white\"\>", "1040"}, {"\<\"buff\"\>", "168"}, {"\<\"(Other)\"\>", "220"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"4 bruises?\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"False", "4748"}, {"True", "3376"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"5 odor\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"none\"\>", "3528"}, {"\<\"foul\"\>", "2160"}, {"\<\"fishy\"\>", "576"}, {"\<\"spicy\"\>", "576"}, {"\<\"almond\"\>", "400"}, {"\<\"anise\"\>", "400"}, {"\<\"(Other)\"\>", "484"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"6 gill-attachment\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"free\"\>", "7914"}, {"\<\"attached\"\>", "210"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"7 gill-spacing\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"close\"\>", "6812"}, {"\<\"crowded\"\>", "1312"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"8 gill-size\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"broad\"\>", "5612"}, {"\<\"narrow\"\>", "2512"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"9 gill-color\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"buff\"\>", "1728"}, {"\<\"pink\"\>", "1492"}, {"\<\"white\"\>", "1202"}, {"\<\"brown\"\>", "1048"}, {"\<\"gray\"\>", "752"}, {"\<\"chocolate\"\>", "732"}, {"\<\"(Other)\"\>", "1170"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"10 stalk-shape\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"tapering\"\>", "4608"}, {"\<\"enlarging\"\>", "3516"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"11 stalk-root\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"bulbous\"\>", "3776"}, {"\<\"equal\"\>", "1120"}, {"\<\"club\"\>", "556"}, {"\<\"rooted\"\>", "192"}, { RowBox[{"Missing", "[", "]"}], "2480"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"12 stalk-surface-above-ring\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"smooth\"\>", "5176"}, {"\<\"silky\"\>", "2372"}, {"\<\"fibrous\"\>", "552"}, {"\<\"scaly\"\>", "24"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"13 stalk-surface-below-ring\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"smooth\"\>", "4936"}, {"\<\"silky\"\>", "2304"}, {"\<\"fibrous\"\>", "600"}, {"\<\"scaly\"\>", "284"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"14 stalk-color-above-ring\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"white\"\>", "4464"}, {"\<\"pink\"\>", "1872"}, {"\<\"gray\"\>", "576"}, {"\<\"brown\"\>", "448"}, {"\<\"buff\"\>", "432"}, {"\<\"orange\"\>", "192"}, {"\<\"(Other)\"\>", "140"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"15 stalk-color-below-ring\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"white\"\>", "4384"}, {"\<\"pink\"\>", "1872"}, {"\<\"gray\"\>", "576"}, {"\<\"brown\"\>", "512"}, {"\<\"buff\"\>", "432"}, {"\<\"orange\"\>", "192"}, {"\<\"(Other)\"\>", "156"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"16 veil-type\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"partial\"\>", "8124"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"17 veil-color\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"white\"\>", "7924"}, {"\<\"brown\"\>", "96"}, {"\<\"orange\"\>", "96"}, {"\<\"yellow\"\>", "8"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"18 ring-number\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"one\"\>", "7488"}, {"\<\"two\"\>", "600"}, {"\<\"none\"\>", "36"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"19 ring-type\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"pendant\"\>", "3968"}, {"\<\"evanescent\"\>", "2776"}, {"\<\"large\"\>", "1296"}, {"\<\"flaring\"\>", "48"}, {"\<\"none\"\>", "36"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"20 spore-print-color\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"white\"\>", "2388"}, {"\<\"brown\"\>", "1968"}, {"\<\"black\"\>", "1872"}, {"\<\"chocolate\"\>", "1632"}, {"\<\"green\"\>", "72"}, {"\<\"buff\"\>", "48"}, {"\<\"(Other)\"\>", "144"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"21 population\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"several\"\>", "4040"}, {"\<\"solitary\"\>", "1712"}, {"\<\"scattered\"\>", "1248"}, {"\<\"numerous\"\>", "400"}, {"\<\"abundant\"\>", "384"}, {"\<\"clustered\"\>", "340"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"22 habitat\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"woods\"\>", "3148"}, {"\<\"grasses\"\>", "2148"}, {"\<\"paths\"\>", "1144"}, {"\<\"leaves\"\>", "832"}, {"\<\"urban\"\>", "368"}, {"\<\"meadows\"\>", "292"}, {"\<\"waste\"\>", "192"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}], "\[Rule]", RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 edibility of mushroom (either edible or poisonous)\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"edible\"\>", "4208"}, {"\<\"poisonous\"\>", "3916"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778604206914645*^9, 3.7786042312735567`*^9}, 3.778606243459465*^9, 3.778606641990218*^9, 3.778679533988398*^9, { 3.7786795952115707`*^9, 3.7786796180357513`*^9}, 3.778679677017*^9, 3.778679834836232*^9, 3.7786822473065434`*^9, 3.778682288222383*^9}, CellLabel->"Out[2]=", CellID->574172166] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Summaries browser", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.778603598267758*^9, 3.77860362206068*^9}, { 3.778604279656746*^9, 3.778604286440473*^9}}, CellID->341410619], Cell["\<\ If we have a set of datasets we can easily build an interactive interface \ that allows browsing of dataset summaries:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.778604079066243*^9, 3.778604185571611*^9}, { 3.7786042906038303`*^9, 3.778604290951891*^9}}, CellID->392050837], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"dataNames", "=", RowBox[{"ExampleData", "[", "\"\\"", "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Grid", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"\"\\"", ",", "name"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"ExampleData", "[", RowBox[{"name", ",", "\"\\""}], "]"}]}], "}"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Alignment", "\[Rule]", "Left"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Multicolumn", "[", RowBox[{ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{ RowBox[{"ExampleData", "[", "name", "]"}], ",", RowBox[{"ExampleData", "[", RowBox[{"name", ",", "\"\\""}], "]"}]}], "]"}], ",", "4", ",", RowBox[{"Alignment", "\[Rule]", "Top"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"name", ",", RowBox[{ "dataNames", "\[LeftDoubleBracket]", "29", "\[RightDoubleBracket]"}], ",", "\"\\""}], "}"}], ",", "dataNames", ",", RowBox[{"ControlType", "->", "PopupMenu"}]}], "}"}]}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.778603274420261*^9, 3.778603290586296*^9}, { 3.7786033394250507`*^9, 3.778603477509017*^9}, {3.778603557272389*^9, 3.778603568364088*^9}, {3.778603625956506*^9, 3.778603791669969*^9}, { 3.778603829202467*^9, 3.7786039036318893`*^9}, {3.778603936517543*^9, 3.7786039431308413`*^9}, {3.778604147841022*^9, 3.77860414817708*^9}}, CellLabel->"In[1]:=", CellID->79235257], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsnQeYFMXWhoe07MKS8yI5x0WyBAlKVAkSVaJcguSckyQJKkFBCQoigkRJ gki4IDkK/heRlZyXsJIzzP/1nLXp7Znp6ZlNvez3PgvPTHVVdXV19fnO6a6u yfVhj3c7JLTZbH388d+7bQdU69277aBGqfGlSfc+H3Xs3v4/dbr3bd+xfe/y HyZC4grknYh/yucThBBCCLESdrt9586d/0cIIYQQa7Br1y758A8hhBBCrMH/ /vc/qjMhhBBiKajOhBBCiNWgOhNCCCFWg+pMCCGEWA2qMyGEEGI1qM6EEEKI 1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgN qjMhhBBiNajOhBBCiNWgOhNCCCFWg+pMCCGEWA2qMyGEEGI1qM6EEEJI5AkL Czt79uyxY8cOO8AHfEWib7VRnQkhhJDIEBoaevDgwQ0bNqx1AonYhAze1kl1 JoQQQnwGMfL69euddVkLMiCbV9VSnQkhhBAfCAsLO3DggE6I12nQbUJm85VT nQkhhBAf+OOPP5zD5FsanLeiiMnKqc6EEEKIt5w5c8blTWxjdQYoaKZ+qjMh hBDiFWFhYVu3bvVNnVHQzERuqjMhhBDiFadPn3apvGbUGaC4x11QnQkhhBCv cJ4M5pU6m5keRnUmhBBCvGLz5s2iszt27PhfRLTqrNuEzFIKxT3ugupMCCGE eIX6grNOjo1BZimF4h53QXUmhBBCzHPjxg31HrVv6gxQifFeqM6EEEKIVzB2 JoQQQqzGli1bRGe3b99+JCJaOdZtQmYpheIed0F1JoQQQrzi4MGDkZmzjeIe d0F1JoQQQrzC3UJhJtXZzHJhVGdCCCHEW7Zt2+abOqOgmfqpzoQQQoi3nD17 1jd1RkEz9VOdCSGEEB+AdHqrztBck5VTnQkhhBDfOHz4sOtHy65AZvM1U50J IYQQnzl+/Lj6+rM7kAHZvKqW6kwIIYREhmvXriEu3rBhg7MuIxGbkMHbOqnO hBBCSOQJCws7d+4cYmRRVXzAVzM/5ewSqjMhhBBiNajOhBBCiNWgOhNCCCFW g+pMCCGEWA2qMyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWo zoQQQojVoDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWgOhNCCCFWg+pM CCGEWA2qMyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWozoQQ QojVoDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWgOhNCCCFWg+pMCCGE WA2qMyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWozoQQQojV oDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWgOhNCCCFWg+pMCCGEWA2q MyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWozoQQQojVoDoT QgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWgOhNCCCFWg+pMCCGEWA2qMyGE EGI1qM6EEEKI1aA6v5Ts379/y5YtSwkhhMQssL0HDx6MvBmnOr98QJoPHDjw nBBCSGxwwEEkLTnV+eUDnltsj01CCInXwA5H0pJTnV8+li5d+owQQkjsATsc SUtOdX75oDoTQkjsQnUmzmBUPCWEEBJ7UJ2JM1RnQgiJXajOxBmMiieEEEJi D6ozcYbqTAghsQvVmTgj6vw4Irdu3Zo+fXrnzp2XLVv2mJCXi7Vr12JsT5o0 6caNG7HdFkIeU52JS1yq8zvvvGNz0K9fv1gZrmob7t+/73MN+/fvRw2DBg2K wlZFHhwRWlW3bl3jbKlSpapQoYLJOtevX486x48fH9nGxR6+nSx0UfLkyb3d 18iRI2V4Y4x5W5aQKIfqTFyCUYHh8UjD2bNnYbgqVqx48eJFNRFRxrBhw4oW LRrgIGfOnHXq1EH0cf36dcnw22+/odTQoUMfeYm7gqLO9+7dM1NJjRo1kFmX uG/fPiQOHDjQ2yZFkg0bNjRt2jRbtmxJkyYNDAwMDg7u37//yZMnZSuOCK1C 7xlXIupsco+qOkeq3Z6oWrUq9nL48GHnXYPz589r07///nskduvWzWTlvp0s UWfjPM5j4+HDh2fOnKlUqVKCBAnOnTvn1R4JiXJgganOxBlndd68eTOs2ccf f6ymXLt2rUiRIkjMmDHju+++26ZNGxjqNGnSIAVGVfJEuTofOXJky5YtJitx qc5hYWGo4cSJE942yWfu3LnTsmVLtCRRokTly5dv0aJF8+bNS5QoARWAS3Pw 4MFHptUZ3SL5zRAz6jxixAjsZdq0adrEwYMH4+iQvnDhQm16x44dkYjRZbJy 306Wb+osTJ48GekY7V7tkZAox4LqvGDBAtu/+Pn5ZciQ4bXXXoPz/Ndff5mv BJfzgAEDYMqipEkemTdv3rhx42JmXzGD2M+HGtatW4cz8tlnn6kpYpYbNmx4 +/ZtNRFKtGzZMgTa8lUV2Yde4nNBLWKBI1NDlNC+fXs0o0yZMkePHtWmI96s VavWr7/+is93794VdY7C/cop++STT6KwTmc2bdqEvTRp0kSbiAgUEpk+ffpO nTpp0wsVKgTVvnTpUrQ2CRYD6mycx93YmDFjBtJXrVoVPU0jxCywwNZU50aN Go0aNQr2v3v37hUrVsQVnSJFCmwyWYncEJs+fXqUNMkjiByzZcsWM/uKGdyp M0IkNaVu3bpI2bp1q7vRNXr0aJsTkCFsQv2NGzfOmTNn0qRJU6dODVOJaMVM QbmzLZ8BmopxUrhwYVhjjJC8efO2bt36woUL2ISadTXAx0P63r171c8q+/fv b9asWebMmeEQBgUF1a9fH+6Bx12YQXaHOq9cueK89cGDBzdu3HioUedTp041 bdo0TZo0yZIle+ONNw4dOqTNnypVKkiPNuX8+fO4RvLkyYPjTZcuHWRx7ty5 sslZnY8fP547d24chbgEAs5FlSpVUDNqwGEiPwJ5daso3a1bt/r165c1a1bk KVasGIqoGbDJ398/U6ZMasrNmzeRDT2MbixSpIiajk5De4oXL65tPxK7du2K kYCeR/vh7B04cEDXe7qT9dVXX0HlsYvs2bPDf8NBIc9//vMf8212NzYAjAa+ Ll++XH+qCIlZLKvOM2fO1CbCP8+YMSOuKVytZiqhOkcSMWUPNKxcuRJdOmvW LDVF7tbifD1ww8GDB2E8kadevXrf/sv9+/exCUYbVho19O3bt0WLFpCGxIkT r1271mNBUWdE6JIT9h9fK1eu3N8BdA1aj0GCTd999x1sMraqNUi6GPwBAwao 7USwj6EFdcB5lPZALPr06eNxF2bo0qULio8dO9Y4G45I4msMpFdffbVjx441 a9aUpwaXL19Ws4k6q1+PHTsG9ZHmocEI0kuVKlW2bFnZ+vPPP4s6y1cIfZYs WaCAO3fuVGuQfi5QoECHDh2g8qVLl8ZXHLKaAbuDnwC3AQ2DW9K8eXNoccKE Cbds2aLmef3111Hqjz/+kK+Qfnxds2bNxIkT4VdDfyV90aJFSEeHqAVDQkJQ LXq+QYMGvXv3Rs8HBgYGBATANZIMzicLPYmUHDly4HhR5JVXXpGOgjqbb7O7 sQHmzJmD9Pnz5xufL0Kim4cOzzmSljwG1BksXLgQ6e+//758hV2CBYNVwWUI PxnWaf369bIJxlbnGPfs2dO4iAABQpyOsEXc8vfee+/q1auyCQHOuHHjChYs iE1p06aFiUZtskkMmhaYU+fjQnFs2rFjR5MmTWBjYYJq1ar1559/qhk2btyI TdgvdpE+ffpGjRqhY3XFEeLBgkEdUEObNm1CQ0Nh+tq2bQuTi4OCFdLtGidX LBWACcUuTJ4FZ3WeOnUqGvDLL7+oKatXr0YKWoK447///S8iJucBtm3bNuQZ MmSILv3EiRPar6dPn4ZwQJU8FtSqM6JRGP+3335bmwERE9ovn+Xupa4GncFH j+EQMB60govgEU0yswuPlCxZErvbtWuXcTZRZwCJFD8EQH2Qgp5Xs+nUGWMY GWbMmKGt6uTJk/JBq84YeBi3kPLff/9dzYmzhqP76KOPcLxqIhqAUj/99JN8 xe7wFSH5tWvXJEX8NIxPtYhIPJxh+Tps2DD4WsiPo0b64sWLJb1z587arw8c Jwit0jbpr7/+wgUIH0O+6k4Whg2kHOE/zoukXLp0CQLtrM4e2+xybIANGzYg fcSIEc6bCIlJ4pA6h4WFZciQIVOmTPIVEpwnT55evXpNnjwZ1kA88O3bt2PT qVOnvvrqKxHlNQ5w+RsXAXv27IEsQmrh8H/55ZeIkhDfQftkK5QavnezZs0+ //zzQYMGQQ0RXp07dw6btm7dCiOJGGfNv0DKnY9L5FWCMqgk3HVIcNWqVdUM aC18g8GDB0+ZMqVr167QCwQIFy9e1BaHfr3xxhsIH2Bn8BXmrnr16kgZM2YM pFn1QwQcBWwv6kR+FC9atCgOEAbZzFnAqMDwuP8vsHLBwcEpU6a8fv36fQ3o SSSKrCRJkgS9N3LkSFhONQM6R0T2visgCsh85swZSCH8LuSEsTUuCKFE+u3b t/EZZW2OB98uKwdvvvmmzfH6lRacaDH48nXatGnarzo87sIjEtviAI2z4YiQ DcKEca4m4ppCIqI/NQW9DemRzxjV2Kp+dWbt2rXIgFO/bt06xKQY/NA+bQaM 6kSJEh09evS8BrnvBD9W8ojSIZjVFgwKCsqVK5f6FT4b8mAEyleMasgrPsDl SJEiBYJlSccIlFBavsJuyI7OR0RGMi6u+04nC9emuCvaxkyYMAGJ7dq1U1PM tNnl2ABwMnF158+fH1exu44lxGfkUVSLiCAF6bqcsMBxRZ2B3ECDAcdn/A87 pm4KCQmBZVMja5d3to2LIMRAESiF835XrFiBTdBlNQUuPcQIDrZ8NXNnW+QV Z0FNkT2K5wBUIRbE20dYpC2OHakZqlWrBlvXoEEDNaVmzZowLPIZcgB91+ZH kAj7DCk3bqegVWccfubMmaELS5YscR5sMGLIDJcDZwfeDhoJPfr7779lqzuR hSI0adJEVXaVQ4cOGRfUqvP9f21s+fLl0T8IDyEH2sxm1LlNmzb4+uuvv7q7 mox34RFRZ4wr42yizhUqVNAmYrjaHPeZ1RStOn/zzTc2x8Q5d3WKOuOMy4NX 5zbky5fP5gZ1p9gd/FJolrZgmTJlcO1o24ld4EjvO9QtICCgR48esgm9V7x4 cXzA8MZwhUCrpebNm+du7zbHbaL7TidLHqYgUdsYOJzO6uyxze7UGaxevTp1 6tTwjTGw3fUtIT6jE2iX0nw/rqmzTEM6fvy4Lh0BDqQH2lS4cGFJ8fjc2bmI zAZBMIjwUJcZNiFZsmTw+S9rkDBWMphXZ+2vacukHWifLif0TnaBeKdDhw7a 4ghS1GyIspECC6ymyCRqnGh8Rgfi888//6xtM6IYWFGti+IOsUv3HMg97cqV K584ceKeIegieAsSbEqKWE40VZsNYVHGjBnhPGBYzp07Fz0AVwRFkHP37t0G BYGo861bt+RraGgohCBLlixi0jNkyDB27Fg1s1hgXQ3YBRL79+8vX2W/f/zx h7uDMt6FR+TONmTdOBuOCNlq167tnIhDVlNEneUz3EUZ5O7qFHWG0OD/9u3b O2eAL4eta10B/1PyyAwrXUEkoiXalEqVKmEvMAUyhRvjR9IxJiGUcIwXL16M dLmLrm0/xqTLBqDb7zmdLBld8P20u5Y7DFBnbfM8ttnl2BDgxlSvXh1bEZW7 zEBIJIENhPX74IMP8D8+u8wDCxyH1FliZ3m0eu3atWHDhuXPnz9RokSqvw3v XXK6VGfjIqhWbojBXtWrVw9l1We4ku5McHCwZDCvztr3wuSlIURA8hU2p23b tohStbto1qyZtrj2ObXc5YOsqCli7iSlX79+7qISkW9jtOqMaHHz5s1wFUqV KuVx1MmDWph9+epSZOWmwZw5c7SJTZs29UGdhbt37/7++++ffvpp3rx5sfXr r7+WdDPqLLHzhg0bjI/L3S48Ig9bx4wZY5zNB3X+9ttvbY7Y2V2dos6jRo0S UYMd0GXIlSuXXFAGDTOpzgMHDpRuGTlyJAYAImVJlxliGE7dunWzOV5/VovI /CukG+xdd7IQaGgHiQCPN2rVGVG2v7//+vXrb9++bdA2QiIDRBnXpjtpvhen 1BkRX/r06SFe8hUut0xoWbRoEUzrxo0bq1SpggBHtrpUZ+Mi/ziC1jVr1sCI lShRAsXz5Mlz6tQppJcrVy5Tpkwbndi5c6cUNK/O2sBfp87YaapUqXC+EEvC pqF++AlNmjRxV1zU+ejRo2qKqPORI0fwuU+fPjbHhGrnZjvfHHBGq86CVLh9 +3bjIXf16lU4P4jQ5asc44ABA7R5ZBrz4cOH1RTIUI4cObSG12XBe27UWQW9 ga0QI/laq1Ytm+M2uDaPzuDLc2f1q0d0u/CI7A5OIOJHlxngNN7zSZ3RgTbH zXB3u1afO9+8eVNm0/Xu3VubAaPLZhh93zOtznIjCLHAG2+8UbRoUTVdbnrL NSVrcKmbpP3wEDDe3O1dd7LkEfOUKVO0ecaPH++DOrscG0Ce5mtjfEJihTik zjJnG86zfM2YMSMiXG2GkiVLGquzcREd8+fPF8v2j2NKGAzL6dOn3bU58uos DYbgqlsvXLiAnfqsznKj/ocffjBulTvkzuRdDdIhCI7UFJjKVatWwb6pKVAT mfFbuXJlSZG7jjhr2qpUG6umqEsc79q1y6AgEHWG3OAzzgist3arzPRu3ry5 fMWJkxsO2jwykRgGX74iypM529qq7ty5c/LkSTO7AD179kQghm6/64b//Oc/ NsfbUn/88Yc2HUXq1KmDGA2fcUSiztoMkohDVlOgL+XLl1e/ypztL7/8Ulsq JCREPsDVtDle5sJnqCT2JQ6PmhOuGlLgeaK3tTXIimTyGbtD5+iOCIloiTYF Poafnx+uAmTu2LGjdhP8B7lhVbhwYV091apVszmmMqLD1UQ4eBi38ll3sjD+ kyRJAkGHqyMp58+flznbUGdt8zy22eXYAEuWLNGNc0JiBVjgOKHOmzdvhrb6 +/tDxSQFQXTdunXVDPLyiCq1uOjkdqK2EuMiOvEVdRg4cOA//76i1bZtW20G BNp///23fG7VqhUufOPnucbqfODAAdUZEAYNGmRzLMHkrrixOkNckiVLVrx4 cd07Vs5P7V3irM4yNQ7CqqbIi8AZMmRAr3744YfioiAlRYoUO3bskDywujlz 5sSJg0INc4CUU6dOpUmTJnHixE2bNkUPI9oKCAiQt1ZVdXZZ8G5EdZYOhIvV pk0b1NO6dWvoLDRiy5YtUglsLDKUKlUKkoQafvnll7tOBv+uwyD7OZD3nVFP 7ty5EWaa2QWQR67bt293d5VhYMiMdChUuXLlEGA2a9bs1VdfhfeFc4QhfddX dcYoDQoKsv37vnOHDh1Qf9myZWWrVp0BRqx08pAhQ9QaZK4CmoFzgT5p3749 xozci5YMJtUZqA+Avv/+e226+pBFp9p3HWord9cRbnfr1g19Dv8Z4wedIxmc T5Y4chhpPXr0gCuIw5coGONE2zyPbXY5NoDMtUMscJeQWMWy6ixrheFKhF8t 69Ljml20aJGaDVqJbLCZCBxwneK6K1CggCq1sIfQ4jx58kyePBmXG8TCY5FO nToFBwfDkmDr+PHj4efDCMM4yFaZLIoo4OOPP/7ss8+6dOkC7VDnbIsswjbO nj0buzN4o8qdOqMIGhMYGAgJmDp1KkQZ9icyd7bBjBkzEiZMiHaiTgSq0B3Y bfNztu86JFJFNfVqClwgtKFGjRqy5BcUFiESLDCapC2IYLNixYqw/2KiUTkS 9+zZg5ZA6XBaEXhC2nr16oWtO3fuNC741ltvqZ/PnTsHuw2rC89NAjcMG20N iOVlwQqZaYCTi0RkUD+rYIQ0aNAgffr0qCdr1qxwPP773/+a2QUIcnD9+vU7 hqADGzduLL+CIY4TzghOqGzFEaFVEBptEUnEIaspos7aPHDDMHSzZ8+OoBLt h0x/++23skleSIePqmZGhItutzne51UTkQ1eQbp06VADDgQ1YPxfuHBBtmJ3 aK3uWETpdImqCqNJ2vSffvpJ0nFpO3cLgl8ULFiwIDwxjH8MIVyh0ErZ6vJk TZs2DdnkdMCJletIAnDzbXY5NoCs5Ll8+XLnphISk8ACW1OdBTE48MlxDerW 2Yb1aNeunQTUcIAR2UHItLepV65cWaxYMXnHR94CNi6C/DCDsE4ogjywk5s2 bVJrg9xDNBFDoSzcchgHRBlqIB8aGorwGfZNVv43WI3E4LnzoUOHENrAgECw YC1lZafIqDOAIogIyvoqiA1hKs2cBWd1lndaR48eHVtj1ZrIw1M4bLHdkPgL XGKb4zFWlNSGU2lzvAoRJbUR4jMWVGdiBUSdb2uQ2TIdOnS4TTR88cUX8OgQ k8Z2Q+IL586dQ9irfj1z5ky+fPkSJ04cEhISJfXLxImDBw9GSW2E+AzVmbjE WZ2RmDNnTpjBevXqLVq0KLZGLInnjB8/Pnfu3O3btx86dOiHH36YPn16iOmg QYMiX/NPP/3UuHFjPz+/7NmzY7RHvkJCIgPVmbgEo+KO49mcllWrVsEwypOC W4TEBps2bapVq1amTJkgo8mTJy9btuzMmTOjpGZZLTxPnjwrV66MkgoJiQyw wFRn4oxLdSaEEBIzUJ2JSzAqbt++fZMQQkhsAAtMdSbOUJ0JISQWoToTl2BU 3HL8ijEhhJCYBxaY6kycoToTQkgsQnUmLsGouHnzZhghhJDYABaY6kyckXXS KNCEEBLzwPaqdjgyUJ1fPvbv379z584ww9/1IIQQEh3A9sICww5Hsh6q80vJ vn374LktJYQQErPA9kZemv+hOhNCCCHWg+pMCCGEWA2qMyGEEGI1qM6EEEKI 1aA6E0IIIVaD6kwIIYRYDaozIYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgN qjMhhBBiNcyr838JIYQQEkVQnQkhhBCrEbXqbCeEEEJIJKA6E0IIIVaD6kwI IYRYDaozIYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBC iNWgOhNCCCFWg+pMCCGEWA2qMyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRY DaozIYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWg OhNCCCFWg+pMCCGEWA2qMyGEEGI1qM6EEEKI1aA6E0IIIVaD6kwIIYRYDaoz IYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgNqjMhhBBiNajOhBBCiNWgOhNC CCFWg+pMCCGEWA2qMyGEEGI1qM6EEEKI1aA6E0KiiePHjxcuXDht2rQ//PBD bLclnMGDBwcGBlarVu3OnTux3RZCjKA6E0Kiie7du9sc5MiRI7bbohAWFmb7 l7lz58Z2cwgxIs6pc/369dXrK0GCBGnSpIFz3rFjx61bt0b5vgoVKoS9xF0f OzQ0FO0vVapUbDeEeMGTJ09mz55dvXp1hJxJkiQJCgp666235s+f//TpU3dF YuBEf/TRR9jFmjVrvCr16aefyqX6+uuvR217fDvkR48eoVelSVu2bInaJhES tcRRdQ4ICEiXLh2kOWHChKpY161bF22Iwn1lzJgxTqvzn3/+SXW2FEePHv3g gw/y5cvXq1cvlxkgOjhfNlcUKVIEJ9RlqRg40U2bNvVBnR8/fjxjxoyRI0de unQpatvj8yEfOXJkyJAhy5Yti9r2EBLlxFF17tOnj3xFQHHgwIFu3bohykB6 sWLF7t27F1X7Spw4cZxW5+3bt1OdrcO1a9cQCE+cOPH69evu8rz55ps4ZXA7 P/vss2PHjt24cePvv//+9ttvX331VaS///77LkvFwIl+4403fFDn6INjm7z0 xHV1Vtm4cWPSpEmxqWvXrlGyo5s3b0rMEnfVeeXKlbRg1mHOnDktWrQwyIAL TYbcL7/8otv07NkzBKHuhmIMnOgSJUpYSp05tslLz0ujzmDMmDHYBI2+evWq btPdu3dnz55dr169HDlyIEPatGkRC7i8u4UMLu8rahkxYoRzQYTwaBWMGAIf f3//fPny9ejR4/Lly+4OBO5Es2bNsmfPjvYEBgYWKVKke/fuv//+u7v8sM8/ /vhj7dq106dP7+fnh4Jt27bFqdFlO336tMf2g8icpk8++QQ1oD/tjmk2Q4cO zZ8/Pw45Q4YMTZo0QcTnspTJU3D+/HlU/t5778E7Qm0pUqTImTPnqlWrsGnb tm3BwcHYUZUqVc6dO+e8C4jXpEmTypYti1LJkiVDlw4aNAgRq/HhoCvy5MmD XoX8+dIdphk8ePDYsWMNMvz000849kSJEhk8Ylbx+URjIEFk27Rpg7OGXsLY g8ah3x4+fKjL2bp1a4/141xoi7i7LT9kyBCDYzF5LfhwyDhSd9mePHli3MN7 9+5t3749eil58uRoVfHixUeOHPmPq2dnqAquV40aNXAJJE6cGGP7tddeGz16 9MWLF413QYgBL5M6w54HBARg68yZM9XEx48fT5gwQZ0KgmsHF5p6hcJ66yqp U6dOsIMCBQpInmLFigVH5KuvvtIWOXLkiNyQFFC/3BIHQUFBp06dcm5qr169 JAN0pHDhwnnz5pXAH0C/bt++rcsPf+P111+XDOnSpYP0w67aHJYcZkGbEwZB bWfWrFltjmf0wU7s37/fq27XIuqMXoVDAouqM3pwTk6ePKnN79UpEHWuXr36 W2+9pe3S3bt3w0iqKW+//bauVTiiV155RbbiQ+7cudE5+AyDaXywainkP3Pm jM/d4pEBAwag6wwy4BilJdAFj7X5dqLhAEBuZC8JEiRImTIl/pev0NlHjx5p Mw8bNkytRzozV65cuvrbtWunLVK3bt2sEYE3ZTNUZ/PXgg+HvGnTJl17ZDKJ sTrDk2zZsqU62NAeMSwAxXUTUO/du1exYkXZmilTpqJFi8L/lF5NkiSJsVtC iAEvkzqDatWqYSviAjUF1w4uyVSpUvXv3x/eOAIHJCLyklkuYOfOnS6rwvFK Bo93tqdMmYJslSpVWrRokbjW0CPEudAFpNesWVOXH1c30hMmTDh9+nTklMT7 9+8vXLgQLkGjRo10+R88eFC6dGkUge1C/CiJKAgnBKYPZtPdIXzxxRe2aLj7 J+qMyBe2HWEOAlv4RRcuXJg2bZrY1VatWmnze3UKRJ1h1uCEIF2dJYXinTp1 QvciAJfe094hCQkJgVeAdAyPv//+WxIR18sbPfCR8NnlsaDbta5FtI5ej+qM nkHgLxIgtwtMYv5EN2jQAAPmvffeg2yJFt+6dWvUqFHiT44bN85dQZwOm093 tsXLcidS3l4LKj6PbWi3sTojHdesuJEDBw5UhxPMIAwL0r/55httfgTUNofP rJ0Efu3aNXQmxiQuCm9bSIjwkqlz165dsbVq1araxD179rich/Paa6/ppFyL eXXG5fzrr786p//yyy9Sw+nTp7XpH3/8MRIhuM5Fnj596jyrDcYT+TNnzux8 n/zrr7/GJkTuLhsWreoMYOp1re3Xr5/NET7ripg/BaLOQF2/YsaMGXIUIuv4 H0EWUrQhksxZwv+SR0vz5s2xacyYMe4ORzwfcQBu3Lhhqgt8wqM6g5MnT+bJ k0fagzBw1qxZZmY5mj/RZ86cOXr0qHM6ZAg15MyZ013BaFJnb68FlehT56lT p9ocN1LWrVvnvPXAgQO6FIkI+vbt65zZ+SYYIeZ5ydR52LBhYtbMVCUXOAJS l1vNq7MBYtOWLFmiTZw3bx4SEXhiFx5rgI2SShYvXuy8FeFGsmTJYEkQATlv jVZ1LlasmBrsqKj3Zj0+7dW2UHsKVHVWjefy5cvxVatruXLlsmmmTh0+fFjC bcTvzrtAAI6tZcqUcdeGs2fPfvjhhwjTdu3aZabNPmNGne0Okw4nRzwQkDp1 6t69e6NbDIpE/kSro915zoYQTers1bWgJfrUWR7WmJ9cKgE1WvJPlL7OSchL ps6DBw/G1pIlS7rc+vz5cxzFwoULIeKtW7eWaaiZMmVymdk3dUbwtWnTpilT pnTv3h2hpTwq1T2nhlmoW7euCEqzZs1g8QxihL179yKnn5+f86QdoXjx4sjg 7NLbo//OtvOmc+fOSae5fNpuN3EKnNVZ5kppdU2iy/Xr18vXCRMm2JymJ6nI 8lCBgYE+HWtU0qtXr88//9xk5ps3b06ePDlfvnzSGxgqw4cPd74zIPh2ouGW rFq1aty4cR06dKhRo4bsyN2kvmhSZ6+uBS3RpM5Hjx6VrXD5TFYIn1DcxTRp 0vTs2RM+nrvTRIhXvGTq3KlTJ5tjTpEuHZcktEAsjM0x/6RIkSKia0h0WZVX 6nz37l2Yi9KlS8vqKAkSJMiWLVv58uURFOArNunywzJMnz49KChIduHv71+7 du2ZM2c6h8BLly61mcDlwkcxr84ImaU96tM6FZOnwAd17tKli5kugmMQtf3g FRCdokWLHjp0yKtSaPPPP/9coUIFOQQcqctsXp1o9PDAgQPV++dw/PLmzVup UiX56i6GjSZ1tntzLWiJJnXGoJLr1+OMbi3wAPv27avOHENfffDBBytXrjQz 954Qd7xk6ix27KOPPtIm9uvXD5ebOOeI2hAySLq8bRF5dUb/iPMMKzd69Ojd u3er/r/MaHJWZwEWAKqKkKpw4cKqZkGGtDqyZMkS27+RhQEhISHO9VtHnc2f Ah/UuXPnzviaNWtWg/4xftE4usHh4xR///33Ptcgz2fRhwcPHnTeav5EL168 WCbMV65cecaMGQgVpZ8xyGNLnQUz14KWaFLndevWST/7IKzoQ/jScEEzZ84s u8iZM+fq1au9rYcQ4WVS59DQUJl6qjWD8+fPtzlm7TpPhjFWZ+idXGLupvsK z549k9uPaJLzFW2szlqOHTvWvn172ePw4cPVdHlsCnOB8NxjJTpmzZqFsohP vS1ojLfq7NUp8EGdx44di69ly5aNqgOMcoYOHRocHAy3JDKVpE+fHoc5ceJE 500mT/SJEyfgIOEagYjoNnlUZ4ltV6xY4W2zTaqzFnfXghafx7axOsscBuBy 7pxJ4FHADFapUkWu3E2bNvlcFYnPvEzq3L9/f3G5tVMlxThMmjTJOb+xOkMN 5Tp19yROkIs9VapULi928+osDBo0SIRMTXn8+LHcHv/uu+9MVqKydu1am/sH 6z7jrTp7dQp8UOc9e/bYHG/l6ObGmwR7bNeuXePGjVGPD8VN8uDBg2LFihms NmN3WPUrV6642ypB5fjx4503mTzROAXIhtPhvMmjOsvMdt0MCjP4oM6C87Wg xeexbazOcLblLkG/fv28rVkHfPXKlSvb3K+/Kly+fBkugVc30kk84aVR59Wr V0vgPGzYMG26PFBzfpETCt6wYUMDdbb/G61MnjzZoD1wjJEnefLkztfXunXr ZOatTp03bNjgchIXmDt3rrPNEa8jS5Ys6g1hk6grQ3r7uNMYb9XZq1PggzqD 8uXL2xzzDXTraZhBXjG2OWZHG98niSQeZ4WNGDECp97lFbR7925Z4MLlVpMn GiG8zdUL+PAK5P6DgTrDe7E5Xic3qN8lxurs7bWg4vPY9jhnG021OZ4luezq ffv26X6L5JtvvnHnU8lia82aNXPXmAULFsgPBMD58eHmGHm5ievqDMOCeKRz 586yllGFChV0r/nISkTQWbVht27dmj179iuvvCLLbRmos8wxS5s27fLly2Ue JvzhgwcPbt68Wc0DPZLrq3379qpth8WAwwxzKrvQqnNoaCgqhCOBK3fXrl3a m+EQekgw8uNwtM1AXIOwS+RjypQp6p0BfJg3bx5Cqh07drg7hIIFC8oNQHUO 6v3792ES3f3akRm8VWevToFv6ozBKY5QgQIF4KepZS9evDhq1Ch0ws2bN10e i3VWI3n48KGcZZtjjawlS5agDxFYQbyGDx8u908Qi7l7DmvmRK9atUpuMsyY MUMuE3QUfEj4NkiUlWTcqfOPP/4oZceMGfPgwQO749I7deqUyxf9tBiosw/X greH7IxHdcblFhwcbHMsEQZXX337ICQkpGfPnrAzUFL1LGzcuFEuTJyjv/76 S60EZ/Orr76SeEH3QqUW+XETQbvCISH2OKvOsOpwqmVVW3V4N2nSxNn/hFmW q1guoqxZs4qOI86SJ8sG6gyXOGfOnFIWe8TuZEq27o0tXFaSB41B/WJI8f/0 6dPlDS9d7PzDDz+oq3mj2ty5c6OFqVKlkpRq1ao5L2IAK62u5In2Yy9BQUFy IP7+/rrFPLVs3bpVllKUw5cFtUDv3r3N9rgT3qqzV6fAN3W2O+5vq8uK4pDx WdZqszluOxgs5qnOFvb53rhJPL7vDKelTZs22h9F1QLP0+AtcpMnGk6jpAcE BGTLlk2KoD9x2cqMSnfqDD2SV59sjrgyY8aMfn5+MhqNbzgYx84+XAveHrIO j+psd1z4sr6N2lfqjjBWV65cqeaEozJixAj15XS0Af4h+lOdv+1u/qqgLgEK PvzwQ4OcJB4SR9VZBRdyoUKFOnbsaBA/Qh2GDh2aK1cuWJXMmTO/++676ipA uKgN1NnucO+7d++Oyw2ONDIXLVq0VatWzs7wli1batSoIT++gAho5MiRYkhl kU+Xb1ShkhYtWuTNmzcwMBANg4LAji1atMhdcIT0FStWNGjQAGqC/GhM2bJl zfxyLiIL+C04cJSCS1OmTBkEs7t37zYuZYAPc7bNnwKf1dnueGtp6tSpVapU QYXwlKDONWvWhO+EkMrgcBCmQRRQxPz0AN8wuRrJkSNH+vbti/ANpl4GBkJp hKge36I1c6IRn8KXK1GihIxnuHyzZs2SxwEYWgbqDJBt0qRJKJs8eXKM83z5 8qFhiBCNV8Qy80aVt9eCV4esw4w6C2vXrm3atKn8NgfsTLly5caPH+/yPS+Y PgwetFkcHoAR1bJlS3dL7KogQ/78+cVZbdiwoXFmEt+Ic+pMSBzFpDqT+MaC BQugzrrfEyGE6kxIzID40fgXJEn8pEePHlDnr7/+OrYbQqwF1ZmQmGHu3LkG 03dJ/OTSpUuBgYHJkiVz+TMxJD5DdSYkZggLC8uWLdvw4cPPnz8fu8uKEouA kVCoUCEEzvyhSeIM1ZmQGCMkJKRly5a5cuVyt2I2iT8sXLhQVlU1+FltEp+h OhNCSMyzatWq0qVLaxdPIEQL1ZkQQmKe5w5iuxXEulCdCSGEEKtBdSaEEEKs BtWZEEIIsRpUZ0IIIcRqUJ0JIYQQq0F1JoQQQqwG1ZkQQgixGlRnQgghxGpQ nQkhhBCrQXUmhBBCrAbVmRBCCLEaVGdCCCHEalCdCSGEEKtBdSaEEEKsBtWZ EEIIsRpUZ0IIIcRqUJ0JIYQQq0F1JiSO8sknn9hstjfeeMPnGgYPHhwYGFit WrU7d+5ESZPmzp2LJhUoUCBKaouLrFixIkOGDPny5Tty5EiUVBj5s0ziKFRn QuIokbTbYWFhtn+BqkZJk6jOxYsXly5t3bp1lFRIdY63UJ0JsRrPnz9fsmRJ o0aNsmXLljRp0owZM9aqVQtBmS5bJO32o0eP0qZNK1KyZcuWSLdawTrqPGvW LDMtefr0aaJEiZDz9OnTUbLft99+W7p0+PDhUVJhZM5yoUKFUDaqboyQGIbq TIilOHXqVMmSJW2uqF+//r1799SckY+qjhw5MmTIkGXLlkVFwxWso87btm1D S+DbwNUxyHb27Flk8/Pze/bsWZTs9+rVq6NHj542bdrDhw+jpMLInGX4dSbV ef78+blz527SpMnOnTt92BGJDqjOhFgHRHCZMmWCRU2WLBl08+DBg9evXz95 8uQXX3yROXNmRHmbN29WM1vwnqd11PnKlSvi0ly8eNEg22+//YY8iDFjrGHe EpmznDhxYvOxMww4/DQMs19++cWHfZEoh+pMiEVAlFexYkWY0yxZshw7dky3 FUHZ6tWrtSlit2vUqBGDbfSAddQZpEqVCo3ZsWOHQZ7vv/9ebkrEWKu8xeez fPPmTfFPvLqzPXv2bETQ3u6LRAdUZ0Isws8//+zVU2Cx2++8847dMcVr6NCh +fPn9/f3z5AhAwyss76vWbPG5Q1z8OTJE+N97d27t3379qg/efLkgYGBxYsX HzlyJC55XTYDdf7ss8+wKV26dLAnuk3Pnj378ccfa9eunT59ej8/v+zZs7dt 29Y5m3rIUBAzh1y2bFlknj9/vpoyZswYpHzzzTdqytixY5HSt29f3Y6gaJMm TUINKVKkSJYsWZEiRQYNGnTt2jXnbO66dOPGjS57Ujh//nyXLl1y5swp4a0z ukM2f5Zz5MjhrkkqI0aMcNew7du3V6pUyaDlJMagOhNiERo2bAjLWaVKFZP5 xW43bdp037592bJl01ngNGnSnDx5Upt/06ZNWSMizyWN1fnu3bstW7ZUq02a NGlAQIB8RvGtW7dqM7tT5xkzZiAdSrd//37dpqtXr77++utSIbQ7X758UEN8 TpQo0Zw5c1we8oQJEw4cOAARNz5kafbHH3+splStWhUpzZs3V1M6dOiAlJkz Z2r3gka+8sorUic+5M6dW2aOQRB17b93715WJxIkSGCsznv27EFTkQfeSPXq 1XPlyiX7CgoKqvgvukM2f5br1KkT7ABnQfIUK1YsOCJfffWVu7ZBnbV7J7EI 1ZkQK/D8+XOZQT1t2jSTRcRuw/ZC9RDcrVq16ubNmxcuXEAN0FBsatWqlXEN 0BpjdUZ6zZo1kQEh3sCBA//++29Jh01o06aNLWIcanejzkiEYEHTdVIOHjx4 ULp0aRQpXLjwtm3bJPHx48eQS4SH0ETdJCX1IWzKlCk9HrJEyminfIWSimsB kVWnitWqVQt5tFYrJCREpLN+/frq8SJo7d69uwgoPhv3avLkyQ3UGc0QkUVT 79+/L4lTp06VynE4uvw+n2VYbDm5Xt3ZpjpbB6ozIVbg8uXLYkuNn5NqEbsN GjRooJ3LDfr16yeBlXENHtVZVAMquW7dOuetCGB1Kc7qvHjxYhRPkiTJzz// 7FzDqFGjkD9z5sw4fN2mr7/+GpvefPNNbaJXh7x06VKb5l7E+vXr8bVFixb4 /9ChQ5JYsGBBfIXYqaUg/eIAOM/iRtCNTRB95wPRYqzO6BBshUDrJnXXq1cP 6ePGjdPl9/ksU53jOlRnQqwArjKxpX/99ZfJImpUhWBTt2n37t1Sm/OjUi0e 1VnuHnft2tVkk3TqjEAPQXfChAkhSc6Znz59mi5dOuR3uRUHlSxZMij7rVu3 1ESvDvnIkSOig/K1T58+CDbXrl1rc9wbl0QoKfaihtKHDx/GVvgSWr1WQSCP rWXKlDHuBGN1HjlyJLY2a9ZMly6OUOPGjXXpPp9lqnNch+pMiBVQ1dl5no87 DN61OXfunNR26tQpgxqM1fno0aOyFZplskladd6wYYPcenWecyXs3bvX5njX 2N2rwbLuljZC9+qQ79+/nyBBAvgGjx49ktoqVKggK6RJSA5Rw+fg4GC1Eqi2 zf2jfykbGBho3AnG6iy7eOutt3TpiJptrlYY8/ks+6bOGIdFixY1n59EH1Rn QqyAemdbffzqEQO7LboD1CenLjFWZ7kVDIHzOKNbRVVnHIU6eSxz5swugzu5 8+wR7Qx2bw9ZJjAjJTQ0FAfSv39/JBYuXNjf3//BgwfQfV242qVLFzNNMl7h xFid9+zZY3NMkNOG50+fPi1VqhTSv/32W11+n8+yb+psd8wr+/LLL82fdBJN UJ0JsQLqrLDPP//cZJHoVud169aJOkM7TDZJ1DllypRQH3xAC2VlywYNGjhn XrJkic1xG7mZISEhIT4fskxp++2332Rf8uxbJBj+w8qVK/Fh0KBBav7OnTsj JWvWrAbtadGihXEnGKszaNKkCTIgRIW1hHQePXpUpusXKVJEwnwtMa/ODx8+ rF27duLEiS9duuRVQRK1UJ0JsQjvvvsubOlrr71mMn90q7M8hAWQD5NNEnUW 5FWmK1eupE+fHl9nzZqlyyyPcaH+d+/eNVm/t4fcrVs3pPz000/du3dXH2Ev X74ciePHj5eJZ9pfAJHXn8uWLWuyPS7xqM7oWHlFS0ulSpVcPuz2+SzDq5Gt HieZ60AnwFvYu3evea+MRAdUZ0IsgroaicmlFKNbnZ89eyaztvr162fyEFR1 1gakoobQLF1jHj9+jCgbm7777juT9Xt7yF9++aXNsXrJq6++WqpUKUm8ceNG woQJEdTDf7BFnCQvt52xNTI/imGszrCTQUFBxYsXh12dM2fO4MGD4ScYrG7t 81mGzyNbzc9kAIiXs2bN6jwDjcQ8VGdCLMLz588rVKhgc6zygctNtxUREARF fRXIHv3qDIYMGSI3n11e1/v27fvzzz+1KaLOefLk0eWUhUHKlSun21H//v1t jpVLz549a9BOFW8PGRIp3gUEt0+fPmp6iRIlUqVK1alTJ2wNDQ3V1lO+fHkk Vq9e3fkms0mM1VkCdm/favftLMtdi8mTJ5vcl91xQ4Nzti0C1ZkQ63Dq1KkM GTLAovr7+w8YMADyd+XKlePHjyMGhITZ/l3RUYgBdb5z505wcLDNsUTYsGHD 1LnBISEhPXv2TJQoUenSpbVTpNytFXbz5k1ZgkP3u4qov1ixYkhPnTr1lClT bt++Len4MG/evMKFC+ve/vb2kGVWs7wXpl2lvHfv3pIOjdbVA0MnD81xFCii 9szFixdHjRpVsGBB5wVDdBirs/y0ZZkyZYxPjc+HrEXcj7Rp0y5fvlxe3376 9OnBgwe1v6Wig29UWQeqMyGWApZWBMsZxM6qftljRJ3tjgfHskCHEBAQAM9B PqdLl27lypXazAbrbG/atClBggQQ9N27d2vTL1++rK7kia1Zs2YNCgqSx7LY kW4xT28PGZ6DrAuK2Pkfzarg8tYzgHfhXNWePXvUZULRBnwWl0nCfOfFSHUY q/OtW7dkAXCb425/pn955ZVXihcv3rx5c12XRuYs49zlzJlT8qAfcBToB3wu WbKku8ZTna0D1ZkQq4EAZ/78+W+99Ra0wM/PL3PmzHXr1kX4o8sWM+osQM6a Nm0KnUIQjXizXLly48eP164TIhj/RlWPHj1sjvveulnE0NAVK1Y0aNAAupwk SRLE0dCvkSNHOs8Z9uGQS5QogUT8r02EkyM/P/Hee++5bOq9e/emTp1apUoV eCDICV2rWbPmzJkz1bU3DTBWZ8Sw8rwA/YCT69IN0/5KRSTPcmhoaPfu3bEv nDh0bNGiRVu1arVkyRJ3+anO1oHqTAghMUa3bt0SJEjgPBHu7t27R44cqV+/ vs3xSlqstM1OdbYSVGdCCIkZTpw4AWl2GQgLBw8elPvwsbUYyNatW83/ShqJ VqjOhBASM2zevBniW7NmTXcZZLVt8++8RznTpk3zuNwKiRmozoQQEjOEhYUF BAQgfP7ss8900fG9e/cmTJjg52DXrl0x3zYY8MWLF2fIkMH5hz5JrEB1JoSQ GGPBggVJkiRBgJw+ffo6deq0bt26cePGCJZlbnnu3Ll/++23mG/V/Pnzc+XK 1aBBA4N1UUgMQ3UmhJCY5Pjx47169SpZsmSqVKkSJUoEXYYoN23adNGiRT4v gUJePqjOhBBCiNWgOhNCCCFWg+pMCCGEWA2qMyGEEGI1qM6EEEKI1aA6E0II IVaD6kwIIYRYDaozIYQQYjWozoQQQojVoDoTQgghVoPqTAghhFgNqjMhhBBi NeKbOj948KB27dqBgYHdu3eP7bbEEPHwkAkhJK4T39R5xYoVtn85ffp0bDcn JoiHh0wIIXGdOKfO9evXV7UmQYIEadKkKVy4cMeOHU3+Yvj+/fulbIoUKW7d uhWtTbUI8fCQ4yJXrlxJZILvvvvOuezTp083bNhQs2ZNnOWKFSvGZLN//vnn Bg0aZMuWzc/PL126dLVq1Vq6dGlMNoCQl5U4qs4BAQEwBZDmhAkTqmJdt25d tMFjDWvWrBk8eDA0K1rbaSni4SFbk6NHj37wwQf58uXr1auXbtPly5dtJtiy ZYu21PXr1yGIqVOnVjPEmDrD03v33Xdlp4kTJ86QIQOcB/navHnzZ8+euSw1 f/783LlzN2nSZOfOnTHTTkLiKHFUnfv06SNfETUcOHCgW7duSZIkQXqxYsXu 3bsXrQ0gxDeuXbsWFBQ0ceJESKq3ZQcOHIjh3bdvX1366dOndfIdM+qM665M mTLYXZ48eVatWvXkyRMk3r1794svvkAQjXQcpruyMBTLli3LnDnzL7/8EgNN JSSOEtfVWWXjxo1JkybFpq5du0ZrAwjxjTlz5rRo0cKHgr/++muCBAkgu9BE g2yTJk2Kydh53rx5devWDQsL06WPGjUKzciaNatx8dmzZyOCjrbWERLneWnU GYwZMwaboNFXr15VE5HT5R1Cl0bs/Pnz2PTee+/dvHkTpiNFihQ5c+ZEaIBN 27ZtCw4O9vf3r1Klyrlz55zL3rlzB+axbNmyKJUsWbIiRYoMGjQI4ZJzzlq1 amEvf//9Nz4fO3asdevWr7zyCiIO7Ktnz57/uLk5D/ejWbNm2bNnxwEGBgai /u7du//+++/OOb06ZC0rV6585513MmTIgMbkyJGjXbt2OOkuc6INqvmFduCI 0qdPj84pXrz45MmTXd7VRHgFeapRowbqT5w4cdq0aV977bXRo0dfvHjRuFUY UQjQUP+MGTOMc1qcwYMHjx071ttSt2/fxvAICAgICQkxzhnD6uwOuYjAhQsX DLJt3769UqVKMdYqQuIcL5M6Q1JhxLB15syZaiLsf9aIpEqVylidq1ev/tZb b6miBincvXt38uTJ1ZS3335bV3D//v0wobIVH3Lnzi3P4KBEzk97RZ337t37 3XffSYO1lCpV6vHjx7oivXr1kq2Q/sKFC+fNm1duFIB69erBgGsze3XIwt27 d9XpdgkTJsQhq5/HjRvnnB97R8sRynXr1s3ZDXB+devevXvYu2zNlClT0aJF of6IB/E1SZIkQ4YMcdcwoHYsuvTMmTMGOS3OgAEDPvnkE29LSQ+bkXWLqDNG hZxZ4xcEoM6x3lRCrMzLpM6gWrVq2NqmTRuDGgyMmKgz9CJdunQ7d+4MDQ2F ViIF6tapUycc4OzZs0WztOE5gpo0adIgHW2TiBiEhYVBpJAYFBSku/sn6tyw YUMYMcSqkGmI1/Hjxzt27Cgy9O2332rzb926VXY6ffp0Vbjv37+/cOHCAgUK NGrUyGOnebTbaIwcJsJbeXB/6dKl3r17S3uwX11+8Q1QCoqJbDhq6Dv8EJFg HNeJEye0+UeOHIl09Kp2UtO1a9cg/ei6adOmuWsYDlOr+xZ/X88YH9QZHZs4 ceIsWbKYmU1hEXX+888/xad1djK1UJ0JMeYlU+euXbtia9WqVQ1q8KjO4Icf fpCUGTNmSDwrd2vxP6JXpGgj4jfeeAMp+N/5jm7z5s2xacyYMdpEUWeXAZHM tIHqaRM//vhjJJYuXdq5wYhTIm+3V61aJeq/bds23aahQ4eKpdVNZBJ1Tp48 +a+//qpNRza5GzB16lRtunhNzpOa7I47t8aNx4FLd8F5uHHjhnFmK+ODOrds 2RIH/umnn5rJbBF1xllGM1q3bm2cjepMiDEvmToPGzYMW4ODgw1qMKPOMgcV LF++HF+1RjVXrlxIUaebHj58WMJtl0/ZEIBjKzRXmyjqjGDcOT92hE1FihTR Js6bNw+JKVOmdPcU2CPGdrt27drY6nKKzqNHjzJlyoStU6ZM0aaLOv/444/O ReTounTpok1s06aNODn/mHjlTcfZs2c//PDDRo0a7dq1y9uylsJbdQ4NDfXz 8/P39zfpk1hBnY8fP46xgctBvYnkDqozIca8ZOo8ePBgbC1ZsqRBDV6p808/ /aRT5zx58iBl/fr18nXChAn4WqVKFZf7CgsLk9hTmyj6NXr0aOf88+fPx6bs 2bNrE9GYunXrig/QrFmzNWvWePvWmMEhP3/+PFmyZNi6YMECl2URBNkcT7e1 iaLOMLDO+aGk2NSqVSttIlwX8WrSpEnTs2dP6Ky792FfYnr16vX555+bzy9n rXHjxl7lj0XJu3//fokSJUw+JYdVKVq0aAy0ipA4ykumzghIbY5pXQY1RK06 I0i0mQAiqNZgoM5Lly61uXobBe2ZPn16UFCQ1IZ4CgHvzJkzTa79ZXDI4j+A 3bt3uywrL8gg7NUmGqizdMgHH3zgvKO+ffuqs+DSpUuHPCtXrjR+S+ilAQ4V xOjQoUPmi8hDfN0kBANiV53hbsGRQAPq1Klj0vVCzi+//FK91gghWl4yda5Q oQK2fvTRRwY1RK06d+7cWfS0mXt0b7n6oM4CWrVlyxaEYIULF5Z2pkiRAm3T Sr+3h3zjxg1jdUY7nW9H+KDOwp07d3CMiMczZ84s+82ZM+fq1auN2x/X6dev H07Z999/b74I/C5ZB+/UqVMmi8SiOmMEdujQAXsvXry4x4kEKg8fPoSTmThx 4kuXLkVr8wiJi7xM6hwaGoorHVuNzWDUqvPYsWPxtWzZsuYPwWd11nLs2LH2 7dtLa4cPH26c2fjONiJxbF24cKHLsm3btrU5vUTmszpr94uhUqVKFZtjjvem TZuM88dphg4dGhwc7K6HXYIOsTkmwpkvElvqjFMprxvkz5//ypUr5gvi2mnY sOHevXvjyf0TQrziZVLn/v37Szhp7L1HrTrv2bPH5pjwbP7nn6JEnYVBgwbZ HC9tGWcztts1atRw1l/h8ePHWbJkwdbPPvtMmx55dRZglitXroz877//vrs8 OCnt2rVr3LgxutpMndbkwYMHxYoVc7l6jEvklJUrV878LrxV58uXLx8+fDiS N5ZxBmVmQoECBYyXH9GBeBnj3PitK0LiMy+NOq9evVoC52HDhhnXELXqDMqX L29zPOx+9OiRmUPwVp03bNhw4MABl1XNnTvX5ljfw3iPxnZ72bJlctTO527E iBFIT5YsmS4m8ladv/nmG3dRldj2Zs2auWt82bJlpXmpU6d2XjcyDuHVrLCP PvoIh2zmZXYVr9R5wYIFsjR96dKl7969a34vWh4+fNigQQNUUrRoUWi9V2V3 7tzJOduEGBDX1fn58+eIRzp37ixrc1WoUMGjNx7l6oyekZegET7ASVDLXrx4 cdSoUQULFrx586Z2L16pc2hoaNq0aeF4QMV27dqlvQe4adMmCWxx+D4fst3R h7I2WqpUqSCj6mok6oqgkydP1hXxSp03btwo2jp8+PC//vpLTYdt/+qrr8Sn WrJkicu2xdvVSGSWfrdu3czX75U6v/rqq2qvatfWM8/t27fhkdocLwz68B46 36gixJg4qs6I5hAwyorNqpFp0qSJmSggytXZ7ri/nT17dinr7++Pz2ibfIWA 6hbz9DZ2/uGHH3LkyCG14cBz584NxZfFOUG1atU8zsPxaLdRg7p4acKECcXZ sDmeCI8cOdI5v1fq/ODBA8Tgap1p0qSBG4NuVOdvu5vjJ6gz1b16fGBBvFLn cuXK4ZCHDh1qkGflypWZNEgPIyLWJv72228uy6oLq4IPP/zQ22OBRyfL6MkJ zeQGg+leVGdCjImj6qwCkSpUqFDHjh137NhhsoboUGe745WZqVOnVqlSJV26 dPJztzVr1kRUguhPl9O3N6oQXbZo0SJv3ryBgYGwwBB96OmiRYs8Ttg2PmQt y5Ytq1OnTvr06f38/OBgtGnT5vDhwy5z+vDcGcPjiy++QJuzZcvm7wBuRsuW LT3+zu+mTZuQE72K4sY5LY5X6gwHBt04YcIEgzw4+zZPbNy40WVZdHv+/Pnl jpNubTozYEB63DXABeWuBqozIcbEOXUmJI7i269gRCsLFiyAhrZr1y7md011 JsQYqjMhMcOQIUN8+AXJaKVHjx5Q56+//jrmd71161Z3K+wRQuxUZ0Jiirlz 5xpMTY95Ll26FBgYmCxZMt1PnMQM06ZN063SQwjRQnUmJGYICwvLli3b8OHD z58/b2a2QLSCNhQqVAiBs8HPd0YTMBSLFy/OkCEDwucY3jUhcQiqMyExRkhI SMuWLXPlyqX7Da8YZuHChYiaIc3jxo2L4V3Pnz8fh9+gQQOPswEJiedQnQmJ b6xatap06dKbN2+O7YYQQtxCdSYkvvHcQWy3ghBiBNWZEEIIsRpUZ0IIIcRq UJ0JIYQQq0F1JoQQQqwG1ZkQQgixGlRnQgghxGpQnQkhhBCrQXUmhBBCrAbV mRBCCLEaVGdCCCHEalCdDXjyxP799/b+/e1169qzZbOvWhXte7x0yT5tmr1j R3vlyvZ06eyXL0f7HmOLmO9bQmKLEyeU67pDB/trr9mDgmK7NSSOEG/V+cIF +9Sp9gYN7PnyKTqYLJn9lVfspUvb33nHPmmS/ehRJc/Dh/Y+fZQMNpvyt2yZ 2co3bLBnzGgvVMhreT192j5ihD179vA9opEWZ+xYe4oUSqd5i8996y3nztmL FbOnT2/ftCm6dkGswP379vz57QEB4SNK/pIntwcGKv9rExs3jum27dplb99e aQn27u8f03sncZS4qM5//WVfvtw+apS9WTN70aL2//zHu+K3b9s7d7YnTWrP nNk+frw9JMT+6JH96VPFjH/1lT1nzvBL+MqV8Pxbt3qtIG+9FV7kiy+8a5sA yYsr6iwGB3//93++FPehb70FvpbsolGj6NoFiXJw9fXrZ69UyZ4pkz1VKnuJ EvZBg+zXr3su+OCBvUyZ8DP+558v0p88US5wuL6xos5Cy5ZUZ+IFcU6dEXNB lMuXt6dNG34NtmjhRfHz55VICqUqVrRfveoiAxJz5Yqgzv/7n9cKMn26kj9h Qvv+/V60TeXLL+OMOjdtqrQzQwbFKvqAD30rrFypjAQzHD5s9/NTdvHZZz40 kMQCP/6o3MuCis2cab9zx37xonJPGGcwTRr7yZOei4sI4u/uXRdb338/1tS5 Z0/v1HnvXuVmGom3xDl1VoFxxiXslTojRi5bVimSLZuRH/7rr5FVZ4CQHDG+ b8QhdQb79tlDQ30s61vfHj+ueD5mIinh2jX77t0+tI7EAvCmkiRRhsS0aS8S nz+358mjJJYu7bmGNm2M1HnJkrihzgj2ESZE3z0lYn3irjqDV17xTp0nTAi/ bOfNM8r29KnymDKS6hwZ4pY6Rwbf+rZ1a6WIeXUmcYjRo5WTmzat/fHjCOld uoQPFY9zOYzVGcMG7nes4JU6z50bozaHWJD4o86ItTNmVPKnSqUE0cacO6do tOCzOt+8+aISr4hz6uytUKJnEM/aferbU6fsiRN7rc44+3fueNfIKOHsWb3K EGP++sv++uv2MWP06SNHhg+Vdes81GCszrGIeXWG3ZAJk1Tn+Ez8UefNm8Ov 2YYNvduLTkF++UWZogyhT5lSefy9fHmEzIi44fy/+274w+vDh/W1QZjGjlUK Zsig3JnPndter57yFFWLS3WeMkV57obERIncToS7f9+eNeuLualoYb9+L7Y+ eaI8v0PZEydeJJYrZ0+dOjx/QMALa3DxojKnukgRxZkJDLQXKGDv1k3RGpVD h+wDBthr1lQOBDXowL4mT7a//bbSDyieP7/yvA9dN2eO8gqVn599yxav+/br ryPMvFX/YPTcgU5DoF28uCLo+Cxcvap8Rj9gF9hkd9w4XbjQXq2aMnsff2+8 Yd+zx22dOuAkoJNRNnNmpR+KFVP6bds2+yefKNOT0KXQiNmzlUbWqKG8TXPk iLK7adOUvs2ZU/EDhWfP7D//bG/SRJnqj8NHzsqV7RMnKj2p8scf9nHjlAFf sqTSjbL3jz9WjgJjKUsWZWLwjRvhtckRIQjNlMleu7b94EEXjb90SWl8cLAy tPCHatFsqcFqdOwYfro3bPCQ00Cdd+yIMIYFj0Pdh5y3bil36ipVUq4OjIFs 2RSzU7WqZ3WGc+JykJcoobyNpU3BlfXbb+GlevVSdiTpGOqDByvzXTFOXn1V MS8gLEyxSxic0pjGjd2O8H37lAf3OXIoIwqDp3RpZcjdu2fUZhJNxB91HjYs fPT27u3dXlQF+fxz5RLDFTdokHJVqjoI26sCazlrlnJRyCadOmPkQ3oSJFCu FGgExFRtVffuL7I5qzN0Cl9hZr/5xvOVAnsrxbdujZC+aVN4+qhREdLRDCQi YFGF4Ndfw99DgduA0O/8eeWQkSdFCvvOneF5/vzT/umn4TZBp85oNvQC6c2a KQbt0SNlno/M7saxo9+gU7Ivr/oW7YTzM2RI+KajR5Wv+Lt9221XLFigGCLJ r6ozikD1IIJqL2G/cCRwLqBuOEabY0afGYGGy4cewEHBFKMZsMlDh74wkgh/ xDuCFuOQJf3bb5XZ46qNFQ8EPlutWspX2E+MGcg3xBRW1BZxqjk8IjRSnDQo +5IlikCgzbDGb74ZXiHGHkQcyv7WW0rmzp0VKZH2/P57hMafPKk8wYHWoFqo +alTyvlCTgw/C6Jqk/rIyR0G6gypggeoxcxQ9zYnfABcqhgV6P9jx5Txj7GE 4S2tMlZnRM04QPhp6viXQS53inAJo1qkw4HUgTED9wyj4p9/lMsKPhvagJww OIsW2fPmVTw0jBMMJ6kB4wFXpQ4EDthauLAyJNASDCR5/aRgQd/nlhCfiT/q /OGHL4TAK1QFQdCKca4Ciyr2E/YZl4YWXFPO6nznTvitdVwjWhDgyMWi3m/X qTPcaVgABHoe7ZJw+bIiLigO/1kLVE+qlYBRBT4DElU/HFe3zIfXXbzQL7lO tQf7wQcu1Fly5skT4QnCmDHh4bz2Mvehb3FQUsTkne2//9arszBzZnh60qQR bpaGhCgpSIfeGYNGihehG4EilDhfWtSYCKdy1SpljxAReA6iIKLpGAOQSJUZ M8KL6J60vvdeeDp2oY1zu3YNT/fzs2/c+CIdAiHzrHBetNSvryRCCFRgkDE2 LKjO+/eHH1rbtp4zu1RnnCw4QugHrTqbH+rmcx4/rgxyJE6eHCEnBF3up5m5 sw01t7l54vPuu+GDVneLQ8b599+/SIFjJpXAEYWTrLJli3K5yVDUXkTbtimJ CJm1g/DBA8WFQ3rHjp6bTaKW+KPOqu/6ww/e7UVVkHbt9JvgoMomONJaELI5 q7PIEy4r3ZtcuKzg0n/99YsUrTpD03FxVa3q3StLEmhUrBghMUeOF1NrYENU EMjD61bNi4TecCQQT2mZNSu8rNyUFv7zH706nz0bng370nLkSHi69kh96Ftv 1Rl96FKd1XM0aZK+SJMmSjqssTHffRdew9KlEdKnTg1P107aV5vRsqWLqr75 RrnlqJMeXElSBIGMFulzmy18zRwVZJP05s319detq6TDl9AivqLWKbI7XgbU Wngr8PCh8vxFbgtAJT2iqrPLP606mx/q5nPiWrY5bnM5T255//0oUGf4XbIJ w0zLqFHKTRWtlejbNzyn85N6eQJuc9zJUZH3WZwntEuzodpWe47/0hN/1Fl9 C9Lb0EBVEK2sCKqF190FdanOEEekFCnieY+qOkOYoBRlyhjdvHWJzE7XvnaE lkBuUI/cYR479kXmypUVN1vXztq1I1QI7R43LrxV2lddnNVZtR6ffBKhhrCw 8PRBg14k+tC3Ua7O27friwwcGL7J+JVq9R677nWtFSvC07VPSNVm6LpFRWfM sWuZvYy/AwcibJI+h5unUwqE2JJ/xAh95WpYraVUKSUFJt3M45LYAsco6oAo 1eS8PlWdMULQjfiDZl26pJxxxIxadTY/1E3mxB7ltlX79i4aZn5WmIE6Y6cy YUx3Bwzxu/bpmF2jzs79pq4CpD43OX06PEV3ww1dJ/cH8PfHH55bTqKQ+KPO vXqFjzEYVa9QFQRXtw5cOybVGSZCLlvdBe4SVZ3lctYqqUkQGksNahyEUBRW C8izxRIlwtOh14kTv1jlUm2nuz8/vwii46zO6i3cbt0iNAmBnrNK+tC3Ua7O zjP31OnBxuqszlLTzV6TtWh0Nbtrho6nT5WHmHAPcuUKf+ThTp2dZ+KhQ1wa WLvGUGtZterFuU6ZUqnWaqvwwmNBKAc/BJ2me8BhgMFzZwiNqs7mh7r5nGvW hKfopnYIUaLO4NNP9QPj4EHlq269PpcnXbhyJXxTuXLhKapT7e4PXpw1pwu+ xMQfdf7hh/Bh5u2i0FGizidPhqeYWQlBVWcE2vg/SZIXD4XNI7OemjYN/1qy pH316ght/vtv5evKlcp1p84HU9vZsGF43KH7070j5qwUyCC7Rrihvc8mkWDy 5C9mKdvjuDqfOhX+hBoOj5Y33lASg4NNNUMFITyCxLRpFcdp9mzFa9qxI3rV 2e6IodR1L+UPjdeeoFgEEV+NGspDT92cK48YqDOMk7r6lvmhbj7nnDnhOV3e oIsqdcaJRiXY+tFH4Sl9+igPs3QYqDOQ1xLVAPybb8IzT57s+hjNe0ckqog/ 6gx3URxgiJ1Hww5PUr0uokSdYSgk5fXXPTdVVWeY5aAg5UOGDK5f3DBAJpSm ShU+vzQwMFwr798P/1EAucXaubPyzpEKREF2DcNoBpdKgd6QecVwhBDF//OP YrUCAvSzlexxXJ3BV1+FD6qhQ5Ubyxcvht+iyZ5d/7jcWJ0nTlQ2Qeu/++6F GYwBdRaOHVNejpPJP/iDXvv2nn4UgmMpW1a5hSs+pFeYfN/Z/FA3n3Pp0vCc w4e72BpV6mz/9zkdrm5czs+eKTMKtE+QBYOTfvNm+Kbq1cNT1Kjfhzt1JJqI P+ps/3dRaPxNn+4hZ61aL37AIkrUGcj83pQpPc/v0s4KQ+AgE24RR3u1/oZ6 gW/erBxvkyYvNsmsp1KllM958+p/vVFeknKeAOMSd0oBXwLROlwC2PxMmRSD D/vv7GDEdXW2O2a6ylvScEhy5FC8L4wc53kCBuqMIFFCoffei5AereqM9uhm f8kK9pIN5yUWuXdPec0W41OWrPEW86uRmB/qJnP+8Uf4rl3eIpOn/1GizjAL kgEnERYXVsX5YNWT7hz2qo+ZevTQp/DHYqxDvFJnxAiyNDcKhoW5zbZ3rxIQ LV4c/jWq1LlBg/DEJUv09SBUqVDhxYszujeq5s0Lf0XR5JxVQd5/RClEczVr RpiaiwZI/YhkEUfD/dYi83ttEedmCzBNcLa1L1y4VIqDB5Xbs/CFPM41iow6 a5thQLSq8w8/KIuQfP65Z/NuoM7qhJxWrSKk//hjeDpkWkuUqLO87Kxbx+zc ufBs6pOUixeVV898+wEyn4FApE3r+gY7RvWgQRFWaHHGvDqbH+omcz56FP6W sZ+fixVHcRl6q87OEbGKLClQtaoyA029xa1FPenOb2KqF5FqrTHU5X4XLKTz LDIMAxgoVeVjZVTEQ+K0Oov6vP++F0WWLg1/4IIYx+UkB4zk3LmVDOpSHhiE qpvqXJts0s3aRU5J167/gCtOXjPMmTPCbU+M+S5dlNcYVRB8SXE1m/qSTrly ypIXJunUSSmSLZsSw2pLQTTFS8mf34WTjxMozkBwcIQughXq3FmxBlratVNy pkoVIVEeZSIQ27dPudLhe7i7U+pD36rvMZl8Mw59aPv3gZoWl+dIkN8ZxJ/x XQ4EyHJCx45V1maR3yF1J9PummF3dKws14YATXUaUZWsT4K/OXMi5HfZ53bH j31Ifudp4X366NVZ7tbqZneLC4GxobpVsq4OXLgYe5tGFt6Bg4Q96v7OnlXW Ciha1EMN6tsZHq8U80PdfE71Ae6bb0botJ9/Dq8haVJPXaB5LdHl3G9BXodH nTg7unfuBFWdde9o37wZ/ju5depESFed0tatI1ywyF++vDKtVCXmR0X8JO6q c0hI+GgvXNi790F27lRu50oE/dlnSuQCVxxBBCLradPCHUiEFerskVWrwget 84sqqguqExd5tRl/uiU6YWblNjVCgx49lBgZdRYposiZdo0O1ZZqX/aZMCFc CwoWdH0xOvPLL+H1yKqPWtQVtBYudFFw0qTwvoX/07+/8nRV2gk117YTpknC ATg82puQ6tuU2j8IEGoYODDCj+L50LcIUuQXIdOlU2QIBbt2NeoE9KHUo1vw 0905grPUtm34Jo+/MqYuCqf+od8yZlScKDhU2vvbiEYlA8IcZwVXp3nnyqU8 wkbbYA8RA8pZgLuIiFsuLHd9btcs2aGLpHBE8iwDf2fOvEhH1J8woWLDJUrF eUHNSFHv7cCzUo/L2YeJJnA5Ow8e7Z/uvSEdaLO8HI2/9es9P0A3OdTN58QJ Qv9LAyCCHTsq70pXqaK8t6iuF+fxhzyAvDaFSx7jFtc+XA7dOgnq25HyiMoZ VZ1hbeDrwsTdv6+MQ/kJXYQnkF0tMIPqohBwQjAI4QD07q0Yw0aNXvRkrIyK +EmcU2cMMIyuTJkivOMAc40I0XwQjSsIygWnFxcyqsIgT5FCucrg7iLexCa5 dXbiRHh4rv4hYFmxQtmEPKLj6h9sMsbq6tUvfnha/lCD9lfgjx5VImVcqsiP neLKgkug3ltGYCjrLqp/cCHUCHrvXmV9p6AgJbr59FPPh4loTpYt0q6HKSxe HN5v7uILRPoffKDMbvL3V4QV/gOkUOsFIYoJCHjRTpwOnBcBFzIOSrvit/YP F/v//udL36qgkxFAYe/oPXgyly65PgSky4Jj2l2ghw3OEQJbsXiq1MLAGrxm i1AXDZCnxs5/GF0woc7NQLcXKODijCA/hkSOHIpJl9lQw4crnQ91hnHGGXHX 54jmcKa0u0A9s2Ypm+DkyCRA9YhQm1haHBfOaaVKyuFjL5BF7EX3xLlXL6W4 rNUcA2BUGEsz/n76yXVZXEQ4WSKg2q5WXxpyh8eh7kNOjDEoGroaI612beVc wEdSF+tDI/Pk8dAqeIbVqimnG3apVSvXy6TLPXzntQIEVZ1xEnG9oCW4rDBg 3n1XiaZd3uRBI7EJMTWuOMQRGBhVqyopuifXMTwq4i1xTp2J9YH9ROhXooSy SBEcfjjt//yjxPuDBoWH/9rb+HEX2LeJExVFQGS6b59yjDhSxLNbtrxYSVu7 cgshUcuUKYpKuluqyHiiPrE+VGcStaxfHx6/aH8JS2XAAGVT5swx3qxoQJYU Q6jr8vYp/BObq0U1CYkqOnVysQSuCtU5rkN1JlGL6G/ChK4nPH/7rbLV48Se OIE839QtZq7SqpWy1fiZOCGRIXt2F28cqFCd4zpUZxK1qD9+5/zi2PPn4W+m 6CYhx1HklxECAly8xx0WpkwP8PeP5ReHyctH587KBJuQEGVGq7qWiEt69w6/ ErnMVxyF6kyilmfPlOnoNseLORMnKq9Gwjg8fqxMaWvQQHmdZMKE2G5iFAEJ fv115Uhz51ZeJ5dX0e/dUyaiFyum3L3XLkhOSORR18cWt9Dg3Y2nT18ssMBf r4ijUJ1JdLB1q/JErFAhZZpoypTKDNUqVZSXjLxa7sz6PHqkzGitV085wOTJ lReWCxZUvi5ebGqdMUK85aOPlJGWP7+L34VUGT8+wtx+eVFC99YzsT5UZ0II IcRqUJ0JIYQQq0F1JoQQQqwG1ZkQQgixGlRnQgghxGpQnQkhhBCrQXUmhBBC rAbVmRBCCLEaVGdCCCHEalCdCSGEEKsR39T5wYMHtWvXDgwM7N69e2y3hRAS N0iaNKnNZtu+fXtsN4TEI+KbOq9YscL2L6dPn47t5hBC4gBUZxLzxDl1LlWq FC6T/PnzO29q27atyC4CZHfF9+/fL3lSpEhx69at6GxpXOXp06cbNmyoWbMm eqmiu18v1vDdd99Vrlw5derUyZMnL168+NixYw36H/z666/16tXLmDFj4sSJ 06dPX7du3dWrV0dd8wmJeqjO0Y23ZkdL/fr1xar/Iz8U97IQR9UZHDlyRJv+ 5MmTdOnSeVRnsGbNmsGDB0Omo7WdcZHr16/XqlULOqveXjC+THBBNWrUSHKi VKZMmeRzkSJFrl696rJI7969JU/u3Lmh6dmzZ5evnTt3jp5jIiQKoDpHH96a HR2ff/65WpDqHOvqnCVLloQJEw4bNkybvnHjRpydoKAgj+pM3HH69GlbRIwv kwEDBiAPouC1a9c+d/zEO1ymV199FYlVq1Z1zr9y5UpsQoi9fv16NRGBc4oU KZC+dOnSKD8iQqIEqnP04a3Z0bJnz54kSZIUKFAAVoXqbAV1zpUrV6VKlQoV KqRN79SpU9q0aeXGCNU58kyaNMn4Mjl37pyfn1+CBAl27typTQ8NDU2fPj3K rlq1SlekYcOGSJ8wYYIuferUqUivV69eVDWekKhF1HnHjh2x3ZCXHI9mR8uN Gzdy5MiRKFEiaDRsEdXZCuqcKlUqOYlHjx6VxGfPnmXOnPmDDz7AadWpc58+ fWyucDcAdu/eja2oyu64cztz5szSpUsHBgamTJmySpUq6wx+8vzlwuNlMnHi RGSoW7eu86bRo0djE7RYl16+fHmkb9u2TZd+/PhxpAcHB0e+2eSl4dixY126 dClcuDDCIohjzpw5W7RosWbNGrlL48zDhw+/+OKLChUqwD4EBAQULVp0yJAh zk9YDh06hMGGDLDtLuv566+/kCFdunSPHj1SE0Wd9+7de+vWrZEjR6JV/v7+ GTJkaNSo0b59+9wdAuzSjz/+WLt2bfirkI/s2bO3bdsW5tRd/gsXLowbN65y 5cqwZsgfFBTUrFkzNNg55yeffIL2zJ49G5/DwsKGDh2aP39+aVKTJk3Qde52 YXHMqzOGwTvvvIPM/fv3f/LkCe9sW0SdEa/JFfTxxx9L4m+//YavuBBg4XXq DKXIGhFcvB7VuU6dOteuXYMc6zQdu162bFm0HqBF8HiZ1KpVS7UPOv7880+b Y96dzpC+9957SJ8/f74uP7wsxs5Ey9KlS5MkSYJRAZHKly9foUKF4B7LNQjZ /X/2zjsqiuv9/6sgIKAoItgAEUTFbmwYUGNFYsGOJSK22DX2RCwxatQkRsWG JcGY2DVgS6wndo0Y1HPsBhS7oh9RbBT5vb/7/Jwzmdkddpdd2IXn9QeHvffO nTvlPu/73DZygbtx40bVqlUpAQ6E+NL/JUqU2LdvnyRx06ZNEfX9999rPPWX X36JWMmKS1Ln5cuXly1bluyAtbU1naJw4cK//vqrPB80DOhEpPW4Cnt7e/wP X2/NmjXyxIMHD6ZLBnZq6H/cAfm0SVLn+fPnx8XFCZM3BEqWLPnvv/9me5PN EN3VmVLCdUIj6tWrV6zOZqLOeApowdZUQ4FjxozBy4xAVIFse7aVXwBSZzRE q1evjpd82bJlDx8+xKXt3r0byo4oT09Pba33/ES21YTuxrlz5/D/69evR40a FRoaeuvWrSx1s5YMEf0UOHbsmEo9H+zevXvi8OnTpyMcd9g0l8JYGC9fvqSp CIMGDRI8XPihaIS3atXKy8vr+fPn4vRwHvFSIT0E+sCBA0iJwIsXL9I4FywD vaUCtKzSx8dHXpERQmJ3/vx5cTipM0QZFmbz5s2QA5wFXnODBg3IE09ISBCn hwmCcCAKXrbQWZSWlhYVFYXyQKAl40FwkKHyuIpFixbdvn2bAk+fPl2nTh0S d9wTcXpS55YtW6LRAksVGxuLewLXe8mSJVTUfv366XPLzQUd1Rl3D60j2Gda FYubw+psPuqMpubcuXPxz7Vr1xDo7u7etWtX/EM1K+fqTAItWRC9Z88eipJM F8+XZFtNYEyQ4MmTJ/j/xx9/pDvTrVs3iq1SpQp+4mZKjlq4cCFMHKzN4sWL 6TGdPHkS9mTYsGEmuxTGwoCc0eskkSRCvhDyiy++QGJ4tZJ+7PT09E8++QRR /v7+4nAIKyQe4X/++ackq0OHDiG8Xr16knCSvI4dO6IhKg5Hw8DV1RVR48eP F4fPmjULgWXKlHnw4IEkq5UrVyIKzQxJ+P79+yHfksBHjx5RX190dLQ4nNQZ hISEoKkgjpo4cSK5z1kWiC7qnJycDIMPMyLMbGF1Nit1xjtPM/0WLFgQHx+P f7Zv3571waHLuTpDeiT+XZa6XU3dTQVhdrHyXRK6kuhWz5w5k34KNgf2DT9h cOTHTps2jRKj2d+7d28HB4cRI0YUhO4IRkfgh1LbTz4IIgeKRo72smXL5LFw gellk/jCP/zwg0rTYApcToQvXbpUEq4wZ5tWLsBHFkIyMjJodSe8bI0Ftre3 h/us434LtGhRsuSQ1LlmzZpyQRf8C2o5WxbZqjMMRXBwsEo93CwEsjqbmzrj fzSJAwICZs+eDTtPMmEsdUbd0RhLHWg//fRTjq/D3FG+S/AgqDqQK5GUlFS9 enU3N7eDBw9SAlpXdeDAAclRsH4wvAMHDoyKimrRogXuM5K5uLhIXAOmgDNn zhx6wQIDA3/++Wdty+ez1N2/lPLu3bsaE3h6eiJ24cKF4sDnz587Ojri9RO6 kUFqaioCIcTwiCWZKKjzhg0bqD0PV51Czpw5o1KPF799+1ZjkWrVqoUEcXFx GmNxFKzQ6tWr4QWHhobCT0Tinj17itMIPdvyw1EZ6YZIOtstgmzVmS4cZl+4 21mszmapzpGRkahfvr6+/fv3p1hTqzM0SKVlKlQ+I9tqQsKqzWzSBABYTiEE tQl1qkiRIps2bRIC7927B9eDVkNIFrAzBZx9+/ZRD4xKPeDbsGFDtMMlMxmy PgwiQz215YNGoLznGYwcORLhX331lRACV12ug4SCOtOUVCAMkW/dulWlA4cP HxbnA68Q1xIUFCTMB0OrFa1cal3QyJ2AgjrDZabDb9y4oe2emC3KZgf339ra unTp0pKOTVZnM1TnR48e0cxJoQeV1dlYZKvOZDQ0brmWmZlJFkZciSjDKVOm yNOj0kGg4X3Ex8cbpfBMvuHixYsQZbTrqDWIv2FhYeJZYdu3b1dWZ0gYEowb N04SDvGC6Lu6ugorp1q3bo2U8jneWYrq/Ndff4n7kcCWLVtU6qnjPRW5fv26 kMmLFy+onM7OzqNHj/7jjz+Sk5MpitaEsjoDb29vlXpEzPu/UJcm8PLywk8L nREnx6LVOUu9rsfNzS0jI4N+sjobi2zVuX379kgQFRUlj8KrQnZGHEh+0Jkz ZzTm1qNHD8ROnTo1h8Vm8is0EZS2hGratKkQLgyz3r9/X+OBNAFM4/opeoch pvj/4cOHqPXu7u405VuCgjrDGqj+OwvrxIkT5O+npqbqeHUDBgzAIZ988om8 U53VWYAmyGWLxttiiVi6OuOkqFZCLKuzschWnZcuXYoEbdq0kUfRCina0UXA x8dHJZucIzBmzBjEjhgxIofFZvI3cGzJAguOJzxfkmyN+ksNRdWHpX8SaPtf uMxZ6mEy/B8REaHxvArq3LFjR0R16tRJCElLS6PV2evWrdPxuugSNPZEsTpn C/dsm6c6S2B1NhbZVhP4MmRSJFO/7ty5QxvaCzPEiC5dumjsYMxS94TXqFED sUuWLDFW+RnLJTExccOGDdqiyA6Lt8OiEWQXFxfJLOWMjAzqLq5fv762c+HF g5ObkJDg7++Pf7Rt4kHqLN9F5NChQzgKUbt27RKHT5o0SaVe5CWedaaN9PR0 yuTkyZOSKDRCqlWrxuqsDKszq3MWq/N/oYm10OJt27bRkqi4uDjasqlDhw6S xLixhQsXhhWaMGGCMKaWpd69MDQ0FIeULl1a2+aKTIEiICBApf6Qys6dO8Wd w1DkwMBAlfojaOIleNAj2ugAQibejYS2s7OxsRHPTpSwatUqlXomGN5MjZ9u IYTdSAYNGoScs9QLECDWtJirTZs2kiWB0IuaNWtS7Vi0aNGLFy8oHP9ER0f7 +flJtuymNQ6NGjW6efMmhSQlJcGRt1fD6qwMqzOrc1a+VueYmBg3EWR2ihQp Ig48evSo+BBYpM8++4zqhZOTE23LoFJv5iDZzYlYv349bbEIWwcRhzHEX9q9 EMcqmFCmQPH333/Dk6V3Ca+Hu7s75Ex4uyDEwgb7AhBuWiZAcizs5Fm8eHGJ VysBIksfbVEpLq/GG4s8Z8yYQQux8ZP+AbBI4tamAGyUsJMn7AlMU7ly5Whu m52dncQNj4+PJxVGAwAVDS1VOmr48OH0Zbf8qs4GmB05rM6szln5Wp03btyo yg5JJzaxYcMGWCGoM8xLrVq15s+fL/58gITExMSJEyfCU4DZxE0uWbIk7PDc uXPlk2GYAs6xY8dGjRqFN8rZ2dna2hp/4VOj8mrcQCxLrbMLFy5s3LgxLDyU FII+efJk8aQUbXz11Vek45JNt8RAjitVqpSlltFevXpB0HGKOnXq/PDDDwpv Oy2SCgkJgS5DceBHN2zYcObMmRonsEFM+/Xrh0YIWhdeXl5Dhw6l7cRpQ5X8 qs4Gmx0xrM5mos4MwzBGhL62Nnjw4LwuCMP8B1ZnhmEKLOnp6bTkSuOkbobJ Q1idGYYpsMybNw/S3KxZs7wuCMNIYXVmGKZAQSPFL1++/Pbbb62srGxsbLRt ec0weQirM8MwBYrw8HAnJydaYly4cOFVq1bldYkYRgOszgzDFCiCg4PhL5co UeLTTz/VuP0Xw5gDrM4MwzAMY26wOjMMwzCMucHqzDAMwzDmBqszwzAMw5gb rM4MwzAMY26wOjMMwzCMucHqzDAMwzDmBqszwzAMw5gbrM4MwzAMY26wOjMM wzCMucHqzDAMY1KuXbvm5+fn7Oz822+/5XVZGIuB1ZlhGMakjB49WqXG09Mz r8vCWAyWq84ZGRn79u1r06YN3vmPP/7Y6Pk/evQIOX/00UdGzxlkZmauWbMm ICCgZMmSjo6OderU+fbbb1+9emWKc+nFnj17QkJC3N3dbWxsSpUq1bZt261b tyofsm7dusDAwBIlSjg4ONSqVWvOnDlv3rzRlvjSpUtjxoypWrUqEtvZ2VWu XHngwIFnz57Neck3b95spQO3bt0SH9WwYUOVdnJeKoYB33//Pb1RTZs2zeuy mCl62XMDzJQlYonqnJycjMcBORCsqCnU+fLlyyZS5+fPn0OX5VoAqfr333+N fjodSUlJ6dKlC5XE2tq6dOnS0DL6GRoaiuaE/BBUqK5du1IaPA43Nzf6v3r1 6o8fP5Ykfvv27ciRIynPQoUKOTs7Fy1alNLj59dff53D8m/cuFFBZ4VC4i0V H4V7jnBtUp7DIjEMkZaWtnz58pkzZ96/fz+vy2J26GXPDTBTloslqnNiYqLE 6ppCnY8dO2YKdX7//n3z5s2RM5zHyMjIBw8ePH36dMOGDSRt3t7eL168MO4Z dQE626BBAypAbGxseno6AlNTU1FCtE4RvmDBAvlRkydPRpSrq+vu3btxXQi5 cOFC3bp1EYhrlCQ+cuRIkSJFoIZr167FJVPg1atXBX0/fPiw6a4OzSG0AXbt 2iWJcnFxwanxhpvo1AzDKKO7PTfMTFkulqjOYr777jsTqXNMTIwp1BnaRK0+ yYdlb968Sa3HSZMmGfeMOhIdHR0cHPzs2TNJ+KxZs1Cq8uXLS8KTkpJQIyB5 J06cEIc/evSIJA/VR3IIUso7vVHj/Pz8kH7EiBHGuA4NREREIP8pU6bIo/Ag EPXkyRMTnZphGN3J1p7ra6YsmgKizleuXIHxhwrAY7W1ta1YsWLfvn3hSZHH JyBvxWkkJ9dYvXp1bUr0ww8/IKp48eKvX78WAsmn1jiqMmbMGET17NnT4MLo wp07d+iq7969Kw5HMxWBqCnyQ7755htEde7cWcdThIaGIv2AAQOMUFwZcXFx VlZWuO3v3r2TRKWkpFBLSfIaMGbCy5cvFy9e3LJly9KlS6MpWLZs2S5duhw4 cEBjYvhQq1ev7tixo6enJ+q4s7MzDty2bZu2zGHhYdIbNWrk5ORUpEiRMmXK 4GVetWqVwvQPlAcGp2HDhsWKFbO3t8dL9eWXX2ps2qFVr9F0TJ06VWPObdu2 ReyNGzey1MYqLCysQoUKuGRYqrFjx/7vv8Mx+RiDvS1tZsqiKQjqDGlD7UMy vO2VK1euVq0aFJAeZY0aNcS9mvfu3av9ATTDkKBo0aK1ZRg8iwnnovNevHhR Hvv8+XMq544dO4TAPFdn+LZwkHEiNF3E4WRPYA/lh9CQPSyYLqqXnJzs6uqK 9Bs3bjRWmQVQ+Dp16iDz48ePy2Nv3bqFKNh8o5+XyTlQYWEmA95AvE70HoJ+ /fq9fftWSJmWljZ//nzIMcWiueXo6CgIIgRUnjkUEM+dcoaaQ2fpJQQuLi7b t2+XH4JaD8WkNPinUqVKNOKJloPcIEDoy/8XOzu7bNX5zJkz69atE+ZjCEDr cY05uJcWg8HqrM1MWTT5Xp3R3EW9RppBgwYJw52ZmZlHjx5t1aqVl5cXNFHj gZGRkSpj92xTtzbsgLYE/v7+SDB58mQhJM/VmaQW5k5iH6j1cu7cOfwPZ3/U qFFwgWlGNEQZngViJROkJcB13bBhg4+PD1IOHTrUFA7szz//jMzhT2mM/eef fxBbq1atgwcPjhw5EhYVKXFX//jjj3w2vcTiOHToELVU0biKjY2l3iR4xxAv Dw8PNLDxv5AY3i7eRrjAkyZNio+Pp2eXlJTUo0cPUjfJ4AuguR9wnK9fvy4E Xrt2bfDgwQ4ODnFxcZL0SFayZEkc0qlTJ/Jws9TeNy2VKleunLyvVcKnn36a rTp37twZEtOhQwfINC4K5fn888/pEn766SedbpyFY7A6azNTFk2+V+cjR47Q 6w2ZlsdCILQdaAp1njhxokpxVQWaEEiA6imE5Lk6T5gwAWcJCwuThBcuXFj1 YcT2xx9/pJvcrVs3iq1SpQp+njp1Sp4hBB0mFzaWcmjSpMnOnTtNUXI0p9H6 winkxpaABKi00KBBA5h3U5SKyRYIE3mpLVq0kE9UgJ25efOmJPD06dPJycny rKi5279/f3Eg2oHk9u7evVt+iEab0LJlS6THX3mzjcZlZs+erXxRuqgzmDNn jiSK5kHpPk5k0RisztrMlEWT79U5ISGBVOCXX37RK2dTqDOJr0JFmzJlChIE BAQIIXmrzmi929rawosR/AUC9pOMCRnPmTNn0s9WrVpRgnr16uHn/v375Xni DRHrYFBQkMLgYE74/fffkX/Dhg21JUhMTKxRowYSoACw7Wh1w9lftGgRvDAc 6OfnJx+qZnIB6mKys7PL+Rgi1WI8Skl4xYoVEQ5PGU24bDM5f/48EqMWaCwP HHNqzilnoos6Dx06VB717bffqtSrFLMtZz7AMHXWZqYsnXyvzgDNURKCwMDA n3/+Wb4UVyOmUOc+ffogz169emlLQDJXv359ISQP1fn169c0aCtvzyOKbil1 OcLNhPVAUQ8ePEgJaF2Vtgk80PT79+8fPnz4yy+/LFWqFFJ27drV6JuxkD1c unSpQhqNxjk+Ph6VHceuXLnSuEVidKF79+64+SEhIQYcC78YlmrDhg3Tpk2D J0UvMN5MSTK8qDS86+PjM2/ePJh3hTznz5+PlM2aNdMY++zZM+pTVS6YLur8 zTffyKPgViDKw8NDOf/8gQHqrGCmLJ2CoM5g37595M2p1PNA4C7Nnj1beVTU FOpMo0jahkGzPnR9ixcL55U6Z2ZmduvWDfm3a9dO4yAs9Q1qa+rQLh+nT5/O 9kRPnjwhKYcjk9NCi0hNTSWFTUhIMODw8PBwHAuLasQiMTrSqFEj3PyIiAi9 jjp79izkmBp7KvWkRLQYa9Wqhf8RKE9/5cqVLl26CDPNvL29R48efebMGXnK ESNGaB7/+C/KEycMVmfUfVW+WyukDX3VOVszZdEUEHUmLl68CFEOCAggZcFf VOfcnBU2Y8YM5TxpDEssuHmizrAzQ4YMUalnTGnbHcXT0xMJNE5fRzWhGar3 7t3T5XQnT55UqafaZju1Rnd2796dE49j2bJlOLxmzZrGKg+jO7S96vTp03U/ BM1a6GyRIkVQHeA43759m8J37dqlTZ0JvKIrVqzo0KGDg4OD0MN2+fJlcZrh w4eTPvbUTt++fZVLyOqsC3rZc13MlEVToNRZAB7f3LlzqT5qm6O1atUqeu7G KOb/hyoazqttYmG1atVU/51hQus+1q9fL09sInXGO08+vq+v78OHD7Ula9++ PdJERUXJo/CqIMrZ2VnHM6anp5Nh1DiLzDBoBxKFbgplFi9ebPS2GaMjISEh uPndu3fXMT31/ZYrV+7SpUuSqGzVWeDNmze//vorTSN0cXERdwrR0JjCBAZd YHXWBd3tuY5myqIpmOpM7Nu3j0RBvKpCgJwv+YhVTkCVJ7dd43SphIQEuUhR F/G8efPk6Tt16mR0dc7IyAgLC0O2VapUUZ6Ts3TpUiRr06aNPApeD6L69Okj DlTo9xN2ElDYUXPt2rVwcGbMmKHjTC0yhuK1aXoBWcfhvXv3NuxwJicsWrSI GrE6ThGhZw1TII/SXZ0JnJE2Q0DjXAg8ffo0QgoXLpyTtbSszrqgoz3X3UxZ NPlenVGhNmzYoC2KROHKlSvyWGHnkH/++cdoxc3Kat26tUrLFlujRo1CVKVK lcRCRpXa399fkpj2uDauOr99+5bclho1ajx48EA5MewYdT5Ipn5BamlLUmGG GAFhHTx4sMbPV/Xr148aQtom0O7du1cY3dOxw5N6ISIjI7UlePbsGe6txrkH ZA9VWlbcMKYmOTmZps3jAcl7mfCWbtq0SRxC35SZO3euJOWLFy86d+4sV2fk uWTJEm3NPJrOvWLFCnFg48aNVeoVXgZP42d11gVd1FkvM2XR5Ht1pprbvHnz nTt3incwgCIHBgaq1EsVtLl1VatWpc7t8+fPU8jr16/hcUuGpfRCWH8tqf7I ltzqNWvWiMORjNKPHDnyxo0bKMDZs2fhRSIxdNmI6gxTBuOjUq8NEbZtUYZ6 /KDF27Zto3sYFxdHN028ZDtLPUerTJkyKvUU2dWrV9MqaRi6c+fOkf2U3xAx QlNEpX3qrATaDkXjpk8Ebczr6Og4c+bM69ev05SShw8f4ly0DwZPCctDqLOa 3sY9e/ZQow4v/44dO2gpvfiDJl988QV1RwvGJyUlBa9ZhQoV6DWQqDMkkl7F qKgocacoGpzDhg1TqRdzCSPXBKwfbWqEs8OS0PcXstTD1niR8M5rm74iwOqs C9nacwPMlOViceocExPjJoKqDMypOPDo0aNC+r///pt2JKBk7u7ufn5+wq59 Hh4e8rEqgb/++otmN5EG0WZBYNy4cTm5hLFjx1I+gwYNguMJvYYi0DdW4FNL mgpoKNasWVP1X2Bz4D7AOTWWOuOkws7AuEw3LUi+f4ejPvvsMzoKzo5wV+vV qyc3VgkJCRBW4RKKFi0qfPqtcOHC8KwVigcrKhyoy3bcuGmUWOK/i4Gf/tVX X9FtV6mnCNK7RLRv317j9jVMrhEdHS3M1MIbUrx4cWF+ddeuXcV7huBlozYh 1VMIGb1aMONod8nVGa9xnz59hI+Zot0ImwDLQJ9EwZu5ZcsWeXlOnz4Nc0Fn gVnA/6VLl6afZcuWzXZ3X1Znjehlzw0zU5aLxamzLp/xlS+zPXbs2KhRo+AF Ozs7ow7iL3xqtNOytcDwmrt37476Sy8MGmxoqOdw8hLcNAi0YGoEcCLx9y8E kpOT4TjDGkBKUEn79et39erVrA8bURpFnYV5WcrcuXNHfuyGDRuaNm0KdUab AXd4/vz5Cr1/8IN69+4NtwWGFybO19d3yJAhQteENtLS0mBO4ecGBgbqMg/8 wYMHVGCNC2TEJCYmomGAx4qHS4+4U6dOJtq7jNGXR48eTZ8+vWHDhtBcvPyo An379kVrVp4SAh0REeHl5UXfs+jSpcvevXspCsdqHHe+efPmzJkz4abRo8fb hbd3/PjxCoPLr169Wrx4MRqZyJA+LtymTRs0HTVWWwmszhrRy57nxExZIhan zvkGNLZHjx5NzXU0FUz3dWOGYRjG4mB1zlsGDhwIda5cubLCjt8MwzBMQYPV OW9JSkqi0Ss/P79t27Y9fvz49evX+aZnhmEYhjEMVuc8Jy4ujpYgCbRr1y6v C8UwDMPkJazO5sDdu3fHjBnj6+tra2tbrFixLl265HWJGIZhmLyE1ZlhGIZh zA1WZ4ZhGIYxN1idGYZhGMbcYHVmGIZhGHOD1ZlhGIZhzA1WZ4ZhGIYxN1id GYZhGMbcYHVmGIZhGHOD1ZlhGIZhzA1WZ4ZhGIYxN1idGYZhGMbcYHXWnQMH DqhUKgcHB+VkO3bsKF26dOXKlS9cuJA7BWOY/MRHH32k+i9ubm66H/7mzZug oCBHR8fRo0ebrpBmy9SpU3HHPv3007wuCJNTWJ11R0d1rlWrFpmUsLCwXCkX w+QrOnTo4PkB+r6qXuqM5rEg64mJiSYrppnC6pxvsDh1pna1r6+vPCo8PJyq JBrPpji1jurcvn17Ksb06dNNUQyTsmfPnpCQEHd3dxsbm1KlSrVt23br1q3a Ek+aNEmlHW1vwv79+zt27Ojq6mptbe3i4hIcHLxz505TXQ9j4fz+++/6qvPZ s2fpDSxWrFhKSorpymaeWKg6Z2Rk7Nu3r02bNij8xx9/rJxYLzNluVioOgNJ v3F6ejoekzmo8+PHj7/55pslS5a8ffvWFMUwEbBjXbp0oRsI3YTPYmVlRT9D Q0MzMzPlhwwePBixhQsXttLEX3/9JT9k3LhxlGelSpUCAwM9PDzo5/Dhw01/ iYzlYYA6g127dn311VeQaROVypyxOHVOTk6GvIq/ca+gzgaYKcvFEtW5bNmy UIRp06aJw0k6y5Url+fqbImg4dqgQQNcnbe3d2xsLJo6CExNTY2MjETrFOEL FiyQH9WtWzdELV26VMezxMTE0A38448/hEA4zvBxEJ4vW79MDjFMnQsyFqfO iYmJkm43bepsmJmyXCxRnb28vAICAqpVqyYOHzp0qLOzM3WMmEidDx8+nF/V GURHRwcHBz979kwSPmvWLFx1+fLl5Ye0aNFCL1Xt3Lkz0s+fP18SvnjxYoR3 7NjRgGIz+RtWZ32ZPn26ZamzmO+++07ZdzbATFkulqjOTk5O9BAvXbpEgZmZ mWXKlOnTpw8eqzZ1PnXqVN++fStUqIBWlqura4cOHXbv3q3tLGiVLVu2rH79 +vb29iVLloRwnD17FjnI1fnly5faBl7haytcyN27d+fOnRsYGIiSo0jw+nv2 7PnPP//IU7Zt2xa53bhxA/9fuXIlLCyMrqJixYpjx47FbdflvhnMnTt36HJQ YElU3bp1EX706FEds2rcuDHSHzlyRBJ+7do1hNeuXdsIxWXyF7qo8/jx4zVW QG1GnioyzEWW2h2LiopCTXd0dCxevHizZs327t2r8SjYhDVr1rRu3bp06dLW 1tbwBfz9/b/55pt79+5pKxjs0qZNm4KCglxcXFBhPTw8wsPDYU6Nlf7p06dT pkypXLmyra0tDAg8lPv373/77bf5WJ21oWCmLBdLVOdChQpdvXoVD+Lrr7+m QAgEfuLFhoWXqzOq1ciRI+nZQW19fX1Rs+jngAED5EMVeOdR74Q6jpqoUo+u fvbZZ3J1fvXqVXkZKKGCOj9+/Hjw4MFFihSh/O3U0P+okvIpUqTOZ86cWbdu XdGiRSUmCDckLS0tR/dUEZgvuhz59Fc0DxAObdUxq169eiH9L7/8IglHK4t9 Z0YjuqgzJFJSAdGAz1ad27Vr9+TJE8ixpELhbd+2bZvkEFRzavlTYWrUqOHp 6Un1AhV56tSp8rOgmjdt2pQOKVWqFDQUxgf/W1lZQeVznj4+Ph4Ne0pPcz/w D7kSBVCdFcyU5WKJ6oxHkJKSUlMNBY4ZMwYCh0C80nJ1HjFiBAJLlCgRHR1N Qvb+/fvDhw+jfiF83rx54sSIou5x6OCiRYtwUQiBxzps2DB6+rr0bCONgjrD QUZtqlSpEvK/ffs2BZ4+fbpOnTpUMeGPi9OTOnfu3BkFgMsPmYatgCZ+/vnn VDd/+uknne+f3ly+fBmngGchbwPA10DUsWPHIiIiOnXqFBwcPHDgQNxkFE9j VkipUs8Hk7gb1Ben0JXBFFgM69lWNvKkzmilV69eHXK2bNmyhw8foqbjDYSy IwqWAbVefMjMmTOpbsJuCIEQ97lz5yKHJUuWSE4BEwR/HIf4+fkJnUWoQfDT YamgpCdOnMhJepy6bNmyVNSYmJh3795BnnAgDTYVQHVWMFOWi4WqM9qZqBeC 4+bu7t61a1f8Q3OAxepMioDX+9ChQ5Ks4LIhHKqdmpoqBAqLJWEWJOmXLl1q FHXOUq8qkr9Fjx49ojY/BE4cTuoM5syZIzmE5khAuLMtksFMmDBBpWntttBY lYMmvbbXYOHChTgKVm7x4sX0mE6ePGlra4vGj+kugbFcTKfOJNASV2vPnj0U JVkS8sknnyAQdUGe24sXL+SBNAyKivDgwQNJ1MqVKxHVqlWrnKQfPXo0iVFS UpI4HI2KHj16FEB11mamLBoLVWe8wzTTb8GCBfHx8fhn+/btiKWmr1idQ0JC EKLN+Ldu3RqxqJJCSFBQEELQBJUn1n3OdrbqrA20MVSy5UWkzkOHDpWnpzEm uAD6nkhH0PiBdBYpUoRGvcWkp6fTkkM4DjARaGygPb9ly5YqVarQXbpy5YrG PKdNm0YGEK537969kXLEiBESV4VhCNOpc+HCheVDxngPaZhJMtexf//+KvUo 0v90mOaBhiut7ty8ebM8FjXF3t4efoGwFlvf9AihZQ7QdHl6i5uzLcYwdVYw UxaN5aoz/vf39w8ICJg9ezbsPCmyRJ1R10gotZWKmqDff/+9kJ7GeuRjo1mm Uee3b9/CVqxevXrixImhoaEQOxzYs2dPcRpS52+++UZ+OMqJKA8Pj2xPZACv X7+mzna5zy4AwyIJef78OVwSlXr5oTzDfv36wSoOHDgwKioKTSAaLHNxcZF0 FzAMYTp1xrunMbZSpUry0aK7d+96eXmp1AO7Y8eOPXnypMLS2jNnzqjUc0i0 7XhA2wnGxcXlJD2QOM5EQVNnXcyUhWLR6hwZGYkqBi1Ay5ZiJeoMb05j16sE YVOvZ8+eUQhqn/zURlRnNAN27NgBP12YDwaFqlu3Lg2FUy+9gII6o4WvMs06 AhgfWs7crl07fdf4r1u3jrrdxB4xfG00pdC+3bRpkxAI52Xy5Mm0VlGygJ1h svJCnatXr45YNJgl4TAOEyZMEKZlwtvt06dPTEyMvIFKtTJbhCFsfdPT6Btq jcbyFyh1zomZMn8sWp0fPXpEE6r3799PsRJ1fvz4Mb3YELie2kEVo/SCmqN1 Kj+1sdT5xYsXLVu2RAJnZ2c473/88UdycjJF0dqQPFdnqOqQIUOQMxrtGofV lKE52ODp06dCINW7KVOmyNMfO3YMpgY+dXx8fI7KzeQ7zEediZcvX6LShYWF CfOlK1asKFlnsWXLFpV6LreCzQHXr183LD3VerQTNJaw4KhzDs2U+WPR6pyl Vi7UXKH5KlFntKZsbW0Rom0NowT4d9TXitapPNZY6jxgwADEfvLJJ/I19eag znjnaTa4r6/vw4cPDcjhwoULZLjEk8/r1aunrdkDaCqLxpUpTEHG3NRZANUE to4WZBUqVOjgwYNC1IkTJyhQPN1UAX3T07ZIQG5AsgqMOufcTJk/lq7OOKn4 0chnhdEsr/DwcB3zpxXTo0aNkkcZS50pVuMmwHmuzmjnwC9AnlWqVDF4Xf/C hQtV6l1VxYE+Pj4IPH/+vMZDxowZg9gRI0YYdkYmv7J79268GE5OTnodlQvq TKC+BAYGIn3v3r2FwLS0NFpsuG7dOl0y0Tc9RJmWS9BUWAkFQZ2NYqbMH0tX ZwlydYbXrFLPz/zzzz91yZ8WNhYrVuzOnTvicNQg2n09h+oM95xqlnxo+/r1 69WqVctDdX779i1Nca9Ro4a2OyzQr18/+SI18O+//5KpkSw/obs3btw4+SGZ mZk4I2Ll60aZAs65c+fIT9TLCBtdndeuXavNQSOZkMzkpM+3lS1bVtjQQBl9 0zdv3hzpGzRoQHtNC9y7d48WTeRjddbLTFk0+V6dsz6shkBlhGsm1HGo7f79 +9u0aTN79mxx4idPntAnZX19fQ8ePAjhQDsNMoTz0hh3zn1n2gCzUaNGN2/e pJCkpKSIiAh7NXmlzi9evKCtDFDlxePFGqHN2dDMCA8Ph62jtdupqalr1qxx cXFBlLu7u6TbDcnQRsIhUG1hnD1LPRs2NDQUh+C2Z3tepqCBV4veqKCgIFoA hZfnp59+evfuncJRxlVn6jQrUaLE9OnTr169KoRDJlasWEFmYcuWLeJMXr58 WbNmTTpq0aJFwqgo/omOjvbz8zt+/HhO0sPMUiO/Xbt2ly9fzlLvZoaUbm5u VJ78qs56mSlLpyCoMyo4bRdGuLq6enh40Hg0GDRokCSTv/76i5YTqtTbeNLb jteeakTO1Tk+Pp5UGLkhW2oMwFYMHz6cvuKU++r8/v174dOcJUuWdNPC/fv3 hUM2btyIO0mH4ELgL0N86WfVqlXFRkxg/fr1NOUVNx9p0P7HX9rRFFmdPn06 h1fB5EuggELlpYqj+u8eBXKMq86wJzNmzBBsAioI/FNvb29h/vb48ePl+cBG CTtz4lyopOXKlaNpLXZ2dvLNOfVN/8MPPwi3BRWKxBqaRassLUWdYfHEFoZu MmyCOFDYyd8AM2XRFAR1JuLi4gYOHOjj44NXHeoJXYBkaxsGTUxMhGrT170r Vqw4ceJEcvdKlSpllBVVN27c6NevHyQJ+Xt5eQ0dOpT2ukd58kSd09PTVTog 6e1PSUlZtmxZy5YtqbXj5OQUGBi4dOlShW+E4cbiZtatWxdqDsuDKubv7z93 7lyN81sYhkBTELqDmovXDI4kXiGh30kjphh3hn2LjIyE6sEs0N74lSpV+uyz zyR7bIqhhZMhISHQWSgO/OKGDRvOnDlTm3zomx6y1aFDBxglFKZ27dpLlixB RYahtiB1xpPN1uwIhtQwM2W5WJw6MwzDMEy+h9WZYRiGYcwNVmeGYRiGMTdY nRmGYRjG3GB1ZhiGYRhzg9WZYRiGYcwNVmeGYRiGMTdYnRmGYRjG3GB1ZhiG YRhzg9WZYRiGYcwNVmeGYRiGMTdYnRmGYRjG3GB1ZhiGYRhzg9WZYRiGYcwN VmeGYRiGMTdYnRmGYRjG3GB1ZhiG0Yu0tLQff/yxUaNGxYsXt7Gx8fT0DAoK WrlyJcIR+/LlS5WMnj175nWpGQuD1ZlhGEZ30tPTW7VqRZpbqFAhFxcXOzs7 /O/m5vb+/XskePXqlaeIYsWKsTozBsDqzDAMozuRkZFQW7jMK1aseP36NQXe unVrz549GtOPGTOG1TlbMjIy9u3b16ZNG9yrjz/+WDkxbnVISIi7uzueQqlS pdq2bbt169bcKWduwurMMAyjO02aNIGCTJgwQcf0rM7KJCcnQ15LlCghjAIo qHNKSkqXLl0ombW1denSpa2srOhnaGhoZmZmbpbc1LA6MwzD6I6Liwu0YNeu XTqmZ3VWJjExUTJGr02d4V83aNAACby9vWNjY9PT0xGYmpoaGRkJJxrhCxYs yN2ymxZWZ4ZhGN1xcHCAEBw7dkzH9KzOuvPdd98p+87R0dHBwcHPnj2ThM+a NQsHli9f3sQFzFVYnRmGMUOuXLkyYsQIPz8/qKGtrW3FihX79u0Lj5VmXolx c3ODZdY48qhRGU+dOoXAPn36ZKndsaioqPr16zs6OhYvXrxZs2Z79+6V5/Pp p5/Kp2GLwYHaLkR3dX748OGUKVNwyUWLFnVycgoICFi+fPm7d+/Eabp3747c Pv/8c3HgzZs3YZ9pxjhx5swZJCtXrpzkFElJSePGjatSpYqdnV2JEiWgg8uW LZOcQmD8+PHIZPv27fTz9OnTuAo8iCJFihQrVizb0WEDyFadtXHnzh16EHfv 3jV6qfIKVmeGYcwNSC0kgCZfVa5cuVq1apBOMr81atSARRInNkyd27Vr9+TJ E6iqRGcLFSq0bds2ST5hYWHlP4AESFa6dOnyIrp166btWnRUZ7QKhGu0t7en ywfVq1dPSEgQkpF+oTkhPrZUqVIIPHTokBCyYsUKhHTs2FGcDI4nTS+3srLy 9vZGsekUyA23Ql4kUmcchTbMhAkTJDeqRYsWyldkAAarM0pIzyUxMdHopcor WJ0ZhjErXr58SauQBg0a9PTpUwrMzMw8evRoq1atvLy8nj9/Lk5vmDr7+vpC +EqWLAnnEU4rzNfu3btJsDw9PeUeuoAperbh6tra2iJZ+/btL126lKWWmz/+ +MPHxweBaJ8Il3zkyBGEILHgKV+7dg0hUPPZs2cLGQ4ePBiBs2bNEkK2bNkC /SpcuPBXX30l9Axfv34dIouUQUFB8lKROi9ZsmTIkCH4p2rVqqtWrTp//jwc 8AMHDmjsZMghBqvz5cuXcaCjo6O4A8HSsTh1/uijj6hmyaPCw8OpUffmzRuT liEfY8BShfT0dNRZ1HEXFxcYDRz72WefwdooHHLhwoWBAweSOaKpHcYCdXPN mjVt2rQpU6YM7JWzszOco8WLFwsrX+S8evUKRgweGRwW2Gqk/+233xROgeow YMAAukXQBdwuWFHlUu3fvx9ejKurq7W1Ne5ScHDwzp07NabEq6tv9+m7d++W L1/epEkTKBqEo2bNmhEREYKoaSM1NXXt2rV+fn7IdurUqcqJcxkSIACZlsem pKRIQgxTZzIjElcL7z9F4RXVVjxTqHO9evWQBtUNoiwOv3//Pl4bRH355ZcU ggdHs5Tj4+MpZN26dXj07dq1+/TTTyUZCm8mxJ3866+//lpyarz/lSpVQtTx 48clUaTOtWvXxt8RI0ZIymYKDFZncu3DwsJMUKg8w0LVWV59YOTp9WN1NgzD lircvXu3Vq1agnwULVqU/kErfdSoUfKjPv/8c+iaWHGMqM4wL2RnyLmADlJn F4APIu4eFHjw4EGVKlUoDQTdycmJ/u/Vq5fGS4YO4uao1H2P8Gig/pS+f//+ 2mzXuHHjKA3KFhgY6OHhQT+HDx8uT3zv3j2KtdKEvC/x0aNHZIdBhQoVcAp6 aqgLp0+f1lgeyAqknOa4EuamznhScPFQsF9++UWX9IapM06Buy1JD5eZ+n4V GqVGV2c8KXoQ5DVLQNuSHqjwQqIliRA0rujn0KFD/f39p0yZgjQUgjYqPV+h v3rRokUqdSe5xrd6zpw5iJ04caIknNQ526aFETFMna9du4b6jtb4jRs3TFSw PMES1bls2bKoWdOmTROHHzhwQKWeBcHqbACGLVVAAigUad+mTZvI04FeLFy4 EE7okCFD5Id4enqq/osR1RmuB7Rp0KBBZ8+epZ5JvAnr16+npZRyxxNpYNYQ hWsnw4iQmJgYaubNmDFDkn7fvn3UN4h3j94xpD948CBdFEyZvEjIDVGw52L/ Go4z9dzKJQB1DeFoV+hyvTh7QECASj0Ui0umwOTkZLSLEIiWxp07d+RH/fzz z5JHYG7qnPVBLwDaMyjw48ePFRIbps54VTTmRg28n376SdvpjK7O8+bNo0qk MVZYcPTPP/9QyIABA8Stuzp16qDR+9tvvyHw6tWrCDl37pxK3T8vZALPWuMr TezYsUOl7lSXhJM6w3mHbdfxYnOIAer8+vVr3AEchXfGdAXLEyxRnb28vGCU qlWrJg5HAxKODG01w+psAAYsVRg7diw1yOX9qNAFZdmFmhhdndE80NijvnHj RjqXZOrL5s2bEYjGHhRNHH748GGVuh8AnrU4nBowchW+efMmLDZUW+77dO7c GYfMnz9fEk4OkWTSDjh69Cjd0uyu9f+gbliNKozqoIvLQ1ORzVCds9RtIaFb AI2ihg0bzp49+9atW/KUxlVn3HzErl69WlvBjK7Oo0ePVqm7tTXGog1G/SHC CuuVK1fiZ+PGjbPU/dLW1tYrVqygdh1aMghE4fG/eKIaXZQyTZs2lZya1Llr 1646XmnO0VedMzMzcZkq9Ry/fLYVSZZlqjPMET1EwRjiuZQpU6ZPnz54rNrU GVWyb9++FSpUgDOI1mCHDh12796t7SzIEHWhf//+vr6+9vb2jo6OOC9O+vbt W3liW1tbQbz279+PWkZb79aqVevHH3+09HdG21KF58+fk5nS1oOqjCnUWRtw KOhcSUlJ4nC0RlRaugVatmyJKGioEIJ2i0aJJ7744gtEwcxKwmFCEX7kyBFJ OM3kqV27tiQ8NjZWpfNsWLLqI0eOlEfB2cR7XqRIkUePHinkYM7qTFy8eBGi jNY4KRT+hoWFGWVWmPmoM/V1aFNnQIMpwlwFco3ReszIyPjrr7/w/99//43/ UTDqsBo2bBgC4ZILOdAEg7p16/bUzty5cyXnNXN1RruFpqvB0r548cLUZct9 LFGd0ZAmeyvMcCCPY9OmTTSBQaLOsP+wYGRaIbUQXGG4cMCAAXL1/P3335FG aLQXL15cGL5s1qyZfG0g1JlqCtUyCXKLbVloW6oAXxuB/v7+hmWbm+pM7n+V KlXEgXjuNEqucaxq+fLlqv/29ZGeotGl8RSw1YiFDZSE9+rVS6Vp/BQNS5Um 35nuKo7S5booc7ERFkMNjC1btijkYP7qLID2BuSDlFHi5ZUtWxaB69evlx9l Eer87bffqrTMdAW3b9+mmhIXF0chqDL06l6+fBltS9gfMkrNmzeHTmV92Gv0 4MGDQiatW7dGyKRJk3QsM2HO6gxp/vzzz+m+PXz4MBfKlvtYojrjiaSkpNRU Q4F4/2E2EUjDoBJ1HjFiBAJLlCgB00fz7fFkDx8+TMOFcuMWEhKCmgvTh9eb XnvkDAtPLVh5C5PmHnfu3BlHjRs3DtY+NTUV6kOOPKTt5s2bprodpkfbUgVq tcqngOpI7qgzPC/4EXgEMODwOMRReEw4e7FixehnQkJCjx498CLRy0MTdSpW rCikhzpQgTWaguTkZHrWknePVLtSpUqSCUjTp09HuLz3ZuHChQgfPHjwb7/9 BicxKCgIthGJhQm6YoYPH47EQ4cO1Xjt1CIV5vpqREd1fvbsGTQrIiJCOVku sG/fPnoK169fFwKp1mtspXTq1CnP1ZmmE6Mk2hKcOHFCor9i6KMbMF/iaYc0 X2Lz5s3dunVr1KgRBU6ZMgUX9erVK3gfeBX/JxospqFt3Ci95l2brTrjKlA7 qMmdn7YfkWCh6kwNafwDjwaB7u7u9ArRhFixhSTziJdWvFSfgP+CcLz2EFNx +K1btzROnsTLL7HYBKkz6uz+/fvF4bDY1MQVd5BaHNqWKlDbIzY2Fk0dSEmL Fi1KliyJ64X/CEWQjOTKMak6o1GNYtDMKzzfL774Ql4eWrYjjPCSGQdLly7N Us/lVqknfosPIRX45ptvJFnhzadFo0A+DRiCC1NZqlQpvAb0Zp48eRI5o9kg L/m0adPk3S9Ev379JP02NBGodOnS8nF/2G16LSH0CjdKR3W+f/8+buOAAQOU kxmLxMTEDRs2aIuiu3HlyhUhkK5C3o0zefJkSpy36vzDDz+QMmpbQ41wWviA t0jSlYemIPXbS2Y7kD+OZpuXl9eoUaMokIZFtm7dSqcTp3/06BFVB736ScxT nd++fQsHSqWeDCmZGZLPsFB1xkOherpgwQK4FaoP283RZgJidabnqNESZn3o 8NH26TcJuANU2SUzSMkMbtq0SX5I27ZtVeqlgnpcoTmhsFShWrVquLRt27ZR N5qrqyv+gZNIa2EqVKjw77//KuRsUnUWbwAFrxlWWi6aNKVK8DuaN29O6WlL hxcvXtBPsSDSZBvcDbTToA6vX7/GS/jjjz/i2tFmo64Vjf0kguYWL168d+/e MO94JTTaaviGUNvu3bvD+L98+RKGCG/d6NGj6a4OHDhQnBhlownGtWvX3rt3 L15LHHL48GGaikZtib59+yrcKN17tnNhAEKAJqLjiezcuVPccsY9DwwMpDaV +O7Rvlgq9RA8XlQ8F7xdHTp0gP5Cl/NcnclAqdT9GHBsEYKqsXHjRnGa48eP 0+Zg4t1I/vzzT3qIkGBJA+zXX39FOE2Cxf8USN07NJtCPjhCgyZ0lDD9O0vd vzRo0CDxWmkBM1RnVExqCTdo0CDbRf2WjuWqc5a6ewcVGeYURo8UWaLOqMJU lbSViubVfP/999pOd/v2bbRI4acPGTKEpFzSbs/6oM4aayutfYDXY+jl5iXK SxWgvyp1jzcMyO7du4U2/+XLl2mqLR6NQuYmVWdYtpSUFLy3sEj01OC6SrY2 wk+EN2zYkH7CEkIWa9asSR1lOFxj8SZNmqSS0bFjRxylseWGe4inD22FsEZF RcGw0OwmFxcXlE1b4eWBJEDwwSXvHq4RpltSHmQOi/3VV1+ptKyqFjDPcee/ //6bem6pLeTu7u7n50ebcgAPDw9J1xbaMHhwkptgb2+PBvPBgwfzXJ1BaGgo lQpPkPrTcF3/++8ypZiYGNQmofDCTp5Vq1YVd+MTCBGuVBwrrPeHwy4vxpo1 a4QdCZycnDw9PYW9Q2FX5du85II646rdRJCDj2sXBx49epQSw54L+12ULFnS TQv37983XYFzE4tW58jISFQxX1/f/v37U6xEnZ88eSK3pXKmT58uOcudO3fg H3l7e1MCGxsbHx8fatID3ApxYgV1piFv2m/fssh2qQLtMQh/WV6p4b/QKmmN AwREbs4Kg1FSqSd0iR1bbfO4CNoVROMcsAsXLsAJCgkJgSiPGzcOpj7rw9Qd 2F7x6DwuDe8MTI24XwU5w5en+yNZs68A7BIZXjgXkii87T/99FNYWBieFN40 6DiZfdo6T3mw2DzVmcADGjVqVK1atZydna2trfEXNxOXr3EDseTkZDjOEG7c WBgBtIho5S+cRHNQZ7wVX3/9NaoMXgZIMNoeuBB5xYGsTJgwoVq1anjxoJuo XMJoiBzIE4mUOBAvAFUr+TIBAq8fLBta3dBB2tkPNweta409ObmgzsJqRwUO HDhAiVGhdLHnGpf5WyIWrc6PHj2i7kRhwFeizsJMnrZt2yosJUD7TXyKzZs3 UyM2MDBw+fLlkBhSEJiFAqLOuixVoLVCO3bs0BhLTrfCXk+5qc6A+gAhpkII jYzgQWtMTxN1JIN3Cmzfvh3pJWvwqZsOxlCeHm8LdAQ+tcbpXhqhjxMJg4zZ Qu4kXmaFNPqq88CBA5GtwraoDMMYC4tW5yz1wK6bm5vQGShRZzh9JJ26b9gO 9wrtW4i+fPlkAVFnHZcq0JpKebcD0b59e8SibaPt8FxWZwiQ6r9LSnGZ1K1H Ewsl0ETZLl266Jj/oEGDVOqvNogDqYdf25bjPXr00EsZaTRZ445kcpKSkmio WtmP0Fed0UKAfyqZRckwjCmwdHXGScUKIp8VFhQUhJDw8HAd8yd/R+MciYKg zrovVaDd/7TtakW7H8TGxmo7XF91Xrt2bYcOHWbMmKHtW7RZasHVFgWnT/Xf 3ZMAdd3Ll8iBpk2bqhS7N8U8fvyYxsskLz91/p8/f17jUTTtVscZg3ilaeB1 1apVuqSn6coKHx0mDOjZVrjJDMMYEUtXZwlydabJP/Aj/vzzT13yj4iIUKmn NUrCYZSEvX/zqzrrtVQBqkrfs6DNA8VQN6+Dg4PGIUJCL3Wmh0ho89bRSKtT p478OztZ6lmpNFZIq6UEaNq2i4uL5GJ37dqlUs+vlu9rKp+SjfYMrcZq0KCB JIq+KiLuThfIzMykbxksWbJECDx16tRnn32msd+YXiR7e3vJrDP8lA89nDhx gsa1FXbDI8x53JlhCjj5Xp1B//79VepJIDBxgj+Ylpa2f/9+qLD4o6hZH9YM Qs2XL19OM3wgH1CHxo0bI5CEOF+qswFLFXbu3KlST5kT5q6gDbN+/Xr60pN8 c2kxeqmzsHBVwR+kVaU0O/rvv/+mZ/fkyZMVK1bQitFKlSrJu2RpRjeEksZ/ IZqbN2+mHm/5rNctW7Yg/88//5w+d4XEJ0+epJtWtGhRVBNJeqgt0hcqVGjC hAniBdd4CWkSr2SpMmXl5eUFB1nYgfPSpUvUZFLJpoRBxxs2bOjp6bljxw7a YxbXu3DhQpo1AaHP9sayOjOM2VIQ1BmGmlSScHV19fDwIEmVjxWC3r17UxRM LtxD+qKct7c3Lo3W9uY/dTZ4qQK0jybm4V6Jv6goX88LL0+clfC5T3Ggtk0p o6KihMensCcGGgnCmhRoIvnLhK+vr8YdOyGawhcwUQBhgYlkZTGxbt06YUEK MhfWvMD71jaDF20VOgQvSdWqVZs3b46/dCDeQ8kW5dBWGlwm8OIJp5N/lI3S Uw88JaDedaJv374aP0M/adIk8Q0XNtIRB2a7nRQaA7hR4o0iGYYxOgVBnYm4 uDiYXB8fHxg9mCMYSSiIxjFBWKc1a9bUqVMHtqtEiRIwgPBlaLiTvJj8p845 WaoA5w6KCQ8OTjQ0t3379pI90wjafUsZbU4chAb3EMobGBgo31dEDNoPc+fO bdSoEVQGIojWwieffLJ8+XKFz5YhCofAfba3t8fjhoAqzHO+ffv22LFjq1Sp Qt9GqVu37owZM/6n+H29xMTEiRMnIiUUzcrKCo0ff39/nFHebU7A4x4+fHj1 6tWRErcUrjTeW22D17RRW9u2beGG43rLlSvXrVs3jfefoPl+ymTbm8HqzDC5 gMWpM8MwDMPke1idGYZhGMbcYHVmGIZhGHOD1ZlhGIZhzA1WZ4ZhGIYxN1id GYZhGMbcYHVmGIZhGHOD1ZlhGIZhzA1WZ4ZhGIYxN1idGYZh8jfjx4+Xbwp3 5cqVvC4XowSrM8MwTP5mzpw5nh+gT8uxOps/rM4MwzA6MmzYMOjarl278rog hgNDbYbqnJGRsW/fvjZt2qBgH3/8sdHTWyKszgzDMDrSo0cPVmfjkpyc3LZt 2xIlSghd7spqq296y4XVmWEYRkdatmzJ6mxcEhMTJQPiymqrb3rLhdWZYRhG R+rUqcPqbDq+++47vdRW3/SWBaszwzDmw/r162Fvo6KiLl686O/vb29v37Bh w6tXryJqxYoVFSpUcHBwGDBgQFpamvzYU6dO9e3bF2lsbGxcXV07dOiwe/du bSfKzMyEyPbv39/X15e+1v3RRx/B2r99+1aSMiwsLNuPYjdr1kxIP3DgQIRc u3Zt27ZtPj4+KHDXrl1fvXr17t27YcOGlSxZEmVbtGiRxiJt2rQpKCjIxcUF l+Dh4REeHg7zq+0SUlNTV69e3bFjR09PT1tbW2dnZ7j2OKnyHWZ1thRYnRmG MR9IncePH1+uXDlB+5o2bbpu3TqxGn7//ffio9LT00eOHElRkFoILqSKfkLK oXqSs/z+++9IQwkKFSpUvHhx/BV0FjIqTjxt2rTaH7CyskIaLy+v2v8Fiiyk J3WeP38+JSamT58OqRVfQlxcnPgsjx8/xmVSVKlSpSpXrowLwf/IZM2aNZLy o3GC/IVrtLa2RutCyPnLL79UuMOszpYCqzPDMOYDqXORIkXgMt++fTs+Pp6k Ey7nTz/9lJKSQhpXs2ZN8VEjRoxAYIkSJaKjo8mtfv/+/eHDh+FUInzevHmS s4SEhED1evXqdfDgQdJi5Dxr1izIHNLPnTtXW/Ggm9n2bJM64xIGDx78/Plz FAk/nZyc4DKfPHny4cOHtWrVQsioUaOEQ968eVO/fn0E+vn5HTlyhAJxIVFR UXZ2dijqiRMnxKeAJ16+fHnkOWnSJNwian4kJSXRpDUgSS+G1dlSYHVmGMZ8 IHW2tbVNSEigEFKcsWPH0s+zZ8/ip4ODg3DIsWPHyMc8dOiQJLdLly4hHKqd mpoqDr916xai5GefMmUKsqpYsaK24umuztBZePQUAl1GSExMDP0kTfn000+F Q9AwQEiZMmUePHggyW3lypWIatWqlST89OnTycnJ8rP7+/sjff/+/bUVj9XZ UmB1ZhjGfCB1Fttb+JgIOXXqFP2EQ03iIgwQwxHGz2HDhmnMsHXr1ojds2eP LmeHlaPMHz9+rDGB7uo8depUIQSePtobwk/qpW/cuDH9zMjIoGw3b94szw0e tL29PdoY8O51uYTIyEhqG2hLwOpsKbA6MwxjPsjVecyYMWJ1vnPnDonLmzdv stQ92PCj8VOb5Rk9erR8nFoM5D42Nnbu3LlDhgwhKVdQLsPUuXbt2mJ1pmts 1KgR/Txz5gx+2tjYyCekEdQTLhmnFsAdgHHesGHDtGnTwsLCaFa5m5ubtuKx OlsKrM4Mw5gP+qrzkydPVDowffp0yYmQz5QpU7y9vSkBxNHHxycgIIB+wtxp LJ4p1Hnr1q26XMLhw4clJzp79izkmIoEihUrVr16dZJyBGorHquzpcDqzDCM +aCvOj9+/Jh+tm3btqd2hDFfYvPmzTTJOTAwcPny5ZcuXaIx4pcvX+a+Om/Z skWlnkWmUH5w/fp18VkmTpxYqFAhOgqO8+3btykcZWN1zh+wOjMMYz7oq86Z mZkQPvzcu3evjqe4efMmRM3a2hpOqyQqW3WmdV47duxQyF9fdT5x4oRKvbBL MnVNgV9++QWHoDDyuW2szvkGVmeGYcwHfdUZBAUF4Wd4eLiOp5BPmRbIVp1p 3dOKFSsU8tdXndPS0ooXL46QdevW6XgJKDzS40LkUdmqM9oAdI3x8fE6ni7X YHUWw+rMMIz5YIA6w2vGz8KFC//555+6nCIiIgLp27RpIwl///79nDlzlNW5 W7duiO3UqZNC/vqqM5g0aRJCypYtK3RQK0Pj4/J12S9evOjcubOyOgNqDPz6 66+6nCs3YXUWw+rMGAyZFG3I3wR90zMFEAPUGfTv31+lXvI8YsSIu3fvUiB8 0v3790OFZ8+eLT5FbGwsqfny5ctp65L09HRIfOPGjRFI/eTa1HnTpk10LPIU Jo0nJCSIF0MZoM7w2WvWrKlSb6iyaNEiiCyF45/o6Gg/P7/jx4+Li/HFF18g sYuLi1BrUlJSVq9eXaFCBdphTFmd0bpAmkqVKtE8cFzI7t27r127pnBI7sDq LIbVmTGYwYMHk6Wy0sRff/2Vw/RMAcQwdYbI0nZhhKurq4eHB+ksGDRokOQs vXv3pqiiRYu6u7vb2dnhf29vb5ivJk2aKKgztDg4OJiOLVKkCE5kY2NDDYNn z55RGgPUGTx48EDYyRO5lS9fvly5crQXKIon2czz+fPnVatWpcQQdCSmlC1a tLh+/Xq26hwfH0+XTHeAdjGdOHGiwiEmIiYmxk1EsWLF6MaKA48ePWpweouG 1ZkxGOrlW7p0qYnSMwUQw9SZgCcIZfTx8YH0ODg4QL8g2efPn5efJSMjA3pX p04diCbUDbK4atUq2tKT9jbRps4AyeCy4VicAo5q5cqVO3bsuGLFCsHhNUyd s9TSv2PHDhQAugzFQcEaNmw4c+bM+/fvy4sBgY6IiPDy8kLKMmXKdOnSRZgX hwOV1TlLvRqrXbt2Tk5O1tbWaJ/0798/T0Rt48aNCv1pxIEDBwxOb9GwOjMG g4Y66oJ84qux0jMMwxRYWJ0Zg6lbty7UVvcmt77pGYZhCiyszozBVKxYUaX+ jq2J0jMMwxRYWJ0Zg6F1GceOHYuIiOjUqVNwcPDAgQOjo6NfvXpllPQMwzAF FlZnxjAyMjKED9ZLKFOmjPw10Dc9wzBMQYbVmTGM9PT0kJAQd3f3JUuWJCUl paWlPXnyZMuWLVWqVFGpP78r2SdQ3/QMwzAFGVZnJifAI5aEPH/+3NfXF4Ib Ghqa8/QMwzAFE1ZnxujQx+UdHR3fv39vivQMwzD5HlZnxuhcunSJBpSfPn1q ivQMwzD5HlZnxuhcuHCB1Pbly5emSM8wDJPvYXVmjM7ChQtV6o/Pmig9wzBM vofVmTGMfv36HTp0SB7+77//0rrmCRMm5CQ9wzBMQYbVmTGAo0ePQk8LFSoU Hh5+6tQp+gxfamrqmjVrXFxcEOXu7i58sseA9AzDMAUcVmfGMDZu3Ojq6krj xZBd+L+FCxemn1WrVr169WoO0zMMwxRkWJ0Zg0lJSVm2bFnLli3pW7pOTk6B gYFLly6Vf9rPsPQMwzAFFlZnhmEYhjE3WJ0ZhjErvv32W5VK1bJly7wuSO7R tm1bXPI333yT1wVhzAhWZ4ZhzApWZ4bJYnVmGMbMYHUugGRkZOzbt69Nmza4 Dx9//HG26detWxcYGFiiRAkHB4datWrNmTMn/01fYXVmGMasYHUuUCQnJ+Py obPCJ2WV1Rk63rVrV0qJo9zc3Oj/6tWrP378ONeKnQuwOjMMY1awOhcoEhMT JR98V1bnyZMnI42rq+vu3bvpuzkXLlyoW7cuAps3b55bpc4NWJ0ZhjErSJ1b t26d1wXJPUidZ8+endcFyWO+++47ZXVOSkqysbEpVKjQiRMnxOGPHj2ifY1i Y2NNX8xcgtWZYRizgtS5Q4cO+P/Zs2cRERG+vr52dnalS5fu3r37lStXNB71 9u3byMjIJk2aODk5FS1atEaNGlOnTlXo6vzoo4+Ez6JlZmZu3boV3nqZMmWs ra1LlSo1fvx4Sfr09PQ1a9agzYBiII2zs7O/vz+83Xv37mk7BbLdtGlTUFAQ hAOa4uHhER4eDnMqT0nqPH/+fByydu1ayJOjoyMupGnTphs3blS4V6dOnerb t2+FChWQP9xJ3DR4lArl2bVrV//+/XE/7e3tcQrcBAgibp08sa2tbfny5en/ /fv3o4S4CjyFWrVq/fjjj8hKoVQGk606L1iwAAmCg4PlUXgWiOrcubMpCpYn sDozDGNWkDr36NHj77//dnd3l3R7lixZ8t9//5UccuPGjapVq1KCIkWKQJ2F ccl9+/ZpPAup861btyDQ0GXJWWbNmiVO/OrVK0gGRbm5uUH6PT094cHR6dAM kOePhgG0lQ6B3FeuXBmCiP+trKyg8pLEpM6TJk2C4gtXIRRmyJAh8vzRWhg5 ciQlQM4QXDQY6OeAAQPk6vn7778jjXizPio/aNas2bt37yTpoc64jRkZGaNG jVLJGD16tMa7mkOyVWe6UatXr5ZHXb58GVHFihXLN5+JZ3VmGMasIHWuWbMm LG316tVjY2OfP39+9+7dJUuWQDIQ1a9fP3F6+NeVKlVSqbeEPXDgAAnTxYsX aQIw3L1z587Jz0LqfObMmTp16tAw944dO65fvw7p37x5s8TDnTlzJons4cOH hcAnT57MnTsXrQUUTJL5mzdv6tevj0P8/PyOHDlCgWlpaVFRUSgPBFrSMUui A7mEvwyFevToUZZ6QBZXSmoIH1xyihEjRlDzIzo6mjauhyqheGg2IHzevHmS 9CEhIThvr169Dh48SFqckpKCRoi1tTXS40Ik6elWwxXFUePGjUP7JzU19ezZ s9RKQVFv3rwpv6s5JFt1hjuPBPRAX79+jZZDaGgomlhZ6sun9g/9zAewOjMM Y1aQOgMICpxWcdTEiRPJfRYHfvHFFwgsW7aspB8b3uUnn3yCKDik8rOQOteq VQvy9OuvvyoXifLR+Bm1Fy9eyAOhekhfpkyZBw8eSKJWrlyJqFatWokDSZ3h 2yYkJIjDoTjUxkBpxeHHjh0jN1z+3bdLly4hHKoNMRWHQ7MQJS/qlClTkFXF ihUl4aTODg4O+/fvF4cnJydT18TixYvlueWQbNWZNudHuwj///jjj/SedOvW jWKrVKmCn6dOnTJ6wfIEVmeGYcwKwXcml1AMDC8ZZLLPWWqHFC42QpYtWybP 6vz585Qe/0iiSJ3B8uXLsy1S//79SSJh5bJNnJGRAS8b6eGDy2NRYLh4EFC4 rkKgwpztP/74g8pJDjWBdgtChg0bprEArVu3RuyePXuyLSqAYaf8JW0bUme5 zy6UFs67LvnrhbI6o6lGRaWlzdShIW7q1KtXDz8lzQnLhdWZYRizQmFFVVJS Ehlkwcc8ffo0hdy9e1djbtTTu3DhQkk4qTM8U12KhMy9vLzIbR87duzJkycV pkWdOXMGKW1sbDTOtgJw2JEgLi5OCFFQ5/v379MFCp3qcKjh0iJEm7EdPXo0 Yr///nttJbx9+3ZsbOzcuXOHDBlCUg4k0+1IneGkyw8fMGCAfHzBKCir8+vX r6mo+CdL/TJUr17dzc3t4MGDlIDWVR04cMDoBcsTWJ0ZhjErFNQZLjPZ5xs3 blDIjh078BNSoi23Fi1aIIF8Djapc2RkpI6levbs2YQJE4T5ZvCO+/TpExMT A09ZknLr1q0qHRAPYSuoM5oBNDS8fft2yU1QZvr06ZKs7ty5M2XKFG9vb0qA 9oOPj09AQAD9hIUXJ1ZQZxryxuXreOt0J9uebSsrK5XMzReoXLkyYtFgM3rB 8gRWZ4ZhzAq91BmapazONB973LhxknB91Zl4+fIlxDcsLKxMmTJUkooVK+7c uVOcZsuWLSr1pOueily/fl04REGd4SnTYOvevXspBNpEp8ZRCvmj5SDOZ/Pm zY6OjjgqMDBw+fLlly5dSk9PpyuyIHWmnpCzZ8/Ko9CMsbOzQ6zCGjfLgtWZ YRizQi91Fkai79+/rzE36pGWd/Maps4CEE3YumbNmqnUE5iFzlVw4sQJCpTM y1JAQZ1xpXSBFy5coBDIEEmnoNfZcvPmTbQW4IOjaSGJsix1bt++PRJERUXJ o2gA3dnZ2eilyitYnRmGMSv0Uud3797RIKzGYVZhypN8UVUO1ZnIyMiAK4p8 evfuLQSmpaUVL14cgevWrdMxHwV1XrhwoUo93i0e6Q4KCkJgeHi4jvmT6n36 6afyKMtS56VLl6q0zBaYPn26iUqVV7A6MwxjVuilzoA25XBxcREmchOQTurW rl+/vjwrvdR57dq1Dx8+1BgVFhaGfHr27CkOnDRpkkq9yOv27du65E/q3K9f P8lOGjipq6urSjZuDq8ZgYULF/7zzz91yT8iIkKjqOF0c+bMsSB1fvz4MTXG JFO/7ty5Q9/REHdiWDqszrozdepUbe1PhmGMhb7qjEAPDw8EVqtWTbwbCUme jY2NxmlCuqsz8lSp9/2Ad3b16lUh/O3btytWrKApW1u2bBEfAoe0Zs2adNSi RYuENdH4Jzo62s/P7/jx4+L0VFSV+jsOOB28b1wFhIZ294LKSxoeWR8WeVlZ WUErhfnqOHD//v1QYcmW3bGxsaTmy5cvp3Vq6enpkPjGjRsjkITYItQZUHMC N3bbtm3UmImLi6Od4mj313wDq7PusDozTC6grzqDK1eu0HxdkmNhZnXx4sV3 7dql8Sy6q/ObN29mzJhBq6qpk7lKlSre3t7CWeQTwsGDBw+EnTyhoeXLly9X rhxNObazs5Ns5knqDAvj5ORE6YWdPF1cXDROgoLIkkoScLHRRCFJBYMGDZKk 7927N0Wh2O7u7jSBClcBi92kSZO8UueYmBg3EXSTce3iwKNHj4oPgSJ/9tln dC24XdS3AOrVq/f8+fOcF8l8sFB13rdvH142ehsdHR3r1q375ZdfalvwaCyM qM5oGKN6BgQEoKaj/HXq1IFFkmyLlCfoe2P37NkTEhKCyg6TWKpUKRgZ+bQT BWhMDfz+++/GKP7/jUKuXLkyMDAQdRZFqlChAmyIRuNGNGzYUKUdoxSJ0RcD 1DlLvRgWrxOcQVh4CBD808mTJ2vrjs7Sf9wZ9g2JUf1J2kClSpUgE5I9OcVA R3bs2IEKAl2G4sDdw/s2c+ZM+QQ2UuekpCQUeNy4cRUrVsTbi/zHjh0r3oRE DtzGgQMH+vj4oDwODg5wISGd8q1XstT9/LA5MDWo2igJWg6rVq2iLT1pb5M8 UeeNGzcqVEBC4/rlDRs24BKgzvb29rVq1Zo/f758q3BLx+LUGUpBCxiphUnf i6GfUBPdJzEagLHUGQ08YY2hGDT+5dv75xr63tiUlJQuXbpQAqREevILQGho qC6fsDl9+rTgIBhFnS9fvkzdiSr1dwFovyaVukNPvhMyQQ6XlRZyXiSGYRjD sDh1pnY1dAR6QVvxQAhwUtp+B00p03VuGEWd0Zxu3ry5Sr2BLZriDx48ePr0 KdqBbm5uKnVHk8Zte3MBvW4s2uENGjSgAsfGxtLCydTUVFwR2vwIX7BggfLp nj175unpiQY/fByjqHNCQgLJcevWrQVnGU7K0KFDVerlLRoHH+mbsBo/6scw DJOHWJw6A/nG7+DevXv0QTS9elb1gmbs51Cd165dS86mpMvo5s2bNOdw0qRJ OSum4eh1Y6Ojo4ODgyGykvS0/7/wZVhtdOzYEcm+++472uQ/5+qMZs/gwYOn TJkid9tp4q54zYsA9Q/Ip9wwDMPkLZaoztqg3Xt++eUXSTgt6KtZs6bw84cf fvjoo4/gD8LRK1eunHyzevizsPOVK1e2tbVFAvhf8MLIu8yhOlevXl2lZQN5 lEqlnsdCu8gS5FNrbHKMGTNGJVvKYQq03ViN3Llzh/qTFUaraWamv78/lJQ+ SGescWeNrF+/Hqfw8fGRhKekpFBLKd98EJZhmHxDvlHno0ePqtST/eQLDEmd 6RNpFy5cwD+SAV/JnMD4+Hhhm77ChQvTcGrJkiXJ3cuJOuNOUrYXL16Uxz5/ /pzGYXfs2CEE5rk6K9xYjWRkZJCvnZiYqDHByZMnkRuaRjTITj3kJlXnQ4cO 4RSenp6S8Fu3bqnUy1VMd2qGYRjDyAfqDGdtwYIFxYoVg5/7888/yxOQOjs7 O1+9ehWeKaRhwIABsNgwzpcvX46MjBT7qk+ePIG5JmMeExPz7t07yM2RI0eE GVM5UWfq1nZ1ddWWAO4kEkyePFkIyUN1zvbGagS3lCaSyT//l6XulHB3dxfL MU2dNak6L1++XKXelFgS/s8//6jUX/g9ePDgyJEjg4OD0QDDXf3jjz90mdXG MAxjOixXnVetWgW7Wrp0aeqc7N69u0aHNOuDOiONn58fnGK4xgrZ0sfXIC5J SUni8Pfv3/fo0SOH6kzfjm/atKm2BIMGDVL9d0197quz7jdWIxMmTMCBYWFh 8ijcQ9w91X/Xh+aCOpN7Lm9gkE+tERwieQEYhmFyE8tV5xkzZgi2tGjRopAD bctahY1k7ezs4C4p5Cl8yX3WrFny2JzP2Sbx7dy5s7YEU6ZMQYKAgAAhJPfV WfcbK+fatWtwtIsUKSJfjgrmzZuHPJs0aUJzvAlTq/O6detU6tVq4pMSiYmJ NWrUaNiw4bZt25KTk/H0b926tWjRItoRAm25/LeCkmEYS8Fy1RmOWGpqakJC QkxMTHh4OBTByspqzpw58pSCOs+dO1c5T/psukq9LYA8Nufq3KdPH+TQq1cv bQlmzpyp+u+2wLmvzrrfWAmvX7+uU6cOiqQx8fHjx+GJu7i43LlzRxxuUnWm sQyUXzK1QED+cd4s9cQD2oph5cqVpigVwzBMtliuOks4d+4cuTy//fabJErb R1jk0JfcbWxsNMbmXJ0///xz5NCxY0dtCajru3nz5kJIns8KU7ixYjIzM7t1 64Zk7dq1kw/aPnnypEKFCho37TedOuOktE3xt99+q++xaJbk8FkzDMPkhHyj zgCusUq926okXHd1hghSd67G2JyrM3UaQ4+0JQgNDZUIbp6rc5b2GysAd3vI kCE0w0rjbioDBw5UqSd+e8sgL7VMmTL4v0qVKsYq8/Pnz+vXr4+c+/fvb8Dh y5YtU4lW4TEMw+Qy+Umd6VMydnZ2knDd1fnw4cOUUr7JRpYx1JnU38HBQeN8 ZlCtWjUkEH9fhiaQr1+/Xp4419RZ240lIM3UJwBHVdu2xp06ddI2/0qMsTbP xKtIG2h36dJFY991tixevFi5HcUwDGNSLE6dFTaOoE0nXFxcJOG6qzNEmdbq bt++XR6bc3V+/PgxrZ7ev3+/PDYhIYHKeerUKSGQNoKeN2+ePD1JnrHU2YAb m6Uet6Xv28LtNewrJDr2bK9du7ZDhw4zZszIdqYWbnLdunVV6tl3Bk/rorXt GrcXYxiGyQUsS50zMzODgoJWrFghj3rx4gVtw9WtWzdJlO7qDGgT7AYNGkim +N67dw8ClPOxyNatWyOT4OBgedSoUaMQValSJbFQ0hIkf39/SeLJkyfTRRlF nQ27sW/fvqWv29SoUePBgweGnVoXdaZvzRPTp09XSJmUlESPKTQ0VD5JWwxa Yri3t27dkkdRFwfYvXu3jlfBMAxjXCxLnU+fPk0bI7do0WLXrl30yUWI7549 e2i2sI2NzYULFyRH6aXOKD+5z+3atbt8+TJCcJbo6Gg3Nzc6dQ7V+ciRI1QY iRTu27eP3GrJh1+RjNKPHDnyxo0br1+/Pnv2LLxIJIYuG0udDbixUG3aoQUt madPnxp8al3UWWiKgGbNmmlLduXKFdrqZNCgQdluJ0L7gTs6Os6cOfP69euU /uHDhzgX7djGU8IYhslDLEudwcGDB728vARbDesq/O/k5LRz5075IXqpc9aH /a4JW1tbEmto0C+//GIUoz127FjKHCJy4MAB6DUUgT7tBJ9a0sMM/1T4KqKA vb39pk2bcCuM2LOt141FIUlVVeo9Tt20IP+OrRxd1DkqKkoozIABAzSmSUhI oA9OAW3lady4sZA+IyPjq6++otuuUg9501J3on379nhtdLtzDMMwxsfi1DlL va4WDmabNm3gKEE9oSP16tWbNm2ats5VfdU5S725NPzTUqVK2dnZ1a5de8mS Jenp6TjcKOoMNw0CTaIvpnv37uI9RQWSk5PhOHt4eEBKypcv369fv6tXr2Z9 2IjSiLPCdL+xuBsqHZAsbdaILuqclpbWp08flCcwMPDevXsa09DUNWW8vb0l RyUmJs6YMQNNL2g3XGb87dSpk8Y2HsMwTG5iieqcPzh79uzo0aOpPzkgIODw 4cN5XSKGYRjGXGB1zltoIXDlypVTUlLyuiwMwzCMucDqnLckJSXR9yb8/Py2 bdv2+PHj169f69IhzDAMw+RjWJ3znLi4uBIlSoiHR9u1a5fXhWIYhmHyElZn c+Du3btjxozx9fW1tbUtVqxYly5d8rpEDMMwTF7C6swwDMMw5garM8MwDMOY G6zODMMwDGNusDozDMMwjLnB6swwDMMw5garM8MwDMOYG6zODMMwDGNusDoz DMMwjLnB6swwDMMw5garM8MwDMOYG6zODMMwDGNusDozDMMwjLnB6swwDMMw 5obFqfNHH32kUql8fX3lUeHh4fQFxjdv3pi0DAWHTp060S3Fw9WYYM+ePSEh Ie7u7jY2NqVKlWrbtu3WrVsVMrx06dKYMWOqVq3q4OBgZ2dXuXLlgQMHnj17 1jTFZxiGsVQsVJ3BhQsXxOHp6elQB1ZnI7Jw4ULhk9NydU5JSenSpQvFWltb ly5d2srKin6GhoZmZmZK0r99+3bkyJGUplChQs7OzkWLFqX0+Pn111/n1mUx DMNYAJaozmXLli1cuPC0adPE4QcOHICdL1euHKuzUTh9+nSRIkWqVKkCJ1eu zhkZGQ0aNEC4t7d3bGwsmkYITE1NjYyMhBON8AULFkgyPHLkCDKEs7x27dqn T59S4NWrV7t27Uoaffjw4dy5NIZhGPPHEtXZy8srICCgWrVq4vChQ4fCHWvT pg2rc86Benp6esLPhUaT2sp95+jo6ODg4GfPnknCZ82ahfTly5eXZ3vixAn5 o4HQ+/n54ZARI0YY8RIYhmEsGktUZycnp++++w72/NKlSxSYmZlZpkyZPn36 fPzxxxrVGW7d6tWrO3bsCNGxtbWFjrds2XLbtm3y/Pfu3Ysc4OWdP39eEhUT E4MoHPvgwQNTXJqZ8P79+w4dOuBKJ02aBKdYedxZzp07d+iQu3fv6nhIaGgo 0g8YMMDQIjMMw+Q3LFGdCxUqdPXqVdhzYbDy6NGj+Llp06batWtL1DktLW3+ /PmQVGGE1NHRURhO/fLLL+WnGDx4MKKQFY4VAnF1ZcuWRfiGDRtMeoF5DrV8 6tev/+7du1evXumrzvCF8YBwSGJioi7pk5OTXV1dkX7jxo2GF5phGCZ/YYnq DEuekpJSUw0Fjhkzxs7ODoGVK1eWqDP0pXz58nC34QnGx8fTbKWkpKQePXqQ 7pw4cUJyipcvX3p5eSEqIiJCCKQJ4V27djXp1eU5uBtowJQsWZK0FbdCX3W+ fPky0qMJJG7baATPC00dHx8fpB86dCh89v/X3r3ExtT3ARyn0ngQLYnbAolL 6hrRhQRpImGB2rglTUTUpqwJEonLhlpYWlhYSCxYWSBILISQkkht3nfjEomF unRD0zQk1POLk0z6mrYPqs/76/h8VjPn/Kcz52h8538658wQXzxAxRihdX73 7l1ra2vcePLkSSycNWtW0c3Zs2eXH9l++PBhTNDKf9SqVati8O7du8tX3b17 t6qqKjr1+PHjuHvnzp0YOXXq1HjeYdmqHGIvxZ6Mme+VK1eKJb9Q5wMHDsT4 5ubmgQa0t7cvX748/qViD8fI1atXX716degvHqCSjNA6v379OiZ3xWeDY0Yc Ny5fvhxrY5r8458KO3PmTAxevHhxv2v3798fa+vr62P2XXxsafAzeUe6mLo2 NjYWf24uLfzZOsebpbFjx1ZXVz979mygMfEbMqqPDRs29PsBAIA/2cit89dv k9+GhoYTJ07U1NQURR68zhGg2IqLFy8ePXo0Jncxg4vB06dP73dw/JBFixYV +S7O4R2+jcrg1KlTsZmxP4vTowo/Veeenp5il548eXLwkbFvOzo6bt++ffjw 4eIs9W3btsW7oKFuA0ClGNF1jsnvmDFj6urqSkenB6rzo0ePIsely5VMnDhx yZIly5Yti9uxcKDnun//fjE+Ct7vsfGKce/eveKKIq9eveq7/Mfr/OXLl+3b t8fIjRs3ll+KZBCdnZ319fXxwJaWll956QCVaETX+e3bt9GUuHvr1q1ibb91 Pnjw4OjRo6urq5uammLi/PLly2L5tWvXBq/zoUOHSjV//vz5sG3T/9+8efNi M2tqaub9r7lz5xZ7YM6cOXF3165d/T68t7d3z549MSze8HR1df3ss7e1tRUf py8/exrgzzSi6xzWr18fE9vPnz8Xd8vrfOHChVHfriFWOjm6ZPA6x8S5qqpq 2rRpkaQYtnLlyr6HfCtMbW3tqB+wbt268sdGmvfu3Tvq28XP37x58wvPXjqr +sGDB0PeFIBKMNLrHE/atwjldd60aVMsOX36dPmPGqTO3d3dxXTy0qVLPT09 0Z24fezYsd+9Ndn945HteF/U3NwcAxYsWDD45UcGOWGqdAGT+E0b6isGqAgj vc7fKa9zQ0NDLGltbf1uZFdX15YtWwaqc3GctrGxsbgbc7ox35SfHF3ZBq/z x48fN2/eHGuXLl36j9dPO378eEtLS78f2CuOTvQ9BgLwh6v4Ou/bty+WTJky pfTCPnz4cO7cuZkzZ44fP77fOt+8eTOW19bWxpyutDAmzsWfX+Phv3mTEhuk zvH2Zu3atbFqxYoVpW+1GEh3d/eMGTNi8Pz582Pnd3Z2xsJPnz61t7cX75HC 2bNnh2szAEaaiq/z+/fvFy5cWPz/P2nSpBhQfIlhlOXp06fldY7QFFfsPH/+ fN/lMa0rrl6yc+fOYdispAaqc29vb+mrPCdPnjx9AB0dHaWHvHjxYs2aNaU/ YY8bN670jZNVVVUxs/63tw0gsYqv89dvgT5y5EhMe6urq2MGt3Xr1hs3bhSr otff1bmpqanvMe2+oi81NTWj/qQrQg9U59LnuAbX9+BD4fr16zt27IgZ9IQJ E/7666+6uro9e/aUf+EIwB9uxNUZACqeOgNANuoMANmoMwBko84AkI06A0A2 6gwA2agzAGSjzgCQjToDQDbqDADZqDMAZKPOAJCNOgNANuoMANmoMwBko84A kI06A0A26gwA2agzAGSjzgCQjToDQDbqDADZqDMAZKPOAJCNOgNANuoMANmo MwBko84AkI06A0A26gwA2agzAGQzHHUGAIZOnQEgm99VZwDg36HOAJCNOgNA NuoMANmoMwBko84AkI06A0A26gwA2agzAGSjzgCQjToDQDbqDADZqDMAZKPO AJCNOgNANuoMANmoMwBko84AkI06A0A26gwA2agzAGSjzgCQjToDQDbqDADZ qDMAZKPOAJCNOgNANuoMANmoMwBko84AkI06A0A26gwA2agzAGSjzgCQjToD QDbqDADZqDMAZKPOAJCNOgNANuoMANmoMwBko84AkI06A0A26gwA2agzAGSj zgCQjToDQDbqDADZqDMAZKPOAJCNOgNANuoMANmoMwBko84AkI06A0A26gwA 2RR1bmtr+y8AkEN0+T8AQDIxg/4KACTzNzM+OXo= "], {{0, 686}, {650, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{325., Automatic}, ImageSizeRaw->{650, 686}, PlotRange->{{0, 650}, {0, 686}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778603345642761*^9, 3.778603350664657*^9}, 3.778603444013424*^9, 3.778603478226412*^9, {3.778603560825512*^9, 3.778603569016445*^9}, 3.778603640827634*^9, {3.77860368507549*^9, 3.7786037031784563`*^9}, {3.7786037638507957`*^9, 3.7786037921394367`*^9}, {3.778603857781619*^9, 3.7786039039244003`*^9}, { 3.778603937133164*^9, 3.77860394355721*^9}, 3.778604187079376*^9, 3.778606244089538*^9, 3.77860664204948*^9, 3.77867953416254*^9, { 3.778679595285342*^9, 3.778679618113007*^9}, 3.778679677637065*^9, 3.778679834943612*^9, 3.778682247413623*^9, 3.778682288271439*^9}, CellLabel->"Out[1]=", CellID->920817626] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Possible Issues", "\[NonBreakingSpace]", Cell["(7)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->75384828], Cell[TextData[{ "It is expected that the first argument of ", Cell[BoxData[ StyleBox["RecordsSummary", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " is an object that can be converted to a full array atom objects:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778585331600477*^9, 3.7785853970200644`*^9}, { 3.778679906196417*^9, 3.778679940834489*^9}, 3.7790383942322407`*^9}, CellID->265667155], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"dataset", "=", RowBox[{"Dataset", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "1"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "1", "}"}]}]}], "|>"}], ",", "\[IndentingNewLine]", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "2"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}]}], "|>"}], ",", "\[IndentingNewLine]", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "3"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "3", "}"}]}]}], "|>"}], ",", "\[IndentingNewLine]", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "4"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"4", ",", "5"}], "}"}]}]}], "|>"}], ",", "\[IndentingNewLine]", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "5"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{"5", ",", "6", ",", "7"}], "}"}]}]}], "|>"}], ",", "\[IndentingNewLine]", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "6"}], ",", RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "}"}]}]}], "|>"}]}], "}"}], "]"}]}]], "Input", TaggingRules->{}, CellLabel->"In[1]:=", CellID->353891407], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnX1wFdX5x2+IigKCCBUVKETEWmGESnRAiqgdBqPM6IBYfKtgISEYAhgC EZwA8iJVsWkFRMurShQQUFAYJb5QpwxNgyKEEARJEVGJJGhiSiRifo854/3d 7t6793n27stzts/nD5qcPXf32+d+d885u3G/KQ9OGJreLBQK5ZwL/wwdNfWm hx8e9ciwC+CX4dk5mRnZY0anZU8ekzHm4b4PJv/ULSkU+gj+96efGwXBKw4I giAElFrG8FHIR4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2iNmo8FGi HWI2KnyUaIeYjQofJdohZqPCR4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPC R4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2BMZszz33XHp6+pYtW3xX IsRCzOa4EiEWYjbHlQixELM5rkSIhZjNcSVCLKhm279//7Jly+bOnZudnT1x 4sQZM2a89NJLR44c8UanRYew2b744osVK1bk5uZmZWXNnj175cqVn3/+uZdK FFCT5cuX5+XljRs3LicnZ+HChXv27HFQho6QzPbOO++MHTs2vQmoYUZGhvoZ XPfpp596oNOigzIbOH/y5MlKVVjepEmTSkpKPFMC/Otf/wKrq6NnZmaG9Wza tMkpGTqCN9tXX32lCggnrLpWfPvtt/v27cvPz4dGuNx5oNOigzIbfKEgctu2 bV9++eWJEyfgS4dri/Lb119/7Y2SyspKOPvgoH/5y18OHTpUU1MDYl555RUl r6yszBEZOoI3G3xxUK4pU6ZA9SLb//GPf0A7DFhuysSaDSguLo5sh3NEffVr 1qzxRglcXeFw8+fPNxRq0aJF0L5q1SpHZOgI3mxQOriUGQoIvPvuu1DDWbNm uabxJ5Bmi+r51157zcHTIa4SNY4bPA+Ul5dv3Lhx+/btjsjQERurUZiB7969 Gzy2du3aP/3pT2pOwsRsL7zwgnkTqIVNsKLxQAmM3eoCC0OnI4cLEiSzwYgJ y8/0n4GJ0IIFC2Cdxcdsr7/+unkTLAyV4OrqareVfPLJJ3AgWEYlfqDggTfb +++/r8r4/PPP79ix47PPPlPtH374IR+zRb2y7dmzBzbl5OR4oASmiMrYsExw 5HBBAm82sBPUcMOGDYZ2tXBgYra5c+eaN23atEnN2L1RAhd8OByM3Yb20tJS mHXAqeqIDB3Bmy03NzfqvBeWV3zMBhhuqcEVRn37W7du9UbJkiVL4HAwwTC0 g808uEfEGbzZCgoKoFZPPPEEjBSqBeZC4a8YrGheqDqu06JDWMn48eNh8QIe q6qq2rVr17Rp06AR/v3mm2+8UXL06FF1Q3Lx4sUVFRVQlq+//nr9+vVqErJ3 715HZOgI3mww9R03bpy6JT59+vSHH35YTYSKiorUt/zII4/AkOqqTosOymxP P/20esaRkZERftgxYcKEffv2eaYEgDktHDT8qCX8BGHz5s1OydAR0mr00KFD ixYtmjp1Klw95s2bV1hYePz4cWiH0zY7Oxvst3PnTld1WnRQZoO1APjqr3/9 K4iBkyIvLw9G+WPHjnmpRAELqBUrVsyePRuucnBdfeaZZ/6Xnx0oSGbzET4K +SjRDjEbFT5KtEPMRoWPEu0Qs1Hho0Q7xGxU+CjRDjEbFT5KtEPMRoWPEu0Q s1Hho0Q7xGxU+CjRDjEbFT5KtEPMRoWPEu0Qs1Hho0Q7xGxU+CjRjgOCIAiB xu+keiv4KOSjRDvEbFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNEO MRsVPkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGj RDvEbFTwSlasWHHllVeeffbZ/fv3j9rh3nvvnTVrlqHxb3/7WygUOv/880eM GPHtt98mKpcTiZgtaq1cQjuzbd++PdTEueeee8cdd5g7lJSUwFbzppdffrld u3bqszk5Oc6I5oFts8WqlUtoZ7bMzEyozz333PP999+bt9bX1/fr18+igK+9 9hpsveiiixKVywl7ZotbK8fRzmy33HIL1OeVV16JbFRRL1OnTr300kvVtcui gG3atIEONTU1DojmAclspFo5i3ZmGzhwINTnrbfeimwsKCgI/TcWBVRFPnbs mAOieUAyG6lWzqKd2W6++Waoz/vvvx/ZWFpauvRnbrvtNusCXnzxxdDh3//+ twOieUAyG6lWzmKtsKqq6pJLLgE9sJQztKuvrLCw0BslYdSV7Z///GesDo8+ +ijmysbkFHME2wuEuLVylrgKt2zZAnpat2792WefhRthfg6NI0aM8FKJ4te/ /jUc+tNPP43VIW4Br776aujw97//3aZQfgTGbMCYMWNA0uDBg9WvGzduhF87 depUXV3tsZLPP//8rLPOatWq1Q8//BCrT9wC/vGPf4QOjz32mH2tzAiS2Wpr a1NSUkAVjPIwgHbo0CEpKamoqMhLJWfOnNm3b98NN9wAMiZOnGixn7gF3LVr 19lnn92iRYtt27ZZmFYjgmQ2AAadZs2awWCalpYG8iZNmuSxkq1bt8Jx4bIG TmtoaLDYD6aA69atu+iii6DbnXfeaV8xGwJmNiAnJ0etlHv27FlfX++xEmW2 c845Z9asWT/++KPFfjAFhHPnsssug27Dhg2zr5gNwTNbRUUFjJ6gDRR6rwQM dvDgQbUUfeaZZyz2E7eAn3zyScuWLWHi98Ybb7hx1nhP8MymBlD1ULKsrMwX JeA3ENC5c2eLi1vcAk6ZMgU6TJs2zb5WZgTMbIsWLQJV11577fjx4+GH6667 zvGpNVKJmmsdOnQoVoe4Bfzd734HHWBctimUH0EyW3l5OazdmjdvDuvBurq6 bt26gcLHH3/ceyUAGN78BCGSuAX81a9+BR32799vUyg/AmM2WPqlpqZGugu+ aJi8wVx97969XipR/Pa3vwUxW7ZsidUhbgG7dOlifVtYOwJjNqUH/BY5bo4b Nw4a+/TpY30XwlklihtvvBEOvXnz5lgd4hZQPYCLfCCiO8Ew244dO5KTk+Ei VlpaGtleW1urrg8O3odH1krNuCzMFhf1J5Rffvml7T1ww7bZPIaPQqSSu+66 y/z3bHjOnDmT3ISD12TfEbNRQSqZNm0amG3o0KH2bpGtX78ePg5rBBufZYuY jQpSycGDB5s1awaGadWq1fDhw/H7h4thhw4d1K1Cx5fS/iJmo4JXsmLFCjVj jPVfV0VF/ddVrVu3HjVq1H/+8x+7MjkiZqPCR4l2iNmo8FGiHWI2KnyUaIeY jQofJdohZqPCR4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2iNmo8FGi HQcEQRACjd9XWSv4KOSjRDvEbFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGjRDvE bFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNEOMRsVPkq0Q8xGhY8S 7RCzUeGjRDvEbFTwSuLmjXoGkwxTMRsVpJJYeaMnT57Mz8/v3bt3mzZtLrjg gr59+06dOjVBAxw8ePCBBx74zW9+07Jly86dO998881Lly6NfE8dkwxTqtnc qBVep9tHwYBUEjVvtKysTL3iD0hKSkpOTlY/d+jQobi42J6eVatWNW/eXO0H rqLhDLvU1FTDq0J8zzAlmc2NWpF0unoIJEgl5rxRuNRcfvnl0Ni9e/cNGzZU VVWdOnWqqKhIZVR17doVTmSqmKNHj8LgCB+//fbbd+3adfr06dra2pUrV7Zu 3RoaH3roIUN/fzNM8WZzo1ZUne7tHw9SiTlvdM2aNdACVyHDm0srKytVdOCC BQuoYmbOnAkfvOGGGwwvRVdvTYeLgKG/vxmmeLO5USuqTvf2jwepxJw3qt6W f/3115s7jx07FjbdddddVDF33nknfPDJJ580tH/88cdq0Dlx4kRku78Zpniz uVErPNYK161bBwI6duxoDrmYM2cObBowYIA3SsKY80bvvvtumOVGDdHIzc2F zrfddhtVzLZt22CkNr9RHBphh+edd57hiudvhinebG7UCo+1QhjQ1dTlgw8+ MGxSaQLLly/3RkmYuHmjYRoaGq644groDGNigtrgXDt+/PjmzZvhvIMdwtrN 0MHfDNPEb304WCsL4iq8//77QUNWVlZkI1xYoLFly5YwbfZMSSMub1QBa9X7 7rsPRMLU3TDkUYF5WnhZCv+XZ82adebMGUMffzNMEzSbg7WyJq5ClaQMc5LI CsNyDBpHjhzpmRJ83ijw9ttv9+jRA3q2aNHCIgsGyfz581VCHJCcnAwjkXkh 4G+GaSJmc7ZW1sRVCBfY9u3bg5j33ntPtZw+fVq1bN++3TMlyLzR3bt3q6CE UFPAFsznnZIHpzwsgfv27Qt77tKli/kWqI8ZpvbM5l6tYoFRqNYpmZmZ6ld1 D7Nbt27WuZ/OKombN1pXVzdlyhRwo9K2atUq82CXON98841aeBYUFBg2+Zhh SjWbN7Uyg1GonhDBaasGiKFDh8Kvs2fP9lKJdd5odXV1r1691FiwcOHCBAM1 ampqXm0i6lcwfPhwONDo0aMjG/3NMCWZzdlakcAohC+6U6dOIK+oqAikwmy5 WbNmR44c8V5J1LxRKBeMAtB+zTXXlJeXJ64Ehkg1uMAs0bxV5a4a7h74m2GK N5vjtSKBPB1UZnd6evqzzz4LPwwaNMgvJea80dWrV0MLrNxhdHBKzFVXXRX1 FgecYupe0IYNGyLb/c0wxZvNjVrhQX7FJSUlILJdu3Yq7rOwsNAvJea80QED BoSa/uiiNAZHjx4Nd54zZw5MQeFf66MsX75crT1nzJjxxRdfQMt333335ptv qrt8cHGAVVJkf38zTPFmI9XKJZ2Ynuqmn7obc+rUKb+UmPNG1UNwC0aMGBHu 3Lt3b2iBf+MeKCMjI7wHWJiEf4aL3uHDhw2d/c0wxZuNVCuXdGJ65ufnKz1w ZfBRiSFvtKqqyrp6ts0GwFHuuOOOjh07wjS1a9eugwcPXrx4cdQZtb8Zpkiz UWvlkk5Mzz179ig9kc8lvVeSeN7o2rVrU1NTbX88Kv5mmFJvffgFXuGLL76o BhF/lSSYNwrMmzdvyJAhtj9uxvcM0+CZrV+/fqFof3XjsZIE80ZPnjw5cODA hQsX2vhsLHzPMA2M2eDbqampKSgoCDX92f/x48f9UqKwnTeqSEtLy8rKivyT 8kRgkmEaGLOpvwdQ5OXl+agkjL28UTdgkmEaGLNNnz4d1mJt27aFH1x9gsa/ VmwJjNkam55xMFEiRCVIZvMGPkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNEOMRsV Pkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNGOA4IgCIHG76usFXwU8lGiHWI2KnyU aIeYjQofJdohZqPCR4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2iNmo 8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2iNmo8FGiHWI2Kngl9vJGmWSDuoGY jQpSSay8UV2yQd2Aara4tXJVp9tHwYBUEjVvVKNsUDcgmQ1fK5d0unoIJEgl 5rxRvbJB3QBvNmqt3NDp6iGQIJWY80b1ygZ1A7zZqLVyFu3MZs4b1Ssb1A3w ZqPWylniKoRJuMX7fh3URrqyRb7XV69sUDfAm41aK2eJqzA7O7unifDrFquq qjxTooibN8o8G9QNbN/6iFsrZ7GhsLKyMiUlBbTl5uZ6rCRu3ij/bFA3sGc2 TK2chaqwvr6+f//+IG/IkCHOarNWgswb5Z8N6gb2zIaplbNQFapgZRhJHb91 YK0EmTeq4JwN6ga2h9FGRK0chKRw7ty5IKl9+/YVFRUeK4mbN2qGZzaoGyRi NoVFrRwEr3D9+vVw1YWv26WptbWSWHmj2mWDugHSbDZq5SxIs5WUlMAkB8Qs W7bMRyXmvFHtskHdAGk2G7VyFsxXDPNGdW/K1efXSNub80b1ygZ1A/wwSq2V s8RVWFdX16dPH5Bx6623cshBMOeN6pUN6gZ4s1Fr5YbOWFthtIIpNMjo0aOH 20+ukWYz5402apUN6gakBQKpVm7ojLW1uLhYKYFpUu9orF692hslYQx5o2F0 yQZ1A+pqFF8rN3TG2rpz585oT0T/HwdXyshaJZ436m82qBskfuvDG/goRCpJ MG/U92xQNxCzUUEqSTBv1PdsUDcQs1FBKrGdN8okG9QNxGxU8Ers5Y0yyQZ1 AzEbFT5KtEPMRoWPEu0Qs1Hho0Q7xGxU+CjRDjEbFT5KtEPMRoWPEu0Qs1Hh o0Q7xGxU+CjRDjEbFT5KtEPMRoWPEu04IAiCEGj8vspawUchHyXaIWajwkeJ dojZqPBRoh1iNip8lGiHmI0KHyXaIWajwkeJdojZqPBRoh1iNip8lGiHmI0K HyXaIWajwkeJdojZqPBRoh1iNip8lGiHmI0KHyXaIWajgldiL2/UDZhkmIrZ qCCVxMobNfDAAw9An5UrV9rWo15BE5WLL75Y9WGSYZqg2RKvFRLtzBY1b9TA smXLlAESKeATTzwR12wK3zNMEzGbI7VCop3ZzHmjBvbu3XveeeclXsD09HTY w/jx43ebKC0tNXT2N8PUttmcqhUS7cxmzhuNpLa2FqZzSUlJrVq1SrCAKmsS +dZBfzNM7ZnNwVoh0c5s5rzRSO69917Y+uijj/bu3TvBAv7yl7+EPezatQvT 2d8MU3tmc7BWSKwVVlVVqdcdw7LL0K7KW1hY6I2SMOa80TDPPfccbIIOP/zw Q4IFrK+vV68cRK4x/c0wtWE2B2uFJ67CLVu2qHfoRb5eG+bn0AjrfS+VKGLl jcJUCtanMEtXr/dPsIBlZWWhphjrt99+e9CgQXBmXXjhhTfeeOPMmTPr6urM /f3NMKWazdla4cEoHDNmDIgZPHiw+nXjxo3wa6dOnaqrqz1WEitvFGbm3bt3 h2vRtm3bVEuCBdy0aRN8PDIhMbwU7dKli3ls9TfDlGQ2x2uFB6MQZpIqzXbp 0qUwgML5Dt9CUVGRl0qs80Z///vfQ3t+fn64JcECPv3008paGRkZsPZsaGio rKx8+eWX1UQOvqzvvvsusr+/GaYkszleKzxIhTBAwLkAg6mK05o0aZLHSizy RhctWgSbbrrppsi0owQL+OGHH7700kvvvfeeof3w4cNq7bZgwQLDJh8zTPFm c6NWePADfU5OjjrZe/bs6UZyIsZs5rzR8vLy5s2bw8XWEKLhXgFHjRoFe4br g6HdxwxTpNm8r5UBvNkqKirUHAYWy94riZU3+sYbb8S6zx+Jgzoff/zxkOlF 5f5mmCLN5n2tourE9FQDaKjpoSQs1nxRYs4bffPNN8+KhpIKQ7/6laTk+++/ n9/E8ePHzVvHjh0Le87MzIxs9DfDFGk2N2plQ2fcbmqsv/baa8ePHx9qygp0 fBqMVGLOG41KgkODupVhnprCANS+fXvYtGbNmsh2fzNMqbc+DLAaRmGsh3UW DPewHqyrq+vWrVvIhZAUZK3MeaNRiVXAOXPmwKUJ/rX++IYNG9T5Dpcs9RCq pqZm8+bN6i7fLbfcYujvb4ZpYMwGS7/U1NRId8EXrcLi9+7d66USRdS8UTOx Cqja4d+4B3rqqafUQwQATrTwlAaWcl999ZWhs78ZpoExGywHQAn4LXLcHDdu HDT26dPHwWw7ZK1i5Y0aSNxswEcfffTggw927doVpqkpKSm33377qlWrovb0 N8M0GGbbsWNHcnIyXMQMf1RTW1urzmUH75kja5V43ujatWvh3LH98aj4m2Ga oNk8g49CpJIE80aBefPmDRkyxPbHzfieYSpmo4JUkmDe6MmTJwcOHLhw4UIb n42F7xmmYjYqSCW280YVaWlpWVlZFn9SToJJhqmYjQpeib28UTdgkmEqZqPC R4l2iNmo8FGiHWI2KnyUaIeYjQofJdohZqPCR4l2iNmo8FGiHWI2KnyUaIeY jQofJdohZqPCR4l2iNmo8FGiHQcEQRACjd9XWSv4KOSjRDvEbFT4KNEOMRsV Pkq0Q8xGhY8S7RCzUeGjRDvEbFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGjRDvE bFT4KNEOMRsVPkq0Q8xGhY8S7RCzUeGjRDvEbFTwSvjkjbqBjQxTMRsVpJKo eaOYbFB7fPzxxyNHjuzcuXOLFi169eqVm5trO8QWTpB4707+6eXJNjJMSWZz r1ZIna4eAglSSdS8UXw2KIklS5bA9VPtJ/wWSjCevfewxTVbUlJSuDMpw5Rk Npdqhdfp6iGQIJVEzRslZYMi2bp1qzJYXl4eCGtoaICLavfu3aFl0KBBNna4 f/9+szzF/fffD7uFy2Zkf3yGKclsbtQKiXZmi5o3SsoGxQDWuvzyy2GfM2fO jGyHr0OFQRw+fNipY6koomuuucbwIi98hinJbI7XCo92ZouaN0rKBsWg8ilg ll5bW2vY9NRTT8G1zqljnTp16qqrroIJYXl5uWETPsOUZDbHa4XHWuG6detA WMeOHSMTfBRz5syBTQMGDPBGSRhz3ig1GxTDhAkTYId/+MMfnNphLCZOnAgH Wrx4sXkTPsMUbzY3aoXHWiGcd3B2g7YPPvjAsEm9+X/58uXeKAljzhulZoNi GDZsGOxz9uzZR44ceeihh+Cg8NXDzvPz8x0MgodTBgblq6++OjK2LAw+wxRv NjdqhSeuQjV3zcrKimyEKkFjy5YtzaOMe0oaY+SNUrNBMfTr1w8+PmbMGHWu RQLDUHFxsY19mrn++uthh/C9R92KzzDFm82NWuGJq1AlKcMpEHn2wckOjSNH jvRMiUXeKDUbFIN6jaqaQrzwwgtg8urqaigFzK+g8bLLLrOxTwMwRYddpaWl xeqAzzDFm82NWuGJqxD0qLSmcPjm6dOnVcv27ds9U2KRN2ojGzQuKjIJLt2G kCz4atq2bWtvn5FADbt27Rp3oo7MMMWbzY1a4cEoNOTQqfuN8HWYVw3uKYmV N2pNrGzQuMDCJ9YCAa4J9vYZCVxMQk3Bc9bdkBmmpNVoLGzXCg9GoXpCBKeY upgPHTpUTZ69VBIrb9SaqNmgGEaMGAEfnDFjhnnT/PnzYRNM6qj7jESZ+fnn n7fog88wdcRstmuFB6MQvuhOnTqBkqKiIpi6NG/eHJbPsEzzXok5b9RGNigG sFms03z06NFq7UDdZ5g9e/aEmnIcrBe2+AxTpNlcqhUe5OmgMrvT09OfffZZ 289rHFFizhulZoNiKCsrgyWbSr2MbD969Gjr1q1DicWKTZ48Oe7I2EjJMMVf 2dyoFR7kV1xSUgJK2rVrp+I+CwsL/VJizhslZYMi80Ybf77zcOmll7766qu1 tbWnTp1666231LNRGEMjl4f4fSrUkjbuZACfYYo3GzVH1VnwA/0VV1yhdLZp 0wYq75eSqHmj+GxQfARkXV2dug+mbkyFb0n16tXLkCtKipWE6YfaDwym1j3x GaakORspR9VZ8GbLz89XquAs9lFJrLxRZDYoyRgNDQ1//vOfU1NTzz///F/8 4hcweViwYIE5eo+0zyVLlkDnCy+8MO6aGp9hSl0g4HNUnQWvUE1rQ//9XNJ7 JTzzRv3NMHVkNeoBeIUvvvgi/H+H+Ya/ShjmjbqxT1KGafDMph4XPvnkk/4q YZg36nuGaWDMBpWEBUtBQUGo6c/+o96i8UaJglXeqBv7tJFhGhiz3XfffeEF S15eno9KwvDJG3UDGxmmgTHb9OnTYYHctm1b+CHqn115pkSIRWDM1th0B4CJ EiEqQTKbN/BRoh1iNip8lGiHmI0KHyXaIWajwkeJdojZqPBRoh1iNip8lGiH mI0KHyXaIWajwkeJdhwQBEEINH5fZa3go5CPEu0Qs1Hho0Q7xGxU+CjRDjEb FT5KtEPMRoWPEu0Qs1Hho0Q7xGxU+CjRDjEbFT5KtEPMRoWPEu0Qs1Hho0Q7 xGxU+CjRDjEbFT5KtEPMRoWPEu0Qs1HBK4nMG7WRzhk8xGxUkEoMeaM20jmD hw2zOZijikc7s0XNGyWlcwYPqtmczVGl6nT1EEiQSqLmjTZS0jmDB8lsjueo UnW6eggkSCVR80YbKemcwQNvNi9zVGPpdG//eJBKouaNNlLSOYMH3mye5ahG Ja5CmISHYnPixAnPlCjMeaMKfDpn8MCbzbMc1ajEVZidnd3TRPjViFVVVZ4p UZjzRhX4dM7ggTebNzmq1jpJH6msrExJSQHNsF72WEnUvFEFPp0zeODN5k2O qrVOfP/6+vr+/fuDtiFDhjj7IkprJRZ5owp8OmfwwJvNgxzVuDrx/VWwMoyk jl91rZVY5I2GQaZzBg+82dzOUcXoRHaeO3cu6Gnfvn1FRYXHSjB5o8h0zuCB N5vbOarW4M22fv36pKQk+LpdmoRbK4mbN4pP5wweeLO5naNqDdJsJSUlMB0C McuWLfNRiTlvNAw+nTN44M3mao5qXDAKjx07pu5iufqkG2l7c96oAp/OGTzw ZnM1RxWp06JDXV1dnz59QMatt97KIQfBnDeqwKdzBg+82RopOaou6Yy1FUYr dRuwR48ebt/0Q9Yqat5oIyWdM3iQzIbPUXVJZ6ytxcXF4b8/6R2N1atXe6Mk TKy8UXw6Z/Agma0RnaPqks5YW3fu3GnxYBQoKCjwRkmYWHmj+HTO4EE1m1/w UYhUEjVvlJTOGTzEbFSQSqLmjZLSOYOHmI0KUokhb9RGOmfwELNRwSuJzBu1 kc4ZPMRsVPgo0Q4xGxU+SrRDzEaFjxLtELNR4aNEO8RsVPgo0Q4xGxU+SrRD zEaFjxLtELNR4aNEO8RsVPgo0Q4xGxU+SrTjgCAIQkDx+/oqCIIgCIIgCIIg CIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIIgCIKu /B+uqcxa "], {{0, 371}, {207, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{103.5, Automatic}, ImageSizeRaw->{207, 371}, PlotRange->{{0, 207}, {0, 371}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778584010513968*^9, 3.77858401714615*^9}, 3.778585433301197*^9, 3.778606244303369*^9, 3.77860664223785*^9, 3.778679534498687*^9, {3.7786795955771513`*^9, 3.778679618341536*^9}, 3.7786796780066767`*^9, 3.778679835171422*^9, 3.778682247685883*^9, 3.7786822884296207`*^9}, CellLabel->"Out[1]=", CellID->136793921] }, Open ]], Cell[TextData[{ "This fails because ", Cell[BoxData[ StyleBox["dataset", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " cannot be converted to a full 2D array:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778679950442629*^9, 3.778679982640074*^9}, { 3.778682507834302*^9, 3.778682508632225*^9}, 3.859302003133513*^9}, CellID->107345656], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", "dataset", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7785836292557383`*^9, 3.778583763548526*^9}, { 3.77858390986963*^9, 3.778583935407154*^9}, {3.778584013495366*^9, 3.7785840145412903`*^9}}, CellLabel->"In[2]:=", CellID->925484154], Cell[BoxData[ TemplateBox[{ "RecordsSummary", "args", "\"The first argument is expected to be a full array of depth 1 or 2, a \ dataset that can be converted to such a full array, an association, or a list \ of rules.\"", 2, 2, 20, 32601411235158341139, "Local", "Global`RecordsSummary"}, "MessageTemplate2"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{{3.778584014858069*^9, 3.7785840199823027`*^9}, 3.7785854346217213`*^9, 3.778606244351955*^9, 3.778606642329463*^9, 3.778679534574215*^9, {3.7786795956332817`*^9, 3.778679618393849*^9}, 3.778679678055625*^9, 3.778679835219276*^9, 3.778682247736287*^9, 3.778682288477641*^9}, CellLabel->"During evaluation of In[2]:=", CellID->404035234], Cell[BoxData["$Failed"], "Output", TaggingRules->{}, CellChangeTimes->{{3.778583752584819*^9, 3.7785837639521847`*^9}, 3.778583896280451*^9, 3.778583937253901*^9, {3.778584014865666*^9, 3.778584019988356*^9}, 3.778585434627363*^9, 3.778606244357624*^9, 3.778606642335795*^9, 3.7786795345799026`*^9, {3.778679595639233*^9, 3.778679618400272*^9}, 3.778679678062698*^9, 3.77867983522556*^9, 3.7786822477430067`*^9, 3.778682288483796*^9}, CellLabel->"Out[2]=", CellID->191466448] }, Open ]], Cell[TextData[{ "A work-around is to use ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["HoldForm", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/HoldForm", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " for the columns that are not vectors:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778584137179105*^9, 3.778584142241466*^9}, { 3.7785854787864857`*^9, 3.778585524169463*^9}, 3.8593020154652576`*^9}, CellID->440129954], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"dataset", "[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"\"\\"", "\[Rule]", "HoldForm"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584127305813*^9, 3.778584131768485*^9}, { 3.778585423212874*^9, 3.778585459176468*^9}}, CellLabel->"In[3]:=", CellID->811054035], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 a\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "2"}, {"\<\"Mean\"\>", "3.5`"}, {"\<\"Median\"\>", "3.5`"}, {"\<\"3rd Qu\"\>", "5"}, {"\<\"Max\"\>", "6"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 b\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"x\"\>", "2"}, {"\<\"y\"\>", "2"}, {"\<\"z\"\>", "2"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"3 c\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { TagBox[ RowBox[{"{", "}"}], HoldForm], "1"}, { TagBox[ RowBox[{"{", "1", "}"}], HoldForm], "1"}, { TagBox[ RowBox[{"{", "3", "}"}], HoldForm], "1"}, { TagBox[ RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], HoldForm], "1"}, { TagBox[ RowBox[{"{", RowBox[{"4", ",", "5"}], "}"}], HoldForm], "1"}, { TagBox[ RowBox[{"{", RowBox[{"5", ",", "6", ",", "7"}], "}"}], HoldForm], "1"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778585446299769*^9, 3.77858545952897*^9}, 3.7786062443937597`*^9, 3.778606642379137*^9, 3.7786795346357603`*^9, { 3.77867959569514*^9, 3.7786796184595747`*^9}, 3.778679678101533*^9, 3.778679835276601*^9, 3.7786822477932577`*^9, 3.77868228851226*^9}, CellLabel->"Out[3]=", CellID->728943376] }, Open ]], Cell[TextData[{ "If the numerical columns have ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Quantity", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/Quantity", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " values those columns are treated as categorical:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778589506317182*^9, 3.7785895780927134`*^9}, 3.8593020231826344`*^9}, CellID->204696650], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{ RowBox[{"ExampleData", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}], "\[LeftDoubleBracket]", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "\[RightDoubleBracket]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584077206245*^9, 3.778584083481244*^9}, { 3.778589427880618*^9, 3.77858947013612*^9}}, CellLabel->"In[4]:=", CellID->364427252], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 Mass\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { TemplateBox[{ "3.30104`6.*^23", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, { TemplateBox[{ "6.41693`6.*^23", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, { TemplateBox[{ "4.867320000000000000000001`6.*^24", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, { TemplateBox[{ "5.9721986`8.*^24", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, { TemplateBox[{ "8.68103`6.*^25", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, { TemplateBox[{ "1.0241`6.*^26", "\"kg\"", "kilograms", "\"Kilograms\""}, "Quantity"], "1"}, {"\<\"(Other)\"\>", "2"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 Radius\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { TemplateBox[{"2439.7`5.", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, { TemplateBox[{ "3385.595`4.298042852900571", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, { TemplateBox[{ "6051.85`5.", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, { TemplateBox[{ "6367.4446571000000000001`8.299868708313456", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, { TemplateBox[{ "24552.5`5.", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, { TemplateBox[{"25266.`5.", "\"km\"", "kilometers", "\"Kilometers\""}, "Quantity"], "1"}, {"\<\"(Other)\"\>", "2"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778589433458291*^9, 3.778589470480797*^9}, 3.778606244489637*^9, 3.778606642432106*^9, 3.778679534698927*^9, { 3.778679595828895*^9, 3.778679618536302*^9}, 3.778679678237459*^9, 3.778679835331525*^9, 3.778682247846835*^9, 3.778682288543579*^9}, CellLabel->"Out[4]=", CellID->853979576] }, Open ]], Cell[TextData[{ "A summary of numerical values can be obtained by using ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["QuantityMagnitude", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/QuantityMagnitude", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778589646550209*^9, 3.778589669624608*^9}, { 3.778680062562693*^9, 3.7786800807307034`*^9}, 3.779038405375395*^9}, CellID->299818243], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{ RowBox[{ RowBox[{"ExampleData", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}], "\[LeftDoubleBracket]", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "\[RightDoubleBracket]"}], "[", RowBox[{"All", ",", RowBox[{"{", RowBox[{ RowBox[{"\"\\"", "\[Rule]", "QuantityMagnitude"}], ",", RowBox[{"\"\\"", "\[Rule]", "QuantityMagnitude"}]}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778584077206245*^9, 3.778584083481244*^9}, { 3.778589427880618*^9, 3.77858947013612*^9}, {3.77858958612712*^9, 3.778589641195677*^9}}, CellLabel->"In[5]:=", CellID->888307346], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[GridBox[{ { StyleBox["\<\"1 Mass\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "3.30104`6.*^23"}, {"\<\"1st Qu\"\>", "2.7545065`5.9090506078402445*^24"}, {"\<\"Median\"\>", "4.63912493`6.027999399087973*^25"}, {"\<\"Mean\"\>", "3.3343507695`6.0009636830660344*^26"}, {"\<\"3rd Qu\"\>", "3.353645`5.884266627795741*^26"}, {"\<\"Max\"\>", "1.89813`6.*^27"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { StyleBox["\<\"2 Radius\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "2439.7`5."}, {"\<\"1st Qu\"\>", "4718.7225`4.2175625986709875"}, {"\<\"Median\"\>", "15459.9723285500000000001`5.099973623991946"}, {"\<\"Mean\"\>", "24319.0112071375`4.984013489535903"}, {"\<\"3rd Qu\"\>", "41291.`4.792661662628472"}, {"\<\"Max\"\>", "69173.`5."} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778589628709765*^9, 3.7785896415353317`*^9}, 3.778589680928154*^9, 3.77860624455867*^9, 3.7786066425089684`*^9, 3.778679534801569*^9, {3.7786795959195547`*^9, 3.778679618628187*^9}, 3.778679678321772*^9, 3.778679835417383*^9, 3.778682247932952*^9, 3.778682288644858*^9}, CellLabel->"Out[5]=", CellID->400166393] }, Open ]], Cell[TextData[{ "For associations the values of which are not full arrays, using the option \ setting ", Cell[BoxData[ RowBox[{ TagBox[ ButtonBox["Thread", BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Thread", ContentPadding->False], MouseAppearanceTag["LinkHand"]], "\[Rule]", TagBox[ ButtonBox["True", BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/True", ContentPadding->False], MouseAppearanceTag["LinkHand"]]}]], "InlineFormula", FontFamily->"Source Sans Pro"], " produces a failure:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778680430228765*^9, 3.778680502139847*^9}, { 3.778680541470945*^9, 3.77868054657843*^9}, {3.77903841463848*^9, 3.779038420083444*^9}, {3.859302197619863*^9, 3.859302201962669*^9}, { 3.8593023114049597`*^9, 3.859302345531281*^9}}, CellID->22697313], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{ RowBox[{"<|", RowBox[{ RowBox[{"1", "\[Rule]", RowBox[{"Range", "[", "2", "]"}]}], ",", RowBox[{"2", "\[Rule]", RowBox[{"Range", "[", "3", "]"}]}]}], "|>"}], ",", RowBox[{"Thread", "->", "True"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778680376277073*^9, 3.778680414377513*^9}}, CellLabel->"In[6]:=", CellID->134733408], Cell[BoxData[ TemplateBox[{ "RecordsSummary", "args", "\"The first argument is expected to be a full array of depth 1 or 2, a \ dataset that can be converted to such a full array, an association, or a list \ of rules.\"", 2, 6, 21, 32601411235158341139, "Local", "Global`RecordsSummary"}, "MessageTemplate2"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.778680415077107*^9, 3.778680505274682*^9, 3.778682247944708*^9, 3.77868228865539*^9}, CellLabel->"During evaluation of In[6]:=", CellID->797165376], Cell[BoxData[ RowBox[{ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"1st Qu\"\>", "1"}, {"\<\"Min\"\>", "1"}, {"\<\"Mean\"\>", "1.5`"}, {"\<\"Median\"\>", "1.5`"}, {"\<\"3rd Qu\"\>", "2"}, {"\<\"Max\"\>", "2"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}], "\[Rule]", "$Failed"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778680400728723*^9, 3.778680415085079*^9}, 3.77868050528054*^9, 3.7786822479508657`*^9, 3.778682288661832*^9}, CellLabel->"Out[6]=", CellID->466873286] }, Open ]], Cell["This works though:", "Text", TaggingRules->{}, CellChangeTimes->{{3.778680517912859*^9, 3.778680521344144*^9}}, CellID->134114185], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{ RowBox[{"<|", RowBox[{ RowBox[{"1", "\[Rule]", RowBox[{"Range", "[", "2", "]"}]}], ",", RowBox[{"2", "\[Rule]", RowBox[{"Range", "[", "3", "]"}]}]}], "|>"}], ",", RowBox[{"Thread", "\[Rule]", "False"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778680376277073*^9, 3.778680414377513*^9}, { 3.778680507158473*^9, 3.778680514043051*^9}}, CellLabel->"In[7]:=", CellID->122238306], Cell[BoxData[ RowBox[{"{", TagBox[GridBox[{ { StyleBox["\<\"1 column 1\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ { RowBox[{"1", "\[Rule]", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "1"}, { RowBox[{"2", "\[Rule]", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], "1"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778680510027022*^9, 3.778680514582467*^9}, 3.7786822480027723`*^9, 3.778682288692031*^9}, CellLabel->"Out[7]=", CellID->103180214] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Neat Examples", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->356368899], Cell[TextData[{ "Summarize subsets of ", StyleBox["Titanic", FontSlant->"Italic"], " data that correspond to each passenger class:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.778604391991804*^9, 3.7786044598129463`*^9}}, CellID->152513339], Cell[BoxData[ RowBox[{ RowBox[{"titanic", "=", RowBox[{"ExampleData", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778680102657902*^9, 3.778680131257868*^9}}, CellLabel->"In[1]:=", CellID->153552773], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ColumnForm", "@", RowBox[{"Normal", "@", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Grid", "[", RowBox[{"{", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["RecordsSummary", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/RecordsSummary"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RecordsSummary"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RecordsSummary"], BoxID -> "RecordsSummary", Selectable->False], "[", RowBox[{"Dataset", "[", "#", "]"}], "]"}], "}"}], "]"}], "&"}], ",", RowBox[{"Normal", "[", RowBox[{"titanic", "[", RowBox[{"GroupBy", "[", "\"\\"", "]"}], "]"}], "]"}]}], "]"}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.778604560372048*^9, 3.7786047547300797`*^9}}, CellLabel->"In[2]:=", CellID->532913149], Cell[BoxData[ InterpretationBox[GridBox[{ { RowBox[{"\<\"1st\"\>", "\[Rule]", TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox["\<\"1 class\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"1st\"\>", "323"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"2 age\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "28"}, {"\<\"Median\"\>", "39"}, {"\<\"Mean\"\>", "39.16549295774648`"}, {"\<\"3rd Qu\"\>", "50"}, {"\<\"Max\"\>", "80"}, {"\<\"Missing[___]\"\>", "39"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"3 sex\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"male\"\>", "179"}, {"\<\"female\"\>", "144"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"4 survived\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"True", "200"}, {"False", "123"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]}]}, { RowBox[{"\<\"2nd\"\>", "\[Rule]", TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox["\<\"1 class\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"2nd\"\>", "277"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"2 age\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "22"}, {"\<\"Median\"\>", "29"}, {"\<\"Mean\"\>", "29.517241379310345`"}, {"\<\"3rd Qu\"\>", "36"}, {"\<\"Max\"\>", "70"}, {"\<\"Missing[___]\"\>", "16"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"3 sex\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"male\"\>", "171"}, {"\<\"female\"\>", "106"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"4 survived\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"False", "158"}, {"True", "119"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]}]}, { RowBox[{"\<\"3rd\"\>", "\[Rule]", TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox["\<\"1 class\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"3rd\"\>", "709"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"2 age\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"Min\"\>", "1"}, {"\<\"1st Qu\"\>", "18"}, {"\<\"Median\"\>", "24"}, {"\<\"Mean\"\>", "24.848303393213573`"}, {"\<\"3rd Qu\"\>", "32"}, {"\<\"Max\"\>", "74"}, {"\<\"Missing[___]\"\>", "208"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"3 sex\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"\<\"male\"\>", "493"}, {"\<\"female\"\>", "216"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox["\<\"4 survived\"\>", StripOnInput->False, FontFamily->"Times", FontColor->RGBColor[0, 0, 1], $CellContext`LineColor -> RGBColor[0, 0, 1], $CellContext`FrontFaceColor -> RGBColor[0, 0, 1], $CellContext`GraphicsColor -> RGBColor[0, 0, 1], $CellContext`BackFaceColor -> RGBColor[0, 0, 1]]}, { TagBox[GridBox[{ {"False", "528"}, {"True", "181"} }, AutoDelete->False, GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]} }, AutoDelete->False, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]}]} }, BaselinePosition->{Baseline, {1, 1}}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}], ColumnForm[{"1st" -> Grid[{{ Column[{ Style["1 class", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"1st", 323}}, Alignment -> Left]}], Column[{ Style["2 age", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"Min", 1}, {"1st Qu", 28}, {"Median", 39}, { "Mean", 39.16549295774648}, {"3rd Qu", 50}, {"Max", 80}, { "Missing[___]", 39}}, Alignment -> Left]}], Column[{ Style["3 sex", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"male", 179}, {"female", 144}}, Alignment -> Left]}], Column[{ Style["4 survived", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{True, 200}, {False, 123}}, Alignment -> Left]}]}}], "2nd" -> Grid[{{ Column[{ Style["1 class", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"2nd", 277}}, Alignment -> Left]}], Column[{ Style["2 age", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"Min", 1}, {"1st Qu", 22}, {"Median", 29}, { "Mean", 29.517241379310345`}, {"3rd Qu", 36}, {"Max", 70}, { "Missing[___]", 16}}, Alignment -> Left]}], Column[{ Style["3 sex", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"male", 171}, {"female", 106}}, Alignment -> Left]}], Column[{ Style["4 survived", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{False, 158}, {True, 119}}, Alignment -> Left]}]}}], "3rd" -> Grid[{{ Column[{ Style["1 class", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"3rd", 709}}, Alignment -> Left]}], Column[{ Style["2 age", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"Min", 1}, {"1st Qu", 18}, {"Median", 24}, { "Mean", 24.848303393213573`}, {"3rd Qu", 32}, {"Max", 74}, { "Missing[___]", 208}}, Alignment -> Left]}], Column[{ Style["3 sex", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{"male", 493}, {"female", 216}}, Alignment -> Left]}], Column[{ Style["4 survived", RGBColor[0, 0, 1], FontFamily -> "Times"], Grid[{{False, 528}, {True, 181}}, Alignment -> Left]}]}}]}], Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.778604655558014*^9, 3.7786047550824547`*^9}, 3.778606244740615*^9, 3.778606642638109*^9, 3.778679534996533*^9, { 3.778679596083722*^9, 3.778679618789607*^9}, 3.778679678441524*^9, 3.778679835558057*^9, 3.77868013284661*^9, 3.77868224819519*^9, 3.778682288805976*^9}, CellLabel->"Out[2]=", CellID->577487918] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"RecordsSummary | Example Notebook", Visible->False, FrontEndVersion->"13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb", CharacterEncoding -> "UTF-8"]]], Cell[ StyleData[All, "Working"], Editable -> True, DockedCells -> {}], Cell[ StyleData["Notebook"], Editable -> True, DockedCells -> {}, ScrollingOptions -> {"VerticalScrollRange" -> Automatic}], Cell[ StyleData[ "Section", StyleDefinitions -> StyleData["PrimaryExamplesSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Subsection", StyleDefinitions -> StyleData["ExampleSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsection", StyleDefinitions -> StyleData["ExampleSubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsubsection", StyleDefinitions -> StyleData["ExampleSubsubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Text", StyleDefinitions -> StyleData["ExampleText"]], Editable -> True]}, Visible -> False, FrontEndVersion -> "13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[627, 23, 168, 7, 70, "Subsection",ExpressionUUID->"2910e039-847c-49e6-a849-a6442d1d3668", CellID->644364796], Cell[798, 32, 151, 3, 70, "Text",ExpressionUUID->"a8305f97-23b5-4c4d-ac8b-f9e11d9bb46c", CellID->611815071], Cell[CellGroupData[{ Cell[974, 39, 7447, 188, 70, "Input",ExpressionUUID->"274bf7d1-f4ac-44eb-b16f-1b7babd37469", CellID->212522592], Cell[8424, 229, 1635, 43, 70, "Output",ExpressionUUID->"26cefa5a-51fd-43e2-84a4-d3847c2ef936", CellID->342988610] }, Open ]], Cell[CellGroupData[{ Cell[10096, 277, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"f20319cb-9acb-427a-800b-e15ff00efaa9", CellID->787296252], Cell[10243, 283, 278, 5, 70, "Text",ExpressionUUID->"f6e9b3d2-9540-4b57-86ac-e61c92e55986", CellID->820975443], Cell[CellGroupData[{ Cell[10546, 292, 7949, 201, 70, "Input",ExpressionUUID->"8c03639e-878a-4f01-9e84-c81e99f25a16", CellID->638118361], Cell[18498, 495, 2330, 67, 70, "Output",ExpressionUUID->"4db66a13-6653-4faf-b446-6642881d7951", CellID->168435583] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[20877, 568, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"2ab28b3d-2066-45c7-9151-10bbb0b69dea", CellID->1441358197], Cell[21025, 574, 173, 3, 70, "Text",ExpressionUUID->"3e182263-16f2-4d9b-a511-40ecd563529c", CellID->537451583], Cell[CellGroupData[{ Cell[21223, 581, 7508, 192, 70, "Input",ExpressionUUID->"2013a764-de78-4131-b8b3-d0e575e89040", CellID->590529427], Cell[28734, 775, 1470, 40, 70, "Output",ExpressionUUID->"1e5e38ef-5448-454f-9821-b617108e351e", CellID->916685375] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[30253, 821, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"404a40d7-f54d-41e3-a373-a40c8ec4007e", CellID->1291678819], Cell[30401, 827, 379, 8, 70, "Text",ExpressionUUID->"a4fd7a66-a041-41ff-8e9f-658a50454df1", CellID->335720918], Cell[30783, 837, 1736, 43, 70, "Input",ExpressionUUID->"5fc4f270-b6cd-4397-9d7f-90bd34eefc96", CellID->962553592], Cell[CellGroupData[{ Cell[32544, 884, 7409, 184, 70, "Input",ExpressionUUID->"b2de6c72-e5be-4f68-a375-890eea26b640", CellID->487636156], Cell[39956, 1070, 6044, 162, 70, "Output",ExpressionUUID->"4b16d42d-402d-487f-a512-fc72006f62e3", CellID->99523271] }, Open ]], Cell[46015, 1235, 267, 5, 70, "Text",ExpressionUUID->"4f3f50eb-ab4a-4aac-835a-78c0235b058d", CellID->683680975], Cell[CellGroupData[{ Cell[46307, 1244, 7535, 186, 70, "Input",ExpressionUUID->"529e86a5-58e5-447f-8c5e-a727968b64ab", CellID->726096189], Cell[53845, 1432, 6000, 162, 70, "Output",ExpressionUUID->"28146a9b-3c18-4b16-9e12-1b4163d65efd", CellID->585088798] }, Open ]], Cell[59860, 1597, 335, 6, 70, "Text",ExpressionUUID->"cbcbf604-229a-4d45-8d77-191b80ee2a30", CellID->241822484], Cell[60198, 1605, 885, 22, 70, "Input",ExpressionUUID->"348d2f35-b27a-4096-af94-2c014748d32e", CellID->788629173], Cell[CellGroupData[{ Cell[61108, 1631, 7452, 184, 70, "Input",ExpressionUUID->"2433e273-a895-46e6-9baf-3a4297e3a0e5", CellID->617298977], Cell[68563, 1817, 5513, 155, 70, "Output",ExpressionUUID->"3d5508f5-bbc8-492e-a2e8-6f6dd3b11b22", CellID->935414465] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[74125, 1978, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"6732ada7-6e93-4be2-a140-ff009ba23d7e", CellID->333723410], Cell[74272, 1984, 159, 3, 70, "Text",ExpressionUUID->"1d3cd6ea-4ada-4c78-8213-b016baeffff8", CellID->608453598], Cell[74434, 1989, 560, 17, 70, "Input",ExpressionUUID->"ec3729f8-d26f-456a-8c38-933d5d2ee76a", CellID->428315645], Cell[CellGroupData[{ Cell[75019, 2010, 7327, 184, 70, "Input",ExpressionUUID->"193c8c9b-4def-4742-958f-a26e6c1fe4ab", CellID->288302114], Cell[82349, 2196, 4759, 132, 70, "Output",ExpressionUUID->"f6e6973f-38d8-4e97-97c4-612a5e9608d3", CellID->304219246] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[87169, 2335, 159, 7, 70, "Subsection",ExpressionUUID->"edcc2e2a-d1d7-495a-b07a-f3f577a81b35", CellID->625340094], Cell[87331, 2344, 242, 5, 70, "Text",ExpressionUUID->"8c9cf67d-5094-4e84-8060-73c3a08fa5d2", CellID->435928457], Cell[87576, 2351, 1297, 37, 70, "Input",ExpressionUUID->"366aaf2b-d62e-49a4-b686-59dd92b88da5", CellID->1737348337], Cell[88876, 2390, 886, 22, 70, "Input",ExpressionUUID->"1f65efa2-c6c6-45a8-b216-1f7a1c9bf664", CellID->1582856882], Cell[89765, 2414, 351, 9, 70, "Text",ExpressionUUID->"2d253df9-8674-49ad-a254-2da203c9d86d", CellID->695856405], Cell[CellGroupData[{ Cell[90141, 2427, 7229, 182, 70, "Input",ExpressionUUID->"6a1fb36a-a07d-4d0d-b346-7c0af1d0ff1a", CellID->335610403], Cell[97373, 2611, 6107, 169, 70, "Output",ExpressionUUID->"ac581229-c498-45f8-a9d7-b70ba5d5cd7b", CellID->493729250] }, Open ]], Cell[103495, 2783, 238, 6, 70, "Text",ExpressionUUID->"88f30f94-e762-4bc4-a6ba-59e32c6e1979", CellID->205108667], Cell[CellGroupData[{ Cell[103758, 2793, 8166, 208, 70, "Input",ExpressionUUID->"f5f8c169-513b-4208-9ecb-d5bfc3627c96", CellID->795263724], Cell[111927, 3003, 6183, 167, 70, "Output",ExpressionUUID->"d94c06b6-1f20-4bfc-8d89-cdc6502a7959", CellID->987527422] }, Open ]], Cell[CellGroupData[{ Cell[118147, 3175, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"4eb359e6-8e67-4373-abb6-fb48c7f4e06d", CellID->278351700], Cell[118294, 3181, 177, 3, 70, "Text",ExpressionUUID->"88edb6f9-40ff-454d-b1cd-7257d720d0d9", CellID->611898442], Cell[118474, 3186, 885, 24, 70, "Input",ExpressionUUID->"7443c6f4-e36f-4f1e-bfb3-a6d08d9a8dec", CellID->91964261], Cell[119362, 3212, 306, 7, 70, "Text",ExpressionUUID->"bca7d2c4-7641-4f0b-9808-10b330f01ec6", CellID->160285205], Cell[CellGroupData[{ Cell[119693, 3223, 7401, 184, 70, "Input",ExpressionUUID->"9e20adce-854f-43d3-b35d-5cef9022608c", CellID->251581869], Cell[127097, 3409, 5917, 148, 70, "Output",ExpressionUUID->"ccaa4f28-27dd-427e-8dea-285720b45df2", CellID->80065118] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[133063, 3563, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"a5726779-599b-4b91-b4b8-e3e13b82aace", CellID->1037638734], Cell[133211, 3569, 168, 3, 70, "Text",ExpressionUUID->"74ffb588-b938-494a-9dad-ae9e091a62de", CellID->112853907], Cell[133382, 3574, 596, 18, 70, "Input",ExpressionUUID->"fadcc358-68e6-41bf-9b72-22f3972233f5", CellID->796645345], Cell[133981, 3594, 174, 3, 70, "Text",ExpressionUUID->"cae0857d-fa4b-40ac-ac02-f42be3c89bc8", CellID->390575210], Cell[CellGroupData[{ Cell[134180, 3601, 7339, 183, 70, "Input",ExpressionUUID->"b4b3b70b-2c29-4234-8266-b1e218d441b7", CellID->21058234], Cell[141522, 3786, 19101, 356, 70, "Output",ExpressionUUID->"53db118d-e628-4edf-95de-2273e0853173", CellID->495551100] }, Open ]], Cell[160638, 4145, 1166, 35, 70, "Text",ExpressionUUID->"dc4b3b7d-b8bb-4355-a46e-5db9cb0b7c6b", CellID->328442046], Cell[CellGroupData[{ Cell[161829, 4184, 7420, 185, 70, "Input",ExpressionUUID->"93106206-19ab-406d-b256-c6e4022b4bfd", CellID->149016170], Cell[169252, 4371, 17013, 327, 70, "Output",ExpressionUUID->"6b2c82e9-a2ea-4d57-920d-e2ffa81666ba", CellID->180765572] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[186314, 4704, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"d1f8340a-5a48-4fca-a404-1235f61be28f", CellID->1589919601], Cell[186462, 4710, 197, 4, 70, "Text",ExpressionUUID->"43214551-c4f6-4fe6-a7fe-5e2515f16728", CellID->308564616], Cell[186662, 4716, 1297, 37, 70, "Input",ExpressionUUID->"a0e0c299-8291-4b82-8a78-de9d1d3eb340", CellID->1376548620], Cell[187962, 4755, 885, 22, 70, "Input",ExpressionUUID->"1b2e5c73-cf5f-4bed-8943-f516a38fc41d", CellID->811327209], Cell[CellGroupData[{ Cell[188872, 4781, 7534, 186, 70, "Input",ExpressionUUID->"6e943dea-2bd5-412b-b526-eb483019c2fe", CellID->877171405], Cell[196409, 4969, 5743, 159, 70, "Output",ExpressionUUID->"7ac0b645-c058-4258-a93b-1f8da4a62ec5", CellID->737590666] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[202213, 5135, 161, 7, 70, "Subsection",ExpressionUUID->"367dd9ba-9610-4658-b20d-76ac5fc272b3", CellID->340511252], Cell[CellGroupData[{ Cell[202399, 5146, 282, 9, 70, "Subsubsection",ExpressionUUID->"183bcc12-f8e9-4126-bcd4-e44958ccb469", CellID->758371717], Cell[202684, 5157, 355, 10, 70, "Text",ExpressionUUID->"1220001e-683e-4534-bc3d-05c0256fed80", CellID->641493799], Cell[203042, 5169, 1296, 37, 70, "Input",ExpressionUUID->"f3d3b8f6-c9ea-4b66-be82-1efae78a874b", CellID->946898365], Cell[204341, 5208, 886, 22, 70, "Input",ExpressionUUID->"fe1c68c8-0e0a-4cc1-a2cd-61c784c93881", CellID->1666996285], Cell[CellGroupData[{ Cell[205252, 5234, 7278, 183, 70, "Input",ExpressionUUID->"76c7b49b-4391-4d88-b2ab-5fcc0d607db9", CellID->335610404], Cell[212533, 5419, 6032, 168, 70, "Output",ExpressionUUID->"9731b80d-c00b-46eb-ad1e-e03d48efbfce", CellID->493729251] }, Open ]], Cell[CellGroupData[{ Cell[218602, 5592, 7277, 183, 70, "Input",ExpressionUUID->"bbddf978-8390-4bff-9497-2b9ed64c9981", CellID->806656409], Cell[225882, 5777, 5250, 144, 70, "Output",ExpressionUUID->"d971af3a-29ac-496a-99b8-565a73fcb95c", CellID->890113321] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[231181, 5927, 265, 9, 70, "Subsubsection",ExpressionUUID->"7f3c733d-4ab4-4b5f-9315-1a0373be2b7d", CellID->180319729], Cell[231449, 5938, 251, 6, 70, "Text",ExpressionUUID->"968792af-25df-4a80-9722-00057aad9247", CellID->302670623], Cell[231703, 5946, 1295, 37, 70, "Input",ExpressionUUID->"9c642d45-1991-44e6-9ffb-7162c1610dcf", CellID->54435350], Cell[233001, 5985, 884, 22, 70, "Input",ExpressionUUID->"cc241729-83b1-4d16-9d54-06731360e658", CellID->66893828], Cell[CellGroupData[{ Cell[233910, 6011, 7208, 181, 70, "Input",ExpressionUUID->"ee0fc3ab-22ab-432a-af63-45ee6c0b9049", CellID->687652750], Cell[241121, 6194, 5707, 158, 70, "Output",ExpressionUUID->"48afc21d-d856-45ff-ba6a-a7a778409472", CellID->336896930] }, Open ]], Cell[246843, 6355, 316, 9, 70, "Text",ExpressionUUID->"d5feed39-ed2f-473a-aa4d-8f5c7cdc5dec", CellID->47752612], Cell[CellGroupData[{ Cell[247184, 6368, 7239, 183, 70, "Input",ExpressionUUID->"740667d0-8763-48f0-8f62-313fd96dc6c1", CellID->24878839], Cell[254426, 6553, 5674, 158, 70, "Output",ExpressionUUID->"72e2eb43-5917-4d27-822a-b69840bba858", CellID->708916440] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[260149, 6717, 228, 8, 70, "Subsubsection",ExpressionUUID->"09ff949e-93ef-4040-ae26-73f8404f93a5", CellID->270377623], Cell[260380, 6727, 811, 22, 70, "Text",ExpressionUUID->"98a0c0e2-5e82-4e06-afa2-9997686d360b", CellID->49820151], Cell[261194, 6751, 204, 4, 70, "Text",ExpressionUUID->"b6314f98-67e3-46b9-a559-aa73f688b228", CellID->917108318], Cell[CellGroupData[{ Cell[261423, 6759, 501, 15, 70, "Input",ExpressionUUID->"aaad2af4-6b8a-4eb8-b1c2-775caac36138", CellID->925027573], Cell[261927, 6776, 1035, 27, 70, "Output",ExpressionUUID->"48179516-a32b-4f51-9e37-bb4356f0937d", CellID->270168842] }, Open ]], Cell[262977, 6806, 151, 3, 70, "Text",ExpressionUUID->"a333f909-8d3c-4875-b2db-aac69af2a1f5", CellID->373331919], Cell[CellGroupData[{ Cell[263153, 6813, 7273, 183, 70, "Input",ExpressionUUID->"ed056b14-25cf-4681-b7ef-0cb3ef37b2db", CellID->559463743], Cell[270429, 6998, 2455, 69, 70, "Output",ExpressionUUID->"3a08c1bc-2486-424f-b809-47d9c3db34a4", CellID->100710254] }, Open ]], Cell[272899, 7070, 150, 3, 70, "Text",ExpressionUUID->"096c1e66-326c-41e5-85c2-c2a0316c8f27", CellID->125703543], Cell[CellGroupData[{ Cell[273074, 7077, 7221, 182, 70, "Input",ExpressionUUID->"87f25c60-d4b0-4ac6-bff0-6babf2b067bc", CellID->920991140], Cell[280298, 7261, 5052, 135, 70, "Output",ExpressionUUID->"b28e54bb-31f3-44dd-b64b-838bb689fdee", CellID->539704748] }, Open ]], Cell[285365, 7399, 160, 3, 70, "Text",ExpressionUUID->"31d64eb2-e083-475e-a883-35aac7d084f5", CellID->414916467], Cell[CellGroupData[{ Cell[285550, 7406, 7572, 189, 70, "Input",ExpressionUUID->"9cba3128-87fc-47f9-8c69-dc3b3ce773ef", CellID->238615592], Cell[293125, 7597, 4974, 134, 70, "Output",ExpressionUUID->"df0b8ab7-e0f3-4ef5-859d-8ae126574631", CellID->18843707] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[298160, 7738, 166, 7, 70, "Subsection",ExpressionUUID->"4b733b6b-aa6d-4270-a795-b34abd2c78b7", CellID->702122688], Cell[CellGroupData[{ Cell[298351, 7749, 297, 9, 70, "Subsubsection",ExpressionUUID->"5ec3d33a-eb66-413f-b989-36fe4a0ce4a1", CellID->45921486], Cell[298651, 7760, 215, 8, 70, "Text",ExpressionUUID->"ebb7981b-0aa0-4641-8144-9872ba2b37f2", CellID->67809342], Cell[CellGroupData[{ Cell[298891, 7772, 7801, 194, 70, "Input",ExpressionUUID->"9a91815e-197e-449c-8d6a-e1dd5c2e290c", CellID->93508378], Cell[306695, 7968, 4461, 125, 70, "Output",ExpressionUUID->"6c5fcb76-5afa-414c-aa70-da70d5455637", CellID->347864215] }, Open ]], Cell[CellGroupData[{ Cell[311193, 8098, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"f65130a6-6347-4584-a51b-940a83f1bea1", CellID->985263640], Cell[311340, 8104, 158, 3, 70, "Text",ExpressionUUID->"db07348c-e0c2-4d98-9164-9087fbb2515a", CellID->873469996], Cell[CellGroupData[{ Cell[311523, 8111, 7803, 194, 70, "Input",ExpressionUUID->"61a9acee-b7be-4c3c-b1dc-66c90a32aaae", CellID->40919298], Cell[319329, 8307, 24024, 687, 70, "Output",ExpressionUUID->"a13b7a41-99dc-48f3-a599-06131077a44a", CellID->574172166] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[343414, 9001, 288, 9, 70, "Subsubsection",ExpressionUUID->"7f795d43-f37b-4d1e-8570-15e97dff2c07", CellID->341410619], Cell[343705, 9012, 298, 7, 70, "Text",ExpressionUUID->"54aa65bc-b068-4e8e-be31-372dbe020362", CellID->392050837], Cell[CellGroupData[{ Cell[344028, 9023, 10179, 238, 70, "Input",ExpressionUUID->"d6770b3c-57ec-4c14-8a10-a05bab119a9d", CellID->79235257], Cell[354210, 9263, 70459, 1161, 70, "Output",ExpressionUUID->"0719f575-d626-4ddd-a9eb-68307becc6dd", CellID->920817626] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[424730, 10431, 168, 7, 70, "Subsection",ExpressionUUID->"1c8fa593-20ea-4268-a35a-e2acddf91c1d", CellID->75384828], Cell[424901, 10440, 447, 10, 70, "Text",ExpressionUUID->"0486be10-0936-4127-8da7-10b684125731", CellID->265667155], Cell[CellGroupData[{ Cell[425373, 10454, 1859, 49, 70, "Input",ExpressionUUID->"622358dd-d2ca-4f99-b1cb-6030d2f56543", CellID->353891407], Cell[427235, 10505, 11856, 201, 70, "Output",ExpressionUUID->"d1eabae8-d781-444d-9aff-fe19c04e4e52", CellID->136793921] }, Open ]], Cell[439106, 10709, 368, 10, 70, "Text",ExpressionUUID->"05256c18-6868-4f69-a2f4-dde5c3b18604", CellID->107345656], Cell[CellGroupData[{ Cell[439499, 10723, 7265, 182, 70, "Input",ExpressionUUID->"c5d74f73-755e-40e5-9cb1-6bbec2b3991b", CellID->925484154], Cell[446767, 10907, 734, 15, 70, "Message",ExpressionUUID->"07c12bda-dd72-4906-8078-ca50eb9e5b8b", CellID->404035234], Cell[447504, 10924, 499, 9, 70, "Output",ExpressionUUID->"deef4c3b-bee1-415e-a8dc-a68169648365", CellID->191466448] }, Open ]], Cell[448018, 10936, 742, 21, 70, "Text",ExpressionUUID->"382ce59b-06da-4695-aab8-a0bcfa984d95", CellID->440129954], Cell[CellGroupData[{ Cell[448785, 10961, 7342, 186, 70, "Input",ExpressionUUID->"088687a5-a5c5-4f53-992c-5d3a3319b844", CellID->811054035], Cell[456130, 11149, 3794, 114, 70, "Output",ExpressionUUID->"d00ab2ab-67cc-4a8f-bdea-e25a6e3a5131", CellID->728943376] }, Open ]], Cell[459939, 11266, 713, 21, 70, "Text",ExpressionUUID->"d3b368bd-389e-4b0e-8c10-3b6d5e444134", CellID->204696650], Cell[CellGroupData[{ Cell[460677, 11291, 7475, 190, 70, "Input",ExpressionUUID->"821d5a58-9e24-453f-8099-449199b2f8af", CellID->364427252], Cell[468155, 11483, 3937, 116, 70, "Output",ExpressionUUID->"5e6c8134-ebda-428a-b6cf-1b5685cb0045", CellID->853979576] }, Open ]], Cell[472107, 11602, 765, 22, 70, "Text",ExpressionUUID->"b567f0a1-477b-44e3-99cc-c6ae5cdf9e6b", CellID->299818243], Cell[CellGroupData[{ Cell[472897, 11628, 7759, 197, 70, "Input",ExpressionUUID->"542d9c1b-dcb6-430d-8468-56843a3ddc97", CellID->888307346], Cell[480659, 11827, 2734, 68, 70, "Output",ExpressionUUID->"bc90953a-ffaa-4422-932c-cd7dfd8108d5", CellID->400166393] }, Open ]], Cell[483408, 11898, 1152, 33, 70, "Text",ExpressionUUID->"0bffaaf4-a7d3-4d61-a946-2bcb31ceac1a", CellID->22697313], Cell[CellGroupData[{ Cell[484585, 11935, 7401, 188, 70, "Input",ExpressionUUID->"68f3bb6f-751e-4a20-bc5f-d2b3f9dc7073", CellID->134733408], Cell[491989, 12125, 534, 12, 70, "Message",ExpressionUUID->"49e936dc-6a9c-4621-a504-23040abb8b83", CellID->797165376], Cell[492526, 12139, 1292, 36, 70, "Output",ExpressionUUID->"e1d9a7fe-fd0a-4cb4-a366-02a26ab9fbb3", CellID->466873286] }, Open ]], Cell[493833, 12178, 139, 3, 70, "Text",ExpressionUUID->"103e2ab3-b266-4f32-8456-8c3142804a3b", CellID->134114185], Cell[CellGroupData[{ Cell[493997, 12185, 7456, 189, 70, "Input",ExpressionUUID->"368c10c5-f084-4f6b-b64b-8ffe29a05f0a", CellID->122238306], Cell[501456, 12376, 1261, 37, 70, "Output",ExpressionUUID->"37affbee-8bfd-4997-b9f3-0996f3801319", CellID->103180214] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[502766, 12419, 167, 7, 70, "Subsection",ExpressionUUID->"b8493651-dbcb-49da-b0ab-f0716fe5bb50", CellID->356368899], Cell[502936, 12428, 255, 8, 70, "Text",ExpressionUUID->"e8b3dbf7-6426-4119-b46b-d9b60dd82482", CellID->152513339], Cell[503194, 12438, 322, 10, 70, "Input",ExpressionUUID->"e97febb1-3228-474e-9521-b3f00434d7d3", CellID->153552773], Cell[CellGroupData[{ Cell[503541, 12452, 8714, 207, 70, "Input",ExpressionUUID->"becd5549-75b0-46c0-9f71-eb73c01e6fb7", CellID->532913149], Cell[512258, 12661, 17305, 447, 70, "Output",ExpressionUUID->"df4b9c3b-75ce-4db9-907b-1ac956a878f8", CellID->577487918] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)