(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 73270, 1690] NotebookOptionsPosition[ 71584, 1649] NotebookOutlinePosition[ 72198, 1672] CellTagsIndexPosition[ 72155, 1669] WindowTitle->Examples for Anorexia Treatment Sample Data WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection"], Cell["Retrieve the ResourceObject:", "Text", CellChangeTimes->{{3.6821849447840075`*^9, 3.682184951647694*^9}, { 3.6821850182913575`*^9, 3.6821850462121496`*^9}, {3.6821850885233803`*^9, 3.68218509051958*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceObject", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6804517731799183`*^9, 3.6804517885604563`*^9}, { 3.6804527318597765`*^9, 3.6804527390684977`*^9}, 3.696179191683907*^9}], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ResourceObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False}, PanelBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[ ButtonBox[ DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"], ImageSizeCache->{12., {0., 12.}}], Appearance->None, ButtonFunction:>(Typeset`open$$ = True), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, (3.5 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], 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[(3.5 CurrentValue["FontCapHeight"])/AbsoluteCurrentValue[ Magnification], ImageSizeCache -> {45., {0., 9.}}]}], GridBox[{ { RowBox[{ TagBox["\<\"Name: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TemplateBox[{ "\"Sample Data: Anorexia Treatment\"","\" \"",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/\ Anorexia-Treatment-Sample-Data"], None}, ButtonNote -> "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], "Hyperlink"]& ]}, "RowDefault"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Anorexia data on weight change\"\>", "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, ButtonFunction:>(Typeset`open$$ = False), Evaluator->Automatic, Method->"Preemptive"], Alignment->{Center, Center}, ImageSize-> Dynamic[{ Automatic, (3.5 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], 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[(3.5 CurrentValue["FontCapHeight"])/AbsoluteCurrentValue[ Magnification], ImageSizeCache -> {45., {0., 9.}}]}], GridBox[{ { RowBox[{ TagBox["\<\"Name: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TemplateBox[{ "\"Sample Data: Anorexia Treatment\"","\" \"",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/\ Anorexia-Treatment-Sample-Data"], None}, ButtonNote -> "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], "Hyperlink"]& ]}, "RowDefault"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Anorexia data on weight change\"\>", "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[{ ",","\",\"","\"medicine\"","\"health\"","\"anorexia\"", "\"weight\"","\"ExampleData\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Documentation: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ ButtonBox[ PaneSelectorBox[{ False->"\<\"https://datarepository.wolframcloud.com/\ resources/Anorexia-Treatment-Sample-Data\"\>", True-> StyleBox["\<\"https://datarepository.wolframcloud.com/\ resources/Anorexia-Treatment-Sample-Data\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL[ "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], None}, ButtonNote-> "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Anorexia-\ Treatment-Sample-Data"], "Hyperlink"]& ], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Data Location: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ DynamicModuleBox[{DataResource`Private`typesetstorage$$ = DataResource`Private`typesetstorageLocation, DataResource`Private`info$$}, DynamicBox[ToBoxes[ DataResource`Private`info$$ = DataResource`Private`resourceInfo[ "1ca2389a-de49-475b-9f8f-6f1280ea3c69"]; If[ AssociationQ[DataResource`Private`info$$], DataResource`Private`typesetstorage$$[ Lookup[ DataResource`Private`info$$, "ContentElementLocations", None]], Missing["NotAvailable"]], StandardForm]], DynamicModuleValues:>{}], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"UUID: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1ca2389a-de49-475b-9f8f-6f1280ea3c69\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Version: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1.0.0\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Size: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ RowBox[{"\\[LeftAssociation]", RowBox[{"\<\"Content\"\>", "\[Rule]", "57088"}], "\\[RightAssociation]"}], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Elements: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",","\",\"","\"ColumnDescriptions\"","\"ColumnTypes\"", "\"Content\"","\"DataType\"","\"Dimensions\"", "\"ObservationCount\"","\"RawData\"","\"Source\""}, "RowWithSeparators"], Short[#, 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], DynamicModuleValues:>{}], "]"}], ResourceObject[ Association[ "Name" -> "Sample Data: Anorexia Treatment", "UUID" -> "1ca2389a-de49-475b-9f8f-6f1280ea3c69", "ResourceType" -> "DataResource", "Version" -> "1.0.0", "Description" -> "Anorexia data on weight change", "ContentSize" -> Association["Content" -> 57088], "ContentElements" -> { "ColumnDescriptions", "ColumnTypes", "Content", "DataType", "Dimensions", "ObservationCount", "RawData", "Source"}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.6846780768866105`*^9, 3.696179192250827*^9}] }, Open ]], Cell["View the data:", "Text", CellChangeTimes->{{3.682184974529982*^9, 3.6821849772962584`*^9}, { 3.6821850234008684`*^9, 3.6821850240499334`*^9}, {3.6821850586563935`*^9, 3.6821850629428225`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceData", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6804518239459944`*^9, 3.680451854651065*^9}, 3.696179194097082*^9}], Cell[BoxData[ TemplateBox[{TagBox[ StyleBox[ TagBox[ GridBox[{{ ItemBox[ TagBox[ TooltipBox[ PaneBox[ StyleBox["\"Treatment\"", 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["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (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"], Annotation[#, Row[{ Row[{ Style["All", GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}, StripOnInput -> False], ItemBox[ TagBox[ TooltipBox[ PaneBox[ StyleBox["\"EntryWeight\"", 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["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (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"], Annotation[#, Row[{ Row[{ Style["All", GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}, StripOnInput -> False], ItemBox[ TagBox[ TooltipBox[ PaneBox[ StyleBox["\"ExitWeight\"", 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["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (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"], Annotation[#, Row[{ Row[{ Style["All", GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Background -> GrayLevel[0.95], Alignment -> {Left, Baseline}, StripOnInput -> False]}, { PaneBox[ TagBox[ TagBox[ TooltipBox["\"Cont\"", TemplateBox[{ TemplateBox[{ StyleBox["1", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["1"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[1, Key["Treatment"]]], "Mouse"]& ], ImageSize -> {{38.400000000000006`, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"80.7`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["1", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["1"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[1, Key["EntryWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"80.2`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["1", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["1"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[1, Key["ExitWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { PaneBox[ TagBox[ TagBox[ TooltipBox["\"Cont\"", TemplateBox[{ TemplateBox[{ StyleBox["2", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["2"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[2, Key["Treatment"]]], "Mouse"]& ], ImageSize -> {{38.400000000000006`, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"89.4`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["2", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["2"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[2, Key["EntryWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"80.1`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["2", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["2"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[2, Key["ExitWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { PaneBox[ TagBox[ TagBox[ TooltipBox["\"Cont\"", TemplateBox[{ TemplateBox[{ StyleBox["3", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["3"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[3, Key["Treatment"]]], "Mouse"]& ], ImageSize -> {{38.400000000000006`, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"91.8`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["3", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["3"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[3, Key["EntryWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"86.4`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["3", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["3"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[3, Key["ExitWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { PaneBox[ TagBox[ TagBox[ TooltipBox["\"Cont\"", TemplateBox[{ TemplateBox[{ StyleBox["4", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["4"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[4, Key["Treatment"]]], "Mouse"]& ], ImageSize -> {{38.400000000000006`, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"74", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["4", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["4"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[4, Key["EntryWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"86.3`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["4", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["4"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[4, Key["ExitWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { PaneBox[ TagBox[ TagBox[ TooltipBox["\"Cont\"", TemplateBox[{ TemplateBox[{ StyleBox["5", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"Treatment\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["5"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["Treatment", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[5, Key["Treatment"]]], "Mouse"]& ], ImageSize -> {{38.400000000000006`, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"78.1`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["5", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"EntryWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["5"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["EntryWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[5, Key["EntryWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}], PaneBox[ TagBox[ TagBox[ TooltipBox[ StyleBox[ RowBox[{"76.1`", "\"lb\""}], FontColor -> RGBColor[{ Rational[33, 74], Rational[27, 74], Rational[117, 370]}]], TemplateBox[{ TemplateBox[{ StyleBox["5", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"], TemplateBox[{ StyleBox["\" \\:203a \"", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628], StripOnInput -> False], StyleBox["\"ExitWeight\"", GrayLevel[0.6], StripOnInput -> False]}, "RowDefault"]}, "Row", DisplayFunction -> (RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaseStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"FontFamily", "\[Rule]", "\"Verdana\""}], ",", RowBox[{"FontSize", "\[Rule]", "9.`"}]}], "}"}]}]}], "]"}]& ), BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}]], Annotation[#, Row[{ Row[{ Style[ RawBoxes["5"], GrayLevel[0.6]]}], Row[{ Style[" \\:203a ", RGBColor[ 0.6509803921568628, 0.6509803921568628, 0.6509803921568628]], Style["ExitWeight", GrayLevel[0.6]]}]}, BaseStyle -> {FontFamily -> "Verdana", FontSize -> 9.}], "Tooltip"]& ], Annotation[#, TypeSystem`NestedGrid`PackagePrivate`$SliceMarker[843521139][ GeneralUtilities`Slice[5, Key["ExitWeight"]]], "Mouse"]& ], ImageSize -> {{75, Full}, Automatic}, Alignment -> {Left, Baseline}]}, { ItemBox[ TagBox[ TooltipBox[ "\"72 total \\:203a \"", "\"\"", LabelStyle -> "TextStyling"], Annotation[#, "", "Tooltip"]& ], BaseStyle -> {{ RGBColor[ 0.5098039215686274, 0.5098039215686274, 0.5098039215686274], 8}}, Alignment -> {Center, Baseline}, Background -> GrayLevel[0.98], StripOnInput -> False], "\[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 -> {}, NumberMarks -> False, ShowAutoStyles -> False, StripOnInput -> False], Deploy, DefaultBaseStyle -> "Deploy"]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("Dataset[<>]"& )]], "Output", CellChangeTimes->{3.6846780789808197`*^9, 3.69617919557318*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection"], Cell["Compare weight change for Control, CBT, and FT treatments:", "Text", CellChangeTimes->{{3.682184974529982*^9, 3.6821849772962584`*^9}, { 3.6821850234008684`*^9, 3.6821850240499334`*^9}, {3.6821850586563935`*^9, 3.6821850629428225`*^9}, {3.6834613390439973`*^9, 3.6834613726099977`*^9}, { 3.6834614113829975`*^9, 3.6834614119029975`*^9}, {3.696179215337322*^9, 3.6961792156418123`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BarChart", "[", RowBox[{ RowBox[{"Mean", "/@", RowBox[{ RowBox[{"GroupBy", "[", RowBox[{ RowBox[{ "ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "[", RowBox[{"All", ",", "All", ",", RowBox[{ RowBox[{"#ExitWeight", "-", "#EntryWeight"}], "&"}]}], "]"}]}], ",", RowBox[{"ChartLabels", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.684678097117634*^9, 3.6846780971196337`*^9}, 3.696179198768474*^9}], Cell[BoxData[ GraphicsBox[{ {Opacity[0], PointBox[{0.48597994530537825`, 0}]}, {{}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.6789999999999999], Thickness[Small]}], {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.6789999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0.544211485870556, 0.}, { 1.455788514129444, -0.449999999999999}, "RoundingRadius" -> 0]}, ImageSizeCache->{{15.340871642774758`, 119.01669573129632`}, { 84.35259716458323, 96.44010332585717}}], StatusArea[#, -0.449999999999999]& , TagBoxNote->"-0.449999999999999"], StyleBox[ RowBox[{"-", "0.449999999999999`"}], {}, StripOnInput -> False]], Annotation[#, Style[-0.449999999999999, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.6789999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.544211485870556, 0.}, {2.455788514129444, 3.006896551724138}, "RoundingRadius" -> 0]}, ImageSizeCache->{{128.5247506678829, 232.20057475640445`}, { 6.924969788101237, 84.85259716458323}}], StatusArea[#, 3.006896551724138]& , TagBoxNote->"3.006896551724138"], StyleBox["3.006896551724138`", {}, StripOnInput -> False]], Annotation[#, Style[3.006896551724138, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.6789999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{2.544211485870556, 0.}, {3.455788514129444, 7.264705882352942}, "RoundingRadius" -> 0]}, ImageSizeCache->{{241.70862969299102`, 345.3844537815126}, {-102.71367877232332`, 84.85259716458323}}], StatusArea[#, 7.264705882352942]& , TagBoxNote->"7.264705882352942"], StyleBox["7.264705882352942`", {}, StripOnInput -> False]], Annotation[#, Style[7.264705882352942, {}], "Tooltip"]& ]}}, {}, {}}, {}, {}, StyleBox[{ {Thickness[Tiny], LineBox[{{0.48597994530537825`, 0.}, {3.5151846855059254`, 0.}}], StyleBox[{}, "GraphicsLabel", StripOnInput->False]}, StyleBox[{ {Thickness[Tiny], LineBox[{{0.544211485870556, 0.}, Offset[{-1.102182119232618*^-15, -6.}, {0.544211485870556, 0.}]}], LineBox[{{3.455788514129444, 0.}, Offset[{-1.102182119232618*^-15, -6.}, {3.455788514129444, 0.}]}], {{}, {}, {}, { LineBox[{{1.455788514129444, 0.}, Offset[{-7.347880794884119*^-16, -4.}, {1.455788514129444, 0.}]}], LineBox[{{1.544211485870556, 0.}, Offset[{-7.347880794884119*^-16, -4.}, {1.544211485870556, 0.}]}], LineBox[{{2.455788514129444, 0.}, Offset[{-7.347880794884119*^-16, -4.}, {2.455788514129444, 0.}]}], LineBox[{{2.544211485870556, 0.}, Offset[{-7.347880794884119*^-16, -4.}, {2.544211485870556, 0.}]}]}, {}}}, StyleBox[ {Thickness[Tiny], InsetBox["\<\"Cont\"\>", Offset[{0., -2.}, {1., 0.}], ImageScaled[{1/2, 1}], Automatic, {1, 0}], InsetBox["\<\"CBT\"\>", Offset[{0., -2.}, {2., 0.}], ImageScaled[{1/2, 1}], Automatic, {1, 0}], InsetBox["\<\"FT\"\>", Offset[{0., -2.}, {3., 0.}], ImageScaled[{1/2, 1}], Automatic, {1, 0}]}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, "GraphicsAxes", StripOnInput->False, Antialiasing->False]}, BoxID -> "{\"type\":\"Image\",\"message\":\"RasterizedDueToUnsupportedContent\",\"\ imageData\":{\"imageSource\":\"data:image/png;base64,\ iVBORw0KGgoAAAANSUhEUgAAAWgAAADfCAYAAADbXUmsAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAA\ AOxAAADsQBlSsOGwAAChRJREFUeJzt3G1snWd5wPHrPuckttukqxuqtbQwUYEgiI29AWFa2bQJJnUw\ BDSog7bWlORBCVha2Jj2og7lEx+G1G1RW/\ XEyZZRjdLSomlCY7yuwFim0anSgHYCxsa6NoI2axPHL6mP730Ibp0sqdwk9nPF+f2kfDj2Y+s6OvE/\ J/fxuSIAOH81TVPbngHgQtNpewAATk2gAZISaICklhxo59AACYkzwMpzxAGQlEADJCXQAEkJNEBSAg\ 2QVK/tAYCz945rr/KbVol96iv/U87k6wQaVol7dm1qewRO4d0fPnDGX+\ uIAyApgQZISqABkhJogKQsSwJIasmB7vf7Z/\ RrIgCcGUccAEkJNEBSAg2QlEADJCXQAEkJNEBSAg2QlEADJCXQAEkJNEBSAg2QlGVJAElZlgSQlCMO\ gKQEGiApgQZISqABkhJogKQEGiApgQZISqABkuqNjY0NDw0N/\ Xmt9fpSypO11q179ux5oO3BAC50vaGhoT+MiCdKKVeXUq6LiImIeEXLcwFc8Hq11nfVWm+\ emJiYiohP/ugPAC3rlVKuKaW8fdu2bV+MiO/XWm+\ amJh46OQLFy9LspcDYPn1ImJNrfXJdevWXXH06NFNEbEnIl538oWiDLCyOrXWg8PDw39x6623TkfEV\ 0spr2l7KAAiOqWUv5uZmfnNpmnWlFJ+udb6YNtDARDRmZ2d/VAp5c211kPz8/N/0ul0mraHAiCit3/\ //qci4vq2BwHgRN5JCJCUQAMkJdAASQk0QFICDZCUQAMkJdAASS050IuXJQGw/\ JYcaMuSAFaWIw6ApAQaICmBBkhKoAGSEmiApAQaICmBBkhKoAGSEmiApAQaICmBBkjKsiSApCxLAkj\ KEQdAUgINkJRAAyQl0ABJCTRAUgINkJRAAyQl0ABJCTRAUgINkJRAAyRlWRJAUpYlASTliAMgKYEGS\ EqgAZISaICkBBogKYEGSEqgAZJ6NtBN07zNm1EA8uhERIyNjQ1HxEdangWARToREWvXrv39WuvH2x4\ GgOd0tm/ffk0p5Z3Dw8MfbXsYAJ7TGwwGfxYRv7d79+7ZpmlOe+\ Hi82l7OQCWXy8i3hoRb12Ic9M09VQBFmWAldVbHN7TxRmAlef3oAGSOiHQnj0D5OEZNEBSAg2QlEAD\ JCXQAEkJNEBSAg2QlEADJLXkQNsVDbCylhxob2IBWFmOOACSEmiApAQaICmBBkhKoAGSEmiApAQaIC\ mBBkhKoAGSEmiApAQaIKneUi9smqbax7Fq3df2ADyvd7U9AO1YcqDFefV6x7VXvfOeXZvaHoNTWPMr\ 993f9gy0xxEHQFICDZCUQAMkJdAASQk0QFICDZCUQAMkJdAASQk0QFICDZCUQAMkteRAN01Tl3MQAE\ 605EBblgSwshxxACQl0ABJCTRAUgINkJRAAyQl0ABJCTRAUgINkFSvaZo3RsTttdZXRsQjpZSm3+9/\ ve3BAC50nYj4y4j442PHjl1WSun/6DYALev1+/1XLtzYuXPn/qNHj36kzYEAOK63+\ MbU1NQvRsTfnOrCxcuS7OUAWH7PBnrLli2Xzc/Pj5dSbjrVhaIMsLI6ERE7duy4otvt7h4MBuP9fv/\ ptocCIKKzdevWX5ubm7tnMBh8cN++ff/V9kAAHNfrdDr9iHhpt9s92DRNRDjOAMig1+/3f6LtIQD4/\ 7yTECApgQZISqABkhJogKQEGiApgQZISqABklpyoBcvSwJg+\ S050N5dCLCyHHEAJCXQAEkJNEBSAg2QlEADJCXQAEkJNEBSAg2QlEADJCXQAEkJNEBSliUBJGVZEkB\ SjjgAkhJogKQEGiApgQZISqABkhJogKQEGiApgQZISqABkhJogKQEGiApy5IAkrIsCSApRxwASQk0Q\ FICDZCUQAMkJdAASQk0QFICDZBUr2maN9Ra7y6lXBURj9Rax/fs2fNA24MBXOg6tdY/\ KKV8dG5ubkNE3F1K+WDbQwFw/Ijj54eGhj62b9++I4PBYG9E/HTbQwEQ0SmlXL579+4jERGHDx9+\ IiKubHkmACKiNE0zeeWVV16ya9eu+c2bN3dHR0en+v3+0OKLLEoCWB7Pt+\ eoFxEHH3300Usj4tDo6OhoRPzghXyTpmnqbTc8eU4G5dx6/\ 90blrTkqmmaahlWTkt9bDyGeZ3NY9OJiH/udDrv2blz50it9b0R8fVzOx4AZ6JXStkTER+\ bnJy8tZTyWETc0PZQAET07rzzzn+IiJe0PchyeuDbw/GFR0ZicrbExiueife+fjIuWvvCj9Xv+\ PL62P6mI8swIUuxbdu2D0TE70TEiyLis71eb+sdd9zxvye9RvJMRHw3Iv6o3+/\ ff6rXTxwF5HG6x8fjdlyv7QGW24HvDcXX/\ mModvzS4bj0ovn49L9dFJ948OL4rTdOvuDv9Y3H1i7DhMun3+/fv8Tr0v/Fb5pmLCK2DAaD62qtj/\ Z6vV1zc3O3RcR7Ip67D+Pj40PT09Nv73Q6eyPi/oWPn69ntEud+Xy8bwtONfv5/ridK6s+\ 0A98eziu/5mpuOKSQUREvO0np+LA947/kspTU53Yf2Bd/OehXrxsw1zc/IbJuPSi+Xj/\ 3RviN35qKv7xu8Px1HQntvzCkeh/dX1EHH/hzYuirRivtf723r17H46IuPHGG28ZGRkZO/mi2dnZ+\ W63O19r/auVHxHOrbMO9A8f/nREbDoHoyyPx5/uxtWjc8/eXtur8aZXzERExD3/\ enG87EVz8b5rj8Tff2skPvHgxfG+a48fYcwNStxy3VPxrcfXxN6vrY/\ bbnhSnFtUa311KeWhhdt33XXX0Yi4feH24v8S11ojInau6ICcscWP3Wp8tnw292nVP4Ne043onmYl1\ Hd+sCZuev1kDK+p8ZaN03HL344++7lf3Tgda7o1Xnv1sRjMr9CwPJ+ZOH6+fEoLPwSbN29eOzo6+\ uaI6EfEn67QbJyF1Rjlc2XVb7N71Y8/E/99qHvCx75/6Pi/S4u7WyNiftHLEsM9783JpJTy+\ Yj42cUf27p168+dfN299957LCK+FBHrV2g0WDar/hn0da+Zir/+\ l3Uxtmky1g3PxxceHoljg4iXXjYXL7/8mfjcIyPxlldPx+\ ceHolrLp973u9VSsTR2RIXD4n3Spufn99VSrlz+/btN8/Ozv6w1+v9bq11JCIeXHzd+\ Pj40MzMzAci4kA7k8K5c04C/e4P5/5ZGLrkxfGdgxujdHoxe/jxmDz4jfj4p+aju2Yk1r/\ 4tfGZb14ac9NPx5HHHoovf3E6Lt/46yfcp4XbP/aS18WH7tsQT/z7Z1q8NxemiYmJbzZNc/\ tgMPhKt9tdV2u979ixYzsWPr9wjjkzM3O4lPJPg8Fgx+m/G6wiTdNU+\ zgAEhJngJW36l8kBDhfCTRAUgINkJRAAyQl0ABJCTRAUgINkJRAAwAAAKvA/\ wFbUJkol4TIAgAAAABJRU5ErkJggg==\",\"boundingBox\":{\"width\":360,\"height\":\ 223,\"baseline\":115}},\"plotRange\":[0,1,0,1],\"requestedImageSize\":[\"\ Automatic\",\"Automatic\"]}", AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, True}, AxesLabel->{None, None}, AxesOrigin->{0.48597994530537825`, 0}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& )}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {{{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {1., FormBox["\"Cont\"", TraditionalForm], 0}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {2., FormBox["\"CBT\"", TraditionalForm], 0}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {3., FormBox["\"FT\"", TraditionalForm], 0}}, {{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}}}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{All, All}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{None, Automatic}]], "Output", CellChangeTimes->{3.6834613321209974`*^9, 3.684678101733095*^9, 3.696179199584692*^9}] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"Examples for Anorexia Treatment Sample Data", Visible->True, DockedCells->{}, TaggingRules->{"NotebookTemplateVersion" -> 1.}, CellContext->Notebook, ShowCellTags->True, Background->GrayLevel[0.9999], FrontEndVersion->"11.2 for Linux x86 (64-bit) (September 10, 2017)", StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "CreateDataResourceStyleSheet.nb", CharacterEncoding -> "UTF-8"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[637, 23, 36, 0, 70, "Subsection",ExpressionUUID->"6c7ac5bf-7b7e-4d06-8b91-8db309c1459d"], Cell[676, 25, 215, 3, 70, "Text",ExpressionUUID->"e2a47301-74f5-4399-8b00-75435ce0d769"], Cell[CellGroupData[{ Cell[916, 32, 254, 4, 70, "Input",ExpressionUUID->"163308f6-e69a-4c1e-99ee-92a5a7835ed8"], Cell[1173, 38, 17889, 397, 70, "Output",ExpressionUUID->"3b807289-7f01-4b3c-9a7e-843fe5622cd7"] }, Open ]], Cell[19077, 438, 204, 3, 70, "Text",ExpressionUUID->"038e8113-63ce-4bbe-8e34-830e5db018ae"], Cell[CellGroupData[{ Cell[19306, 445, 200, 4, 70, "Input",ExpressionUUID->"b0f90fe8-e290-46df-b6c2-24baa072ccdb"], Cell[19509, 451, 40077, 928, 70, "Output",ExpressionUUID->"d04e297a-5764-47da-a777-b0ea647000e5"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[59635, 1385, 35, 0, 70, "Subsection",ExpressionUUID->"33fac141-d6f8-4286-a31e-8d876162aef8"], Cell[59673, 1387, 402, 5, 70, "Text",ExpressionUUID->"687879c8-c282-46d8-b1cd-3a711ae03a07"], Cell[CellGroupData[{ Cell[60100, 1396, 573, 15, 70, "Input",ExpressionUUID->"b44899e4-2421-480f-a22e-f744a7a22f57"], Cell[60676, 1413, 10880, 232, 70, "Output",ExpressionUUID->"0fa13bb6-d512-49c5-8fc8-e9ec2acddca7"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)