Notebook[{Cell[ CellGroupData[{Cell[ "\","Subsection"],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.6821849447840075*^9,3.682184951647694*^9},{3.6821850182913575*^9,3.6821850462121496*^9},{3.6821850885233803*^9,3.68218509051958*^9}}, ExpressionUUID->"43e335d5-fcb8-431b-af20-9be9a36451dd"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"ResourceObject","[","\"Sample Data: Swiss Fertility\"","]"}]],"Input",CellChangeTimes->{{3.6804517731799183*^9,3.6804517885604563*^9},{3.6804527318597765*^9,3.6804527390684977*^9},{3.700494351442691*^9,3.700494353752645*^9}}, ExpressionUUID->"fb4717e1-9090-4ac9-b19e-bc820995f5ec"],Cell[ BoxData[InterpretationBox[ RowBox[{TagBox["ResourceObject","SummaryHead"],"[",DynamicModuleBox[{Set[Typeset`open$$, False]},PanelBox[PaneSelectorBox[{False->GridBox[{{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps","SquarePlusIconMedium"],ImageSizeCache->{12.,{0.,12.}}],Appearance->None, RuleDelayed[ButtonFunction,Set[Typeset`open$$,True]],Evaluator->Automatic,Method->"Preemptive"], Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[3.5,CurrentValue["FontCapHeight"], Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[{{{{Thickness[0.011111111111111112],{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}},{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}},{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ TemplateBox[{"\"Sample Data: Swiss Fertility\"","\" \"",TagBox[ButtonBox[PaneSelectorBox[ {False->"\"\[RightGuillemet]\"",True->StyleBox["\"\[RightGuillemet]\"",{"HyperlinkActive"}]}, Dynamic[CurrentValue["MouseOver"]],BaseStyle->{"Hyperlink"},FrameMargins->0,ImageSize->Automatic], BaseStyle->"Hyperlink",ButtonData->{URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"],None}, ButtonNote->"https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], Function[Annotation[Slot[1],URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], "Hyperlink"]]]},"RowDefault"],"SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Swiss fertility and socioeconomic indicators (1888)\"","SummaryItem"]}]}},AutoDelete->False, BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}],True->GridBox[ {{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource["FEBitmaps","SquareMinusIconMedium"]], Appearance->None,RuleDelayed[ButtonFunction,Set[Typeset`open$$,False]],Evaluator->Automatic, Method->"Preemptive"],Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[ 3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[ {{{{Thickness[0.011111111111111112],{{{FaceForm[{RGBColor[0.648987,0.648987,0.648987],Opacity[ 1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}},{{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}},{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}},{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ TemplateBox[{"\"Sample Data: Swiss Fertility\"","\" \"",TagBox[ButtonBox[PaneSelectorBox[ {False->"\"\[RightGuillemet]\"",True->StyleBox["\"\[RightGuillemet]\"",{"HyperlinkActive"}]}, Dynamic[CurrentValue["MouseOver"]],BaseStyle->{"Hyperlink"},FrameMargins->0,ImageSize->Automatic], BaseStyle->"Hyperlink",ButtonData->{URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"],None}, ButtonNote->"https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], Function[Annotation[Slot[1],URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], "Hyperlink"]]]},"RowDefault"],"SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Swiss fertility and socioeconomic indicators (1888)\"","SummaryItem"]}]},{RowBox[ {TagBox["\"Categories: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ TemplateBox[{",","\",\"","\"Statistics\""},"RowWithSeparators"],Short],"SummaryItem"]}]},{RowBox[ {TagBox["\"ContentTypes: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ TagBox[TemplateBox[{",","\",\"","\"Numerical Data\""},"RowWithSeparators"],Short], "SummaryItem"]}]},{RowBox[{TagBox["\"Keywords: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ TagBox[TemplateBox[{",","\",\"","\"Switzerland\"","\"fertility\"","\"Medicine\"","\"statistics\"","\"ExampleData\""}, "RowWithSeparators"],Short],"SummaryItem"]}]},{RowBox[{TagBox["\"Documentation: \"", "SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ButtonBox[PaneSelectorBox[ {False->"\"https://datarepository.wolframcloud.com/resources/Swiss-Fertility\"",True->StyleBox[ "\"https://datarepository.wolframcloud.com/resources/Swiss-Fertility\"","HyperlinkActive"]}, Dynamic[CurrentValue["MouseOver"]],BaseStyle->{"Hyperlink"},FrameMargins->0,ImageSize->Automatic], BaseStyle->"Hyperlink",ButtonData->{URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"],None}, ButtonNote->"https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], Function[Annotation[Slot[1],URL["https://datarepository.wolframcloud.com/resources/Swiss-Fertility"], "Hyperlink"]]],"SummaryItem"]}]},{RowBox[{TagBox["\"Data Location: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ DynamicModuleBox[{Set[ResourceSystemClient`Private`typesetstorage$$,ResourceSystemClient`Private`typesetstorageLocation],ResourceSystemClient`Private`info$$}, DynamicBox[ToBoxes[CompoundExpression[Set[ResourceSystemClient`Private`info$$,ResourceSystemClient`Private`resourceInfo[ "84107fba-0f56-49b1-b808-606aa9b45030"]],If[AssociationQ[ResourceSystemClient`Private`info$$], ResourceSystemClient`Private`typesetstorage$$[Lookup[ResourceSystemClient`Private`info$$, "ContentElementLocations",None]],Missing["NotAvailable"]]],StandardForm]],RuleDelayed[ DynamicModuleValues,{}]],"SummaryItem"]}]},{RowBox[{TagBox["\"UUID: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"84107fba-0f56-49b1-b808-606aa9b45030\"","SummaryItem"]}]},{RowBox[{TagBox["\"Version: \"", "SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox["\"1.0.0\"","SummaryItem"]}]},{RowBox[ {TagBox["\"Size: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[RowBox[{"\\[LeftAssociation]",RowBox[ {"\"Content\"","\[Rule]","69096"}],"\\[RightAssociation]"}],"SummaryItem"]}]},{RowBox[ {TagBox["\"Elements: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ TemplateBox[{",","\",\"","\"Content\"","\"RawData\""},"RowWithSeparators"],Function[ Short[Slot[1],2]]],"SummaryItem"]}]}},AutoDelete->False,BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}]}, Dynamic[Typeset`open$$],ImageSize->Automatic],BaselinePosition->Baseline],RuleDelayed[ DynamicModuleValues,{}]],"]"}],ResourceObject[Association["Name"->"Sample Data: Swiss Fertility", "UUID"->"84107fba-0f56-49b1-b808-606aa9b45030","ResourceType"->"DataResource","Version"->"1.0.0", "Description"->"Swiss fertility and socioeconomic indicators (1888)","ContentSize"->Association[ "Content"->69096],"ContentElements"->{"Content","RawData"}]],Editable->False,SelectWithContents->True, Selectable->False]],"Output",CellChangeTimes->{3.684673228024056*^9,3.700494358902174*^9}, ExpressionUUID->"df38abb8-af77-4fa1-abc8-016c27c9fbce"]},Open]]},Open]],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.682184974529982*^9,3.6821849772962584*^9},{3.6821850234008684*^9,3.6821850240499334*^9},{3.6821850586563935*^9,3.6821850629428225*^9}}, ExpressionUUID->"33fa2ee3-f64b-4dfe-864c-750f40e4cddc"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"ResourceData","[","\"Sample Data: Swiss Fertility\"","]"}]],"Input",CellChangeTimes->{{3.6804518239459944*^9,3.680451854651065*^9},3.700494361300351*^9}, ExpressionUUID->"af64304a-af60-4a92-9560-0caf6bc5919a"],Cell[ BoxData[TemplateBox[ {TagBox[StyleBox[TagBox[GridBox[{{ItemBox[TagBox[TooltipBox[PaneBox[StyleBox["\"Fertility\"", FontColor->GrayLevel[0.4]],ImageSize->{{20,Full},15}],TemplateBox[{TemplateBox[{StyleBox[ "\"All\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox[ "\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628], StripOnInput->False],StyleBox["\"Fertility\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}], LabelStyle->"TextStyling"],Function[Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[ 0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False],ItemBox[ TagBox[TooltipBox[PaneBox[StyleBox["\"Agriculture\"",FontColor->GrayLevel[0.4]],ImageSize->{{20,Full},15}], TemplateBox[{TemplateBox[{StyleBox["\"All\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Agriculture\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}],LabelStyle->"TextStyling"],Function[ Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[0.6]]}],Row[{Style[" \\:203a ", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style["Agriculture", GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False],ItemBox[ TagBox[TooltipBox[PaneBox[StyleBox["\"Examination\"",FontColor->GrayLevel[0.4]],ImageSize->{{20,Full},15}], TemplateBox[{TemplateBox[{StyleBox["\"All\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}],LabelStyle->"TextStyling"],Function[ Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[0.6]]}],Row[{Style[" \\:203a ", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style["Examination", GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False],ItemBox[ TagBox[TooltipBox[PaneBox[StyleBox["\"Education\"",FontColor->GrayLevel[0.4]],ImageSize->{{20,Full},15}], TemplateBox[{TemplateBox[{StyleBox["\"All\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}],LabelStyle->"TextStyling"],Function[ Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[0.6]]}],Row[{Style[" \\:203a ", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style["Education", GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False],ItemBox[ TagBox[TooltipBox[PaneBox[StyleBox["\"Catholic\"",FontColor->GrayLevel[0.4]],ImageSize->{{20,Full},15}], TemplateBox[{TemplateBox[{StyleBox["\"All\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}], LabelStyle->"TextStyling"],Function[Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[ 0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False],ItemBox[ TagBox[TooltipBox[PaneBox[StyleBox["\"InfantMortality\"",FontColor->GrayLevel[0.4]], ImageSize->{{20,Full},15}],TemplateBox[{TemplateBox[{StyleBox["\"All\"",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}], LabelStyle->"TextStyling"],Function[Annotation[Slot[1],Row[{Row[{Style["All",GrayLevel[ 0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Background->GrayLevel[0.95],Alignment->{Left,Baseline},StripOnInput->False]},{PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"80.2`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["1", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Fertility\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[1,Key["Fertility"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"17","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["1", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Agriculture\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Agriculture",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[1,Key["Agriculture"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"15","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["1",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Examination",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[1,Key["Examination"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"12","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["1",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Education",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[1,Key["Education"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"9.96`","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["1",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[1,Key["Catholic"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox["22.2",TemplateBox[{TemplateBox[{StyleBox["1",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["1"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[1,Key["InfantMortality"]]], "Mouse"]]],ImageSize->{{60,Full},Automatic},Alignment->{Left,Baseline}]},{PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"83.1`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["2", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Fertility\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[2,Key["Fertility"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"45.1`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["2", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Agriculture\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Agriculture",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[2,Key["Agriculture"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"6","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["2",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Examination",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[2,Key["Examination"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"9","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["2",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Education",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[2,Key["Education"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"84.84`","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["2",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[2,Key["Catholic"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox["22.2",TemplateBox[{TemplateBox[{StyleBox["2",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["2"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[2,Key["InfantMortality"]]], "Mouse"]]],ImageSize->{{60,Full},Automatic},Alignment->{Left,Baseline}]},{PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"92.5`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["3", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Fertility\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[3,Key["Fertility"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"39.7`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["3", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Agriculture\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Agriculture",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[3,Key["Agriculture"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"5","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["3",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Examination",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[3,Key["Examination"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"5","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["3",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Education",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[3,Key["Education"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"93.4`","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["3",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[3,Key["Catholic"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox["20.2",TemplateBox[{TemplateBox[{StyleBox["3",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["3"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[3,Key["InfantMortality"]]], "Mouse"]]],ImageSize->{{60,Full},Automatic},Alignment->{Left,Baseline}]},{PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"85.8`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["4", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Fertility\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[4,Key["Fertility"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"36.5`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["4", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Agriculture\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Agriculture",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[4,Key["Agriculture"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"12","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["4",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Examination",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[4,Key["Examination"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"7","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["4",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Education",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[4,Key["Education"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"33.77`","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["4",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[4,Key["Catholic"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox["20.3",TemplateBox[{TemplateBox[{StyleBox["4",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["4"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[4,Key["InfantMortality"]]], "Mouse"]]],ImageSize->{{60,Full},Automatic},Alignment->{Left,Baseline}]},{PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"76.9`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["5", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Fertility\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Fertility",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[5,Key["Fertility"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox[StyleBox[TemplateBox[{"43.5`","\"%\"","percent","\"Percent\""}, "QuantityPostfix",SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[ 27,Power[74,-1]],Times[117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["5", GrayLevel[0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"", RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"Agriculture\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Agriculture",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[5,Key["Agriculture"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"17","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["5",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Examination\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Examination",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[5,Key["Examination"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"15","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["5",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Education\"",GrayLevel[0.6], StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[ 1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[RowBox[{"Row","[",RowBox[ {RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[ {"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[{"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]], BaseStyle->{FontFamily->"Verdana",FontSize->9.}]],Function[Annotation[Slot[1],Row[ {Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[" \\:203a ",RGBColor[0.6509803921568628, 0.6509803921568628,0.6509803921568628]],Style["Education",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[5,Key["Education"]]],"Mouse"]]], ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[TagBox[TagBox[ TooltipBox[StyleBox[TemplateBox[{"5.16`","\"%\"","percent","\"Percent\""},"QuantityPostfix", SyntaxForm->Mod],FontColor->RGBColor[{Times[33,Power[74,-1]],Times[27,Power[74,-1]],Times[ 117,Power[370,-1]]}]],TemplateBox[{TemplateBox[{StyleBox["5",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[0.6509803921568628,0.6509803921568628, 0.6509803921568628],StripOnInput->False],StyleBox["\"Catholic\"",GrayLevel[0.6],StripOnInput->False]}, "RowDefault"]},"Row",DisplayFunction->Function[RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]], InterpretationFunction->Function[RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[ 1,","],"}"}],",",RowBox[{"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "Catholic",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}],"Tooltip"]]], Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[TypeSystem`NestedGrid`PackagePrivate`$outputID][ Slice[5,Key["Catholic"]]],"Mouse"]]],ImageSize->{{75,Full},Automatic},Alignment->{Left,Baseline}],PaneBox[ TagBox[TagBox[TooltipBox["20.6",TemplateBox[{TemplateBox[{StyleBox["5",GrayLevel[ 0.6],StripOnInput->False]},"RowDefault"],TemplateBox[{StyleBox["\" \\:203a \"",RGBColor[ 0.6509803921568628,0.6509803921568628,0.6509803921568628],StripOnInput->False],StyleBox[ "\"InfantMortality\"",GrayLevel[0.6],StripOnInput->False]},"RowDefault"]},"Row",DisplayFunction->Function[ RowBox[{TemplateSlotSequence[1,"\[InvisibleSpace]"]}]],InterpretationFunction->Function[ RowBox[{"Row","[",RowBox[{RowBox[{"{",TemplateSlotSequence[1,","],"}"}],",",RowBox[ {"BaseStyle","\[Rule]",RowBox[{"{",RowBox[{RowBox[{"FontFamily","\[Rule]","\"Verdana\""}],",",RowBox[ {"FontSize","\[Rule]","9.`"}]}],"}"}]}]}],"]"}]],BaseStyle->{FontFamily->"Verdana",FontSize->9.}]], Function[Annotation[Slot[1],Row[{Row[{Style[RawBoxes["5"],GrayLevel[0.6]]}],Row[{Style[ " \\:203a ",RGBColor[0.6509803921568628,0.6509803921568628,0.6509803921568628]],Style[ "InfantMortality",GrayLevel[0.6]]}]},BaseStyle->{FontFamily->"Verdana",FontSize->9.}], "Tooltip"]]],Function[Annotation[Slot[1],TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[ TypeSystem`NestedGrid`PackagePrivate`$outputID][Slice[5,Key["InfantMortality"]]], "Mouse"]]],ImageSize->{{60,Full},Automatic},Alignment->{Left,Baseline}]},{ItemBox[ TagBox[TooltipBox["\"47 total \\:203a \"","\"\"",LabelStyle->"TextStyling"],Function[ Annotation[Slot[1],"","Tooltip"]]],BaseStyle->{{RGBColor[0.5098039215686274,0.5098039215686274, 0.5098039215686274],8}},Alignment->{Center,Baseline},Background->GrayLevel[0.98], StripOnInput->False],"\[SpanFromLeft]","\[SpanFromLeft]","\[SpanFromLeft]","\[SpanFromLeft]","\[SpanFromLeft]"}}, GridBoxAlignment->{"Columns"->{{Left}}},AutoDelete->False,GridBoxDividers->{"Columns"->{{True}},"Rows"->{{True}}}, GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}},RowMinHeight->1.5, FrameStyle->GrayLevel[0.85],BaseStyle->{FontFamily->"Verdana",FontSize->12}],"Grid"], LineBreakWithin->False,ContextMenu->{},StripOnInput->False],Deploy,DefaultBaseStyle->"Deploy"]}, "CopyTag",DisplayFunction->Function[Slot[1]],InterpretationFunction->Function["Dataset[<>]"]]], "Output",CellChangeTimes->{3.684673228178471*^9},ExpressionUUID->"9f3375c6-a116-40ec-8a25-07dfa0e85725"]}, Open]]},Open]]},Open]],Cell[ CellGroupData[{Cell[ "\","Subsection"],Cell[ CellGroupData[ {Cell[ "\", "Text",CellChangeTimes->{{3.68364676767498*^9,3.683646788529792*^9},{3.683646941387363*^9,3.683646945818097*^9},{3.683647528437346*^9,3.683647605260786*^9},{3.683647667869519*^9,3.683647679156268*^9},{3.68364773303612*^9,3.683647738395856*^9},{3.6836481005270433*^9,3.6836481113832006*^9},{3.683648153263956*^9,3.683648160878201*^9},3.68364820880718*^9,{3.683648332587047*^9,3.683648335778111*^9},{3.68467324175497*^9,3.684673242386087*^9}}, ExpressionUUID->"9f3e51ef-ad8d-496d-9e38-914ba5157b72"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"ListPlot","[",RowBox[{RowBox[{"{",RowBox[{"Values","@",RowBox[{"Normal","[",RowBox[ {RowBox[{"ResourceData","[","\"Sample Data: Swiss Fertility\"","]"}],"[",RowBox[{"All",",",RowBox[ {"{",RowBox[{"\"Fertility\"",",","\"InfantMortality\""}],"}"}]}],"]"}],"]"}]}],"}"}],",",RowBox[ {"PlotRange","\[Rule]","All"}],",",RowBox[{"PlotMarkers","\[Rule]",RowBox[{"{",RowBox[ {"Automatic",",","8"}],"}"}]}],",",RowBox[{"AxesLabel","\[Rule]",RowBox[{"{",RowBox[ {"\"Fertility measure (%)\"",",","\"Infant mortality rate (%)\""}],"}"}]}]}],"]"}]], "Input",CellChangeTimes->{{3.683646318451885*^9,3.683646755357163*^9},{3.6836468475885468*^9,3.683646850433898*^9},{3.683647117616667*^9,3.68364713189122*^9},{3.683647593255432*^9,3.683647594270936*^9},{3.683647683103177*^9,3.683647704056172*^9},{3.683647969670335*^9,3.68364800796896*^9},{3.6836480833823433*^9,3.683648084356613*^9},{3.683648211116571*^9,3.6836482488292713*^9},{3.6836482906095047*^9,3.68364829275135*^9},{3.684673270818695*^9,3.684673512872596*^9},{3.684673617964159*^9,3.684673634514698*^9},3.700494364634141*^9}, ExpressionUUID->"03731e8c-57c1-4175-adf5-9c9616809e01"],Cell[ BoxData[GraphicsBox[ {{},{{{{{{{RGBColor[0.368417,0.506779,0.709798],AbsolutePointSize[6],AbsoluteThickness[ 1.6],GeometricTransformationBox[InsetBox[StyleBox["\"\[FilledCircle]\"",StripOnInput->False, FontSize->8],{0.,0.}],CompressedData["\n1:eJxdkj1Ow0AQhQ1IqdJRuQsFVCgYr2MHqqUgTUxkrx1ZdAiJVEgUXIADcIFQ\ncQcqLkAVKip3VFR0uQDOzreLlJFWT293ft48++D2wdztBUFw0p2d7ux253PV\nRb/WykaqF5v4+OfBJgYNPBF8nGtblyf6ZdnFWSW4TKS+5/i55K9reCYYNpL3\nM+a+ljnBSPh7Le+LMXrm8v4E7xXwiPyCvgo9pcx9S4W3M3gsuM+7GskevyXz\n2aed+n3tvKMpOg+FTwqfb+HG8VhQF+hP8SlnfgTm9Bvir/H72/xnI7jKuDdb\n/Wf0jdB3hZ/ov3b+8P2+DfsMBauS/gpe0Y/+ryX68bOtvB9uP6k/Few3Xo9N\n++L7hzF7lv5/sXjv9MGPDfrJD52fGToq77fkuXoFXnh/ZP8JemPqL5mv9B/8\nZQRn\n "]]}}}}}},{}},{},{},{{},{}}}, AspectRatio->NCache[Power[GoldenRatio,-1],0.6180339887498948],Axes->{True,True},AxesLabel->{FormBox[ "\"Fertility measure (%)\"",TraditionalForm],FormBox["\"Infant mortality rate (%)\"", TraditionalForm]},AxesOrigin->{34.10156249999999,0},DisplayFunction->Identity,Frame->{{False,False},{False,False}}, FrameLabel->{{None,None},{None,None}},FrameTicks->{{Automatic,Automatic},{Automatic,Automatic}}, GridLines->{None,None},GridLinesStyle->Directive[GrayLevel[0.5,0.4]],ImagePadding->All, Method->{"CoordinatesToolOptions"->{"DisplayFunction"->Function[{Function[Part[{{Identity,Identity},{Identity,Identity}}, 1,2][Slot[1]]][Part[Slot[1],1]],Function[Part[{{Identity,Identity},{Identity,Identity}}, 2,2][Slot[1]]][Part[Slot[1],2]]}],"CopiedValueFunction"->Function[{Function[Part[ {{Identity,Identity},{Identity,Identity}},1,2][Slot[1]]][Part[Slot[1],1]],Function[ Part[{{Identity,Identity},{Identity,Identity}},2,2][Slot[1]]][Part[Slot[1],2]]}]}}, PlotRange->{{35.,92.5},{0,26.6}},PlotRangeClipping->True,PlotRangePadding->{{Scaled[ 0.02],Scaled[0.02]},{Scaled[0.02],Scaled[0.05]}},Ticks->{Automatic,Automatic},BoxID->"{\"type\":\"Image\",\"message\":\"RasterizedDueToUnsupportedContent\",\"imageData\":{\"imageSource\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAWgAAACZCAYAAAACXKDdAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAAAOxAAADsQBlSsOGwAAHN5JREFUeJzt3X90G+WZL/Dv845smRBKfIES2zl3AzSFUMqh3WyzsGXx0j2n3RJ6C/eGZgmJia15lUBDr2mB/jhdRdxlOZSwWfDF4JHs1E74kYafJWS5F3puKQW2pEAP0A2wdNm0xhAI2TSxiW1p3uf+EckosmRLtiXNyM/nnJxYo5l5H88kj0bvPPO+gBBCCE+yKh2AAMLh8MKlS5cmd+3aNbp8+fLa884774yLL774P59++mkDAK2trY2f//zn57z88stDALBu3bpTzzjjjNFXXnklUdnIhRClpLTWPNlKoVDoEtu2h7XW64ptQGu9Y2qhzdz+079jxt8liWkq+9VazzHG3PnBBx8cBoB58+btIKKWgYGBh9LrWJbVGQwGKf3aGHPinDlzfjQzUQshvEoVtJJS25j5bxsaGrqm0MZFU9imJPt3HCed5EoVU9H7ZeZvAnhw+/btbltb26cAHIrFYtcDqGttbW20bfs8Ivr3zs7O99LbdHV1vQDgjHA4vGjmQhdCeE0g/UPq6vIHzGwTUZMx5hvxePzh9FWnUuqhaDRKWuulzLyJiM4GcJCIvtvV1dWXa3ul1EPpfWckx7H2iCjEzJsA3AAgCOAmY8wV8Xj84VAotEAp1QfgC8z8L8x8ZTwe79daMzNfC+ByIlqSuf98sWX9jsja5hWl1PK77777Da31iQBebmhoOCUajSYz1023GYvF/ixXO8zcm7nf1tbWRsuyfgzgXCJ6GcAax3F+l30CiMgOBAKfS/08TES1qbeCqdc3uK6rc5y7bcysAVw3+WkWQvhR9hV0cO7cuWemkus24OOrzowEuxnAbQDqjTEXM/Nt+bbPse1RmNkyxvwVM3+Lmf9gjLki3a5SqoOZnw8Gg41EtIuI/nfGpvvq6uq+VGRsyPP73GuMWZH6+XIAD2Ym5+w287WTvV/Lsm4H0DM6OnoSEd0F4O7sHa5du/Z0AAc7OzsHASAej/cD2Gfb9k+J6BXLss5k5re6u7v3Zm+rlHoOwF/nOq5CiOpwVIJOJpMbN23adDgejz8MoCbXBjU1NecT0WJmvl8ptR3AicVsn2lkZKQvHo+/RESnHzhw4LGs7f5ydHT01o6OjoMjIyO3EFFzejvXdR/p6Og4WExs+SSTyfuY+bLUyxZjzJZc62W2WUg7RHQhEd0XDAYPM/O9AM7NXoeZT2PmdzKXOY6zprGx8VLHcdYz8/Wu696mtb5Ha73Ttu3W9Hqjo6N7mPnUyX4/IYR/HZWge3p6Dk22QSKReATAPiLqJKIvF7t9pt7e3mEADADbt28fzRfbnDlziJnHKk7ytTNRbPn09PTsIaL9WutvADgmHo+/mGe9sTYLbMdKJBKfdByHUn/mZq+Q+p1M9vJoNJoMhULnE9GbgUDgdAAHGhoalgG4Jr2O67oJIpIqHCGqWEE3CTMx89nGmF1KqVeZOVLA+ubqq68+YQrtPFNbW3tda2vrcclk8gYienay/RcaW46Y7mXmOwBsLTC2nO1kxfKLmpqa77S3tx9j23bYtu3nsvfjuu4eImrM1YZS6gbXdW8FMJeZ90ejUUNEY+errq5uPjPvKSReIYQ/FZ2giej7RPSk67ovMXPOq80sTyQSid8X247ruusBnGdZ1l4i+gsiWjvZ/ouI7aiYlFIPEtFJyWTynkJim6Cdsf2m4l8yNDS0j4i0UiqUvZ/u7u5XmblRaz0nc7lt2xcA2N3d3b13ZGTkGSK60LbtDcz8QnodZl4K4GeFxCuEEL5l2/YFWut/qUTbWutbQqHQysxlbW1ti1taWualX69Zs+akcDj8F5FIJLPq5gGt9WfLGasQorwCk69S/YjoIQBXVqLtRCKxMRAI9AEYu3rv7u7enbnO5s2bPwDwQfp1OBxeZIwZisVir5YvUiGEmIW01ku01scXun4oFDonVbMthBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYSoUoXMGiOEEF5T9FgcQgghykMStBBCeJQkaCGE8CgZLEnMWisjOxdYcK+Bonls6KdboheVdAZ6IYolV9BiVlpx06MnK8W7oNR1ANmk8NiqDTvWVzouITJJghazUk0ioAmYn7mMQJPOECREOUmCFrMUf3LcIsIJrbc8clwFghEiJ0nQYlZixbnmuHyt54avFzXxsRCl5IubhFrrcwF0MvPpAF4nIu04zq/D4fBCZn47c13HcagyUQo/2frDZdtW37jzKwBaAACMvcxYU9mohDiaLxI0gB8D+M7o6OiTwWDwytTrs1zXbSaivlgs1lLJ4IQPEXEfcOUVkSf+npRpGj5u8IXt377scKXDEiKTLxK04zinp39ub2/vHRoauhkAlFLNzPxU5SITfrc1+pW3ALxV6ThmipQOVhdfJOhMH3300RcBPJp62QzgFNu2O4noNdd1W7MnXBXCL6abXFfc9OjJKsm7ADUfAEjBXrVhxzVbNizrKE3EotR8dZOwra3tvxhj1gP4FgA4jrMwFotd0NjYeLwxJmRZVm++bWXAJFEuKyM7F6yOPPaj1dEdzqrI48sK2WYm6rKldLD6+CZBX3XVVfMty+pwXXe94zh/zHwvGo2apqam3QDOzLe93DwU5TDVRDszyVVKB6uNL7o4QqHQl5PJ5A9c113e09OzN71ca/0GEa3av3//i/39/Z+xLCtX6ZSY5crZL1uTCGiinIl2km4G/iSQdQ2RSq6Flv6x4meJ6ZtZi6V00Md8cQWtlHIAnG9Z1ntaa053VxhjWpg5Vl9f/0el1EZjTFuFQxUeU/5HunNfxa6O7vjxRN0dM1GXvfWHy7YB+Libj7GXjZQO+tms+NqvtWbp4pidVm14/IdEuPGohYwP+zZcdGIp2rvixsdWKFb35XufmXPftGOm1Tfu3Iyj67KXbYle9OuiY4g88SlSpml4rpQO+p0vrqCFmLry9suOu4od13SefmUi7otcdKUx1iIGNR8+buiUqSRn4Ejp4JbIV5+W5Ox/vuiDFv5WydrcsvfLZj4AQ8kfEdElR78/cb9ytdVli+mRK2hRUtPtA55KyVqmSvXLbo1+5S1W/JMcb8lNO1EwSdCipPKUj21aveHxJyZLuDNyg28Guw6KJTftxHRJF4cosZzlYxaALxPhyxM96Tb1krXxZqrroNDumpWRnQusDTuugaJRZtIgelPG+xDFkitoUVJ5ysfGTPwwhrcevCj0in7cegQHbM6W5CyKJQlalNRkVQ0TJVyvjdlc6NN+8si1mCmSoEVppfqAGaY9zxp5E673+nALvaL31pW/8C9J0KIstvzdstuRdSXN4P35Eu7KyM4FqzfsuAXgUWboct/gy6XQK3qvXfkL/5KbhKI8MuuDLfcLhtx9o3OGn8nVLztu2EyCzWyu2f7ty56eqIlS11sXMgvLysjOBYr58wC/CdCn860nRCEkQYtxSpnoCqmmmEr1RlnGQp5kFpaPY8D8dOUKM+4YPm7ou3KDUEyFJGhxlHIkusk/AIof2W26JXnFfCjl+5DJHQNWbv/2Zd8qJAYhsvkiQeebNFZrvZSZ7yeiJgCvM/P6WCw24ddgMbGZrD3OpZAPgIkez86fSKc+XOfMfSgVF4NMTyUm44sEjTyTxjLz94hoYzKZ7AsEAuuJ6FoAkqAnUIqr16LaTpj7MMkHQL6+3nyJ1LB6mOAuzDE4Y0E35nJ9KAG4dVXk8bfTx6eQZFrMuB+l/KYiib96+KKKw3Gc0x3Heay3t3f42GOP7QXQlHprSTAY3NLT03PIdd1uAOdUMEzPK+RBi1JVIIy1TfTFcW9ml6BlPZ5tapNfJJjLahLW4znqi6NH9quOfmy8qJK88WVxRBRMH59CH1AppiywVLXS5R//WpSSLxJ0psxJY4nopI6OjkMAcPDgwX0AGioZm9cVkhRKVXucq+0MOT8Atka/8lYikHidEoFnoNR1RPSn47Yk1I/bL/PBYkryJnrakUCRgpNpUeN+lKZWWh6SqS6+StDZk8YCSEQikczvtXknhi31pLHTHXWtPApICiUbXChH20eWv5/+AMh1DCdJ7GDG+Ct7ok8cl6wtuPtuwqcdCScAvCDX8nzJtJDxmEtXKy0PyVQT3yToPJPGvtff3z8PAOrr6+sBvJ9v+1LOqOKXr5XFJIWZHvQ9Z9uMtw/P/WihAb23+u8eu9Mi8+b4Y5gvsR9BhFyJp7hEl37a0eR82vE1Vvz/pt1GllJ9U5GHZKqLLxJ0atLYn7iue21PT8+ejLd+pZS6vL29/RhmXgmgIk+Z+eVrZSUfnc7ZNuMyazj4CaV4Fyx1FYiOydyGQJHJBlsCAGYeydjvPmZ+aSrfZLZsyHraMXV8SnLcSvRNxXuPx4vp8MU8fVrrPQD+a+Yyx3EoHA43M/MWZp5PRAMAVjiO83yO7Us6J+GqDTs6iMbdvUegLvEJL165zOScdcVWDGS3nXPOwAzuPDreOsB3YKyigw9nJ3IASBr+HCk+RbG6iwgnp5fnnQOwiBgnW+5FfopV5OeLBD1dpU7QeSYKfa0vctFnS9WmF6y46dGTa5KB32R+eyg2Ieb7cEsZO4bphMPk/olild1f/Fpf5KLPlnuCWCFKzS910J422RgN1VqXOhMPteSpHR53DMee3jsy+/WFyHmsp1fDne88Vev5E943a66ghxsuvrXU/8Fyfa2ciatMr5pK1864ZLfhq4+vvnHnZnzchfEhDH5w+PiP+ib6ap59rFdGdi6wyL1rXD10gd9k8p2nRI37k2o9f8L7qv4KesVNj56MPY/jSHVAiQbRSck1RkOpH52upGJnzF5x4yOfs4x5BqSOBVLnIvr4NX0blmUMQDRUUJ9p5rHOfirv4wALH0Uu33mqSQTmVev5E97niyqO6ahJBHT2svJWWFRvXWoxFQMrbnr05BoO/AJEx2YuT5+L6ZT15ayVLvJhlXznCTT21OpRy6vh/Anvq/oEXekEWdV1qUWUih1JojR3/D5m4lzkOsfFPayS7zwxmZ/nWl4V5094XtUn6EonyNlQl1rY1W+eB04Yu6d7LmbiHOc7T7Ph/AnvqvoEnfoP9rFy/wcr2aPT01fOx9NzJ1FOMmP1dPc9I0k033ny8PkT1W/WVHF81HDpIinc/1i5qkuOqtpgnEZEFx5pDP/J7H5tS/Rrv5yptuThDFFtqr6KI62QqZZmk6lWlxRTE5xjbkHA8P9ipX6WPV3UTJBzLDXb1abquzhEPsXfPC12UKic1RVEV83kIEziY34ZtEsUThL0LDWVG2vFDwpVvSWGXuSXQbtE4SRBz1JTu7FWXMKtdAXN7CMfiNVGEvRslWdaqYkqOopNuFKiVl7ygVh9fFPFEQqFFhDRrlgsNjatVTgcXsjMb2eul2vUulKPZud3BVd0HBmoKGPcDOxlxrLJys68Vl1RtTfSpnh+hHf5ooojFApdopS6FVn9a67rNhNRXywWa6lQaFWh4IoOIu4DMsbNKCzheqm6opSzaVfcFM+P8C5fJGgi0q7rXmxZ1r9mLldKNTPzU5WKq3oUN0ynlxJusap58Ko0P58fcTRf9EHHYrG/6e7u3p3jrWYAIdu2D2mtn29ra1ucbx+lnjTWz2ZX36XcSBP+4YsEnY/jOAtjsdgFjY2NxxtjQpZl5Z6ZGaWdNNbvZtPNvNn1YST8ztcJOi0ajZqmpqbdAM6sdCy+NIvGm5hNH0bC/3zRB52P1voNIlq1f//+F/v7+z9jWdakM0CL/GZF36XcSBM+4usEbYxpUUrF6uvrT2Pm54wxrZWOSfjDrPgwEsIP5AahEMKPqqIPWgghqpEkaCGE8ChJ0EII4VGSoIUQwqMkQQshhEdJghZCCI+SBC2EEB4lCVoIITxKErQQQniUrx/1FpOr2tlDhJgF5Aq6iq246dGTleJdUOo6gGxSeGzVhh3rKx2XEKIwkqCrWE0ioAk5Zw8RQviAb7o4ck0aq7Veysz3E1ETgNeZeX0sFnu6gmF6THFTWQkhvMUXV9CpSWN/TkRHXQ0y8/eIaGMymTwBwP1EdG2FQvQkmT1ECH/zRYJOTxqb460lwWBwS09PzyHXdbsBnFPu2LxMZg8Rwt98kaDzTRpLRCd1dHQcAoCDBw/uA9AwbuOUWTkm9CyaykqIauSbPug8EpFIhKLRaDr55k3Cs3nSWJk9RAh/8sUV9ATe6+/vnwcA9fX19QDer3A8QggxY/yeoH+llLq8vb39GGZeCUC+vgshqoavuziIKAZgy+Dg4CYiGgCwotIxCSGEKMKsvEEohPA9v3dxCCFE1ZIELYQQHiUJWgghPEoStBBCeJQkaCGE8ChJ0EII4VGSoIUQwqMkQQshhEdJghZCCI+SBC2EEB4lCVoIITxKErQQQniUr0ezC4fDC5n57cxls3lgfiFEdfF1gnZdt5mI+mKxWEulYxFCiJnm6y4OpVQzgKcqHIYQQpSErxM0gGYAIdu2D2mtn29ra1ucb0UZE1oI4Te+7uJwHGchAEQiEfXOO+8stiyrF8AX8qwrfdNCCF/x+xU0ACAajZqmpqbdAM6sdCxCCDFTfH0FrbV+g4hW7d+//8X+/v7PWJb1bKVjEkKImeLrBG2MaVFKxerr609j5ueMMa2VjkkIIUQR5AahEMKPqqIPWgghqpEkaCGE8ChJ0EII4VGSoIUQwqMkQQshhEdJghZCCI+SBC2EEB4lCVoIITxKErQQQniUrx/1FkIIrwqHwwsty9rX2dk5uHz58trjjz9+UVNT0xvRaDQJAK2trY1E5HZ3d+8FgHXr1p166NChvVu3bh1K70OuoIUQAI4MiZD9p8jtd2TuK8/fO3JvXV201nOMMXd+8MEHhwFg3rx5O4ioZWBg4KH0OpZldQaDwbFhkI0xJ86ZM+dHmfuRK2ghxJhpjpt+Ub79ZLy+CLMAM38TwIPbt29329raPgXgUCwWu9627f/b2traaFnWQiL6987OzvfS23R1db2gtb45HA4v6urq+jfA5wlaa72Ume8noiYArzPz+lgs9nSl4xKimqQSyo8BnEtELwNY4zjO77TWzMzXAriciJYAR66UHceh9N/pfWRejWes84pSavndd9/9htb6RAAvNzQ0nJLuAkivS0QhZt4E4AYAQQA3GWOuiMfjD08Q21Jm3kREZwM4SETf7erq6guFQpcopbYxMwH4LTOvj8fjz+SKN/17pH/HWCz2Z/nayz5mRGQHAoHPpX4eJqLa1FvB1OsbXNfVOQ73NmbWAK4DfN7FwczfI6KNyWTyBAD3E9G1pW6z0iPjVbp9icEb7ZcqhlzdG5Zl3Q6gZ3R09CQiugvA3Rmb7Kurq/tSOrlNdAWeY517jTErUj9fDuDBzOScxsyWMeavmPlbzPwHY8wVSqltk8S2GcBtAOqNMRcz820AQET3ALjnwIEDdUqpv1dK9RRwWPbV1dV9qYBjAQBYu3bt6QAOdnZ2DgJAPB7vB7DPtu2fEtErlmWdycxvpfueMymlngPw12OvCwjOy5YEg8EtPT09h1zX7QZwTvYKE/0jzvfeVP7hz3Q7MxlDuY6BF2KQ8zC9xO04DqX/pJcR0YVEdF8wGDzMzPcCODf9nuu6j3R0dBycSlvJZPI+Zr4s9bLFGLMl13ojIyN98Xj8JSI6/cCBA4/F4/GHAdRMFFtNTc35RLSYme9XSm0HcGJq/RsAfK2+vv4uZn7DcZxPTxZn5u840bFIY+bTmPmdzGWO46xpbGy81HGc9cx8veu6t2mt79Fa77Rte2wc+9HR0T3MfGr6ta+7OIjopI6OjkMAcPDgwX319fUN+dYt9j9Auf6jV9s2XohBtsm9fBr9y1Yikfjk5s2bP8h+o6en59AU94menp49Wuv9WutvADgmHo+/mGu93t7e4fTP27dvHy0ktkQi8QiAe4iok4h+z8xvAoDjOB3hcPh1Y8y5RPSQbdsbY7FYV+a2LS0t8yb4HfMeizRmtgCY7OXRaDQZCoXOJ6I3A4HA6QAONDQ0rBoYGHgJQA8AuK6bCAQCVnobXydoAIlIJELRaDT9jzHnP8rs/iUhROGY+Rc1NTXfaW9v3zA4OLgaQEssFjsvx3rm6quvPuHOO+/8cIJ9Za9zLzPfQUS3z2RszHw2M//PQCDwB2PMP6bXt237t67rRpuamv5hYGDgEICbAHQBSIRCoUuY+Wml1P3TORau6+6xLKsx1/ZKqRtc122zLOsLzLw/Go0arfVYT0ZdXd18Y8yesfWnclA85L3+/v55AFBfX18P4P0KxyNE1XFddz2AJUNDQ/uISCulQnlWfSKRSPx+kt0dtY5S6kEiOimZTN4zk7ER0feJ6EnXdV9i5rErc2ZuI6LvDwwMHCaiW5jZBgBjzDeUUtuUUm8BeKTY9jJ1d3e/ysyNWus5mctt274AwO7u7u69IyMjzxDRhbZtb2DmFzLiWwrgZ+nXvr6q1Frfw8zPz507t3twcFATUbPjOJdUOi4hRGFs276AiG5xHOfPKx3LTNJa32KMeSUej4998LS1tS1OJpPv9vb2HgCANWvWnFRbW/vp+fPn/yp9c1Rr/QCAqOM4rwI+7+IgohiALYODg5uIaADAism2EUJ4BxE9BODKSscx0xKJxMZAINAHYCxBd3d3785cJ9WPPdaXHQ6HFxljhmKx2KvpZb6+gi4HrfXFAH6a7sMuV+11OBxeyMxvZy5L9aeXrfa7paWlLhgM3sHM/4OIPmTmUCwWe7qcMeS42eU6jhMo43loZubbmXkREb1BRN/s6up6tpzHoK2tbbFlWZsBnAXgyZGRkTW9vb0H5DkAb9NaLwHwb47j/LGQ9UOh0DlKqX7Hcfall/n6CrrUWlpa6gDcnLkso/a6LxAIrE/VXs/4fwrXdZuJqC8Wi7VUon0ACAaD3wewj4gWENFXAcQBLCpnDJk3d23bDhPRPKB8x8EYs1UpdSmAlwEsYeb7AfxJOY+BZVlxIrp5eHj4/9TV1Z1fW1t7M4B15YxBFM9xnF8Xs348Hv9N9jK/3yQsqdra2u8y831ZiyetvZ4JSqlmAE/leKss7QMAM/93Y8yDjuN81NXV9YDjOIvKHUOa1voMAKsaGhpuLWcMRHTYGMMNDQ1sjBkFkC7zKucxOGf+/PmP9/b2DtfW1v6CiJZVIAZRAZKg81i3bt2pRHRpXV3dxszl2bXXAPLWXk9TM4CQbduHtNbPt7W1LS5z+yCiU5VS/8227T/atv1qKBQ6p9wxZNhIRJFoNGrKGQMzh4jol++++25CKfW8Maa1nO2n7B4YGGhuaWmpGx4etgGcXIEYRAVIgs7Ddd3bAVzf0dExkvVWIhKJZPbdl+SRX8dxFsZisQsaGxuPN8aELMvqLWf7KTXM/OHcuXPnE9E1qZuy5Y4Ba9euPYuZFziO87OMxWWJgYhuZeavB4PBOiJarpT6h3K2n6KJ6J+CweD7qS6e9FV8Wc+DKD9J0PktA/DP2cMlosy119Fo1DQ1Ne0GcGa522fm9+rq6jZv2rTpMIBfEtFZ5Y4BAFzXvQLAtqzFZYmBmRc3NjY+2dHRMTI0NPQUM/9pOdsHAMdxXnIc5yzHcT4B4AEA/1HuGERlyE3CPHKNbJV6+Sul1OXt7e3dg4ODK4moqBsBhdJav0FEq/bv3/9if3//ZyzLerac7QMAEf3z8PDw32qte4io2RiTLvgvWwypOC4kouuzFpclBiLa9e677/55e3v7i4ODg3+ZGsGsbO0DgG3bbxLR9SMjIz8H8HVmfqDcMYjKkARdpHLVXhtjWpRSsfr6+tOY+bmMvs+y1X6PjIxcFwwG48y8kZl/p5S6vNwxAEeuYhOJxG8zl5UrBqXUOmNMz9DQ0DlE9BulVNnPAxGFAcRqa2tPZuZtBw4cuKrcMQghhBBCCCGE9/1/7TxHKC4GNb0AAAAASUVORK5CYII=\",\"boundingBox\":{\"width\":360,\"height\":153,\"baseline\":79}},\"plotRange\":[35.0,92.5,0.0,26.6],\"requestedImageSize\":[\"Automatic\",\"Automatic\"]}"]], "Output",CellChangeTimes->{{3.684673492261847*^9,3.684673517307908*^9},{3.684673623386516*^9,3.684673638491679*^9}}, ExpressionUUID->"a9788511-e36a-4ffd-914c-1c1e6dea50ca"]},Open]]},Open]]},Open]]}, WindowSize->{775,873},WindowMargins->{{178,Automatic},{Automatic,0}},WindowTitle->"Examples for Swiss Fertility", TaggingRules->{"NotebookTemplateVersion"->1.},CellContext->Notebook,ShowCellTags->True, Nothing,Nothing,Nothing,Nothing,StyleDefinitions->FrontEnd`FileName[{"Wolfram"},"CreateDataResourceStyleSheet.nb", CharacterEncoding->"UTF-8"],DockedCells->{},Background->GrayLevel[0.9999],FrontEndVersion->"10.0 for Wolfram Cloud Platform (June 2 2014)"]