(* 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[ 84228, 2198] NotebookOptionsPosition[ 82243, 2152] NotebookOutlinePosition[ 82841, 2175] CellTagsIndexPosition[ 82798, 2172] WindowTitle->Examples for Dombey and Son 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}}], 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[{"\"Dombey and Son\"","\" \"",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/Dombey-\ and-Son"], None}, ButtonNote -> "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], "Hyperlink"]& ]}, "RowDefault"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Charles Dickens's \\\"Dombey and Son\\\ \"\"\>", "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[{"\"Dombey and Son\"","\" \"",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/Dombey-\ and-Son"], None}, ButtonNote -> "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], "Hyperlink"]& ]}, "RowDefault"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Charles Dickens's \\\"Dombey and Son\\\ \"\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Categories: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",","\",\"","\"Textual Data\"","\"Literature\"", "\"Text & Literature\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"ContentTypes: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{",","\",\"","\"Text\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Keywords: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",","\",\"","\"fiction\"","\"text\"","\"novel\"","\"book\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Documentation: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ ButtonBox[ PaneSelectorBox[{ False->"\<\"https://datarepository.wolframcloud.com/\ resources/Dombey-and-Son\"\>", True-> StyleBox["\<\"https://datarepository.wolframcloud.com/\ resources/Dombey-and-Son\"\>", "HyperlinkActive"]}, Dynamic[ CurrentValue["MouseOver"]], BaseStyle->{"Hyperlink"}, FrameMargins->0, ImageSize->Automatic], BaseStyle->"Hyperlink", ButtonData->{ URL[ "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], None}, ButtonNote-> "https://datarepository.wolframcloud.com/resources/Dombey-\ and-Son"], Annotation[#, URL[ "https://datarepository.wolframcloud.com/resources/Dombey-and-\ Son"], "Hyperlink"]& ], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Data Location: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ DynamicModuleBox[{ ResourceSystemClient`Private`typesetstorage$$ = ResourceSystemClient`Private`typesetstorageLocation, ResourceSystemClient`Private`info$$}, DynamicBox[ToBoxes[ ResourceSystemClient`Private`info$$ = ResourceSystemClient`Private`resourceInfo[ "2b2ef01a-4555-44a5-bd3c-36ee03348ec7"]; If[ AssociationQ[ResourceSystemClient`Private`info$$], ResourceSystemClient`Private`typesetstorage$$[ Lookup[ ResourceSystemClient`Private`info$$, "ContentElementLocations", None]], Missing["NotAvailable"]], StandardForm]], DynamicModuleValues:>{}], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"UUID: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"2b2ef01a-4555-44a5-bd3c-36ee03348ec7\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Version: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1.0.0\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Size: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TemplateBox[{"1993.296`","\"kB\"","kilobytes","\"Kilobytes\""}, "Quantity"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Elements: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{",","\",\"","\"Plaintext\""}, "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" -> "Dombey and Son", "UUID" -> "2b2ef01a-4555-44a5-bd3c-36ee03348ec7", "ResourceType" -> "DataResource", "Version" -> "1.0.0", "Description" -> "Plaintext for Charles Dickens's \"Dombey and Son\"", "ContentSize" -> Quantity[1993.296, "Kilobytes"], "ContentElements" -> {"Plaintext"}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.6833156181718893`*^9, 3.709571621690446*^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[{ RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "[", RowBox[{"[", "10", "]"}], "]"}]], "Input", CellChangeTimes->{ 3.6833156725890017`*^9, {3.709572450913835*^9, 3.709572462486343*^9}}], Cell[BoxData["\<\"The words had such a softening influence, that he appended \ a term of\\nendearment to Mrs Dombey's name (though not without some \ hesitation,\\nas being a man but little used to that form of address): and \ said, 'Mrs\\nDombey, my--my dear.'\"\>"], "Output", CellChangeTimes->{ 3.6833156733460455`*^9, 3.709571624222488*^9, {3.709572456230229*^9, 3.7095724634977903`*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection"], Cell["Comparison of sentence lengths:", "Text", CellChangeTimes->{{3.683033608693839*^9, 3.683033616124875*^9}, { 3.683315712010257*^9, 3.683315716350505*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"sentences", "=", RowBox[{"TextSentences", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"Histogram", "[", RowBox[{ RowBox[{"(", RowBox[{"Length", "/@", RowBox[{"(", RowBox[{"TextWords", "/@", "sentences"}], ")"}]}], ")"}], ",", RowBox[{"PlotRange", "\[Rule]", "Full"}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.6830333795804577`*^9, 3.683033425254339*^9}, { 3.6830334646198807`*^9, 3.6830335879807243`*^9}, 3.683035622565227*^9, 3.683304174499114*^9, 3.6833082857507887`*^9, 3.6833156993295317`*^9}], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.7], Thickness[Small]}], {}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.7], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 0}, {5., 1147.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.083333333333336`, 41.5}, {-19.021727533517762`, 90.53807066880277}}], StatusArea[#, 1147]& , TagBoxNote->"1147"], StyleBox["1147", {}, StripOnInput -> False]], Annotation[#, Style[1147, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{5., 0}, {10., 1994.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{41., 49.41666666666667}, {-99.55673108832637, 90.53807066880277}}], StatusArea[#, 1994]& , TagBoxNote->"1994"], StyleBox["1994", {}, StripOnInput -> False]], Annotation[#, Style[1994, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{10., 0}, {15., 1654.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{48.91666666666667, 57.333333333333336`}, {-67.22863048781288, 90.53807066880277}}], StatusArea[#, 1654]& , TagBoxNote->"1654"], StyleBox["1654", {}, StripOnInput -> False]], Annotation[#, Style[1654, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{15., 0}, {20., 1471.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{56.833333333333336`, 65.25}, {-49.82850575283062, 90.53807066880277}}], StatusArea[#, 1471]& , TagBoxNote->"1471"], StyleBox["1471", {}, StripOnInput -> False]], Annotation[#, Style[1471, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{20., 0}, {25., 1167.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{64.75, 73.16666666666666}, {-20.923380510018546`, 90.53807066880277}}], StatusArea[#, 1167]& , TagBoxNote->"1167"], StyleBox["1167", {}, StripOnInput -> False]], Annotation[#, Style[1167, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{25., 0}, {30., 1066.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{72.66666666666666, 81.08333333333334}, {-11.32003297868954, 90.53807066880277}}], StatusArea[#, 1066]& , TagBoxNote->"1066"], StyleBox["1066", {}, StripOnInput -> False]], Annotation[#, Style[1066, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{30., 0}, {35., 918.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{80.58333333333334, 89.}, {2.7521990474163402`, 90.53807066880277}}], StatusArea[#, 918]& , TagBoxNote->"918"], StyleBox["918", {}, StripOnInput -> False]], Annotation[#, Style[918, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{35., 0}, {40., 736.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{88.5, 96.91666666666666}, {20.057241133573555`, 90.53807066880277}}], StatusArea[#, 736]& , TagBoxNote->"736"], StyleBox["736", {}, StripOnInput -> False]], Annotation[#, Style[736, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{40., 0}, {45., 627.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{96.41666666666666, 104.83333333333334`}, { 30.421249855502886`, 90.53807066880277}}], StatusArea[#, 627]& , TagBoxNote->"627"], StyleBox["627", {}, StripOnInput -> False]], Annotation[#, Style[627, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{45., 0}, {50., 527.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{104.33333333333334`, 112.75}, {39.92951473800686, 90.53807066880277}}], StatusArea[#, 527]& , TagBoxNote->"527"], StyleBox["527", {}, StripOnInput -> False]], Annotation[#, Style[527, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{50., 0}, {55., 377.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{112.25, 120.66666666666666`}, {54.19191206176281, 90.53807066880277}}], StatusArea[#, 377]& , TagBoxNote->"377"], StyleBox["377", {}, StripOnInput -> False]], Annotation[#, Style[377, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{55., 0}, {60., 295.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{120.16666666666666`, 128.58333333333334`}, { 61.98868926541606, 90.53807066880277}}], StatusArea[#, 295]& , TagBoxNote->"295"], StyleBox["295", {}, StripOnInput -> False]], Annotation[#, Style[295, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{60., 0}, {65., 275.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{128.08333333333334`, 136.5}, {63.890342241916855`, 90.53807066880277}}], StatusArea[#, 275]& , TagBoxNote->"275"], StyleBox["275", {}, StripOnInput -> False]], Annotation[#, Style[275, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{65., 0}, {70., 199.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{136., 144.41666666666666`}, {71.11662355261987, 90.53807066880277}}], StatusArea[#, 199]& , TagBoxNote->"199"], StyleBox["199", {}, StripOnInput -> False]], Annotation[#, Style[199, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{70., 0}, {75., 141.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{143.91666666666666`, 152.33333333333334`}, { 76.63141718447218, 90.53807066880277}}], StatusArea[#, 141]& , TagBoxNote->"141"], StyleBox["141", {}, StripOnInput -> False]], Annotation[#, Style[141, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{75., 0}, {80., 135.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{151.83333333333334`, 160.25}, {77.20191307742242, 90.53807066880277}}], StatusArea[#, 135]& , TagBoxNote->"135"], StyleBox["135", {}, StripOnInput -> False]], Annotation[#, Style[135, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{80., 0}, {85., 90.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{159.75, 168.16666666666666`}, {81.48063227454921, 90.53807066880277}}], StatusArea[#, 90]& , TagBoxNote->"90"], StyleBox["90", {}, StripOnInput -> False]], Annotation[#, Style[90, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{85., 0}, {90., 79.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{167.66666666666666`, 176.08333333333334`}, { 82.52654141162463, 90.53807066880277}}], StatusArea[#, 79]& , TagBoxNote->"79"], StyleBox["79", {}, StripOnInput -> False]], Annotation[#, Style[79, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{90., 0}, {95., 62.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{175.58333333333334`, 184.}, {84.14294644165031, 90.53807066880277}}], StatusArea[#, 62]& , TagBoxNote->"62"], StyleBox["62", {}, StripOnInput -> False]], Annotation[#, Style[62, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{95., 0}, {100., 51.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{183.5, 191.91666666666666`}, {85.18885557872575, 90.53807066880277}}], StatusArea[#, 51]& , TagBoxNote->"51"], StyleBox["51", {}, StripOnInput -> False]], Annotation[#, Style[51, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{100., 0}, {105., 36.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{191.41666666666666`, 199.83333333333334`}, { 86.61509531110134, 90.53807066880277}}], StatusArea[#, 36]& , TagBoxNote->"36"], StyleBox["36", {}, StripOnInput -> False]], Annotation[#, Style[36, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{105., 0}, {110., 25.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{199.33333333333334`, 207.75}, {87.66100444817678, 90.53807066880277}}], StatusArea[#, 25]& , TagBoxNote->"25"], StyleBox["25", {}, StripOnInput -> False]], Annotation[#, Style[25, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{110., 0}, {115., 25.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{207.25, 215.66666666666666`}, {87.66100444817678, 90.53807066880277}}], StatusArea[#, 25]& , TagBoxNote->"25"], StyleBox["25", {}, StripOnInput -> False]], Annotation[#, Style[25, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{115., 0}, {120., 17.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{215.16666666666666`, 223.58333333333334`}, { 88.4216656387771, 90.53807066880277}}], StatusArea[#, 17]& , TagBoxNote->"17"], StyleBox["17", {}, StripOnInput -> False]], Annotation[#, Style[17, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{120., 0}, {125., 15.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{223.08333333333334`, 231.5}, {88.61183093642718, 90.53807066880277}}], StatusArea[#, 15]& , TagBoxNote->"15"], StyleBox["15", {}, StripOnInput -> False]], Annotation[#, Style[15, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{125., 0}, {130., 9.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{231., 239.41666666666666`}, {89.18232682937742, 90.53807066880277}}], StatusArea[#, 9]& , TagBoxNote->"9"], StyleBox["9", {}, StripOnInput -> False]], Annotation[#, Style[9, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{130., 0}, {135., 13.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{238.91666666666666`, 247.33333333333334`}, { 88.80199623407727, 90.53807066880277}}], StatusArea[#, 13]& , TagBoxNote->"13"], StyleBox["13", {}, StripOnInput -> False]], Annotation[#, Style[13, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{135., 0}, {140., 3.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{246.83333333333334`, 255.25}, {89.75282272232765, 90.53807066880277}}], StatusArea[#, 3]& , TagBoxNote->"3"], StyleBox["3", {}, StripOnInput -> False]], Annotation[#, Style[3, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{140., 0}, {145., 4.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{254.75, 263.16666666666663`}, {89.65774007350261, 90.53807066880277}}], StatusArea[#, 4]& , TagBoxNote->"4"], StyleBox["4", {}, StripOnInput -> False]], Annotation[#, Style[4, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{145., 0}, {150., 7.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{262.66666666666663`, 271.0833333333333}, { 89.3724921270275, 90.53807066880277}}], StatusArea[#, 7]& , TagBoxNote->"7"], StyleBox["7", {}, StripOnInput -> False]], Annotation[#, Style[7, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{150., 0}, {155., 4.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{270.5833333333333, 279.}, {89.65774007350261, 90.53807066880277}}], StatusArea[#, 4]& , TagBoxNote->"4"], StyleBox["4", {}, StripOnInput -> False]], Annotation[#, Style[4, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{155., 0}, {160., 6.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{278.5, 286.91666666666663`}, {89.46757477585254, 90.53807066880277}}], StatusArea[#, 6]& , TagBoxNote->"6"], StyleBox["6", {}, StripOnInput -> False]], Annotation[#, Style[6, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{160., 0}, {165., 2.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{286.41666666666663`, 294.8333333333333}, { 89.84790537115269, 90.53807066880277}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", {}, StripOnInput -> False]], Annotation[#, Style[2, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{165., 0}, {170., 1.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{294.3333333333333, 302.74999999999994`}, { 89.94298801997773, 90.53807066880277}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{170., 0}, {175., 1.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{302.24999999999994`, 310.66666666666663`}, { 89.94298801997773, 90.53807066880277}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{175., 0}, {180., 2.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{310.16666666666663`, 318.5833333333333}, { 89.84790537115269, 90.53807066880277}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", {}, StripOnInput -> False]], Annotation[#, Style[2, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{180., 0}, {185., 3.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{318.0833333333333, 326.49999999999994`}, { 89.75282272232765, 90.53807066880277}}], StatusArea[#, 3]& , TagBoxNote->"3"], StyleBox["3", {}, StripOnInput -> False]], Annotation[#, Style[3, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{185., 0}, {190., 1.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{325.99999999999994`, 334.41666666666663`}, { 89.94298801997773, 90.53807066880277}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{195., 0}, {200., 1.}, "RoundingRadius" -> 0]}, ImageSizeCache->{{341.8333333333333, 350.24999999999994`}, { 89.94298801997773, 90.53807066880277}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", {}, StripOnInput -> False]], Annotation[#, Style[1, {}], "Tooltip"]& ]}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{-4., 0}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{0., 200.}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.683315724591976*^9, 3.709571662415524*^9}] }, Open ]], Cell["Show the most frequently used verbs:", "Text", CellChangeTimes->{{3.683033608693839*^9, 3.683033616124875*^9}, { 3.6832949032376537`*^9, 3.6832949042537556`*^9}, 3.6833089376346254`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BarChart", "[", RowBox[{ RowBox[{ RowBox[{"TakeLargest", "[", RowBox[{ RowBox[{"Counts", "[", RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "]"}], ",", "20"}], "]"}], "//", "Reverse"}], ",", RowBox[{"BarOrigin", "\[Rule]", "Left"}], ",", RowBox[{"ChartLabels", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.6832887705512333`*^9, 3.6832888072249002`*^9}, 3.6833081371530533`*^9, {3.683308191179655*^9, 3.683308192307106*^9}, { 3.6833082251442356`*^9, 3.683308276981035*^9}, 3.6833089065155134`*^9, 3.6833093228481426`*^9, 3.683315734568547*^9}], Cell[BoxData[ GraphicsBox[{ {Opacity[0], PointBox[{{0., 0.19588550983899827`}, {0., 20.407802394385577`}}]}, {{}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 0.5921976056144214}, {461., 1.4078023943855786`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 77.24625892228812}, {75.51121574404927, 83.56785991081178}}], StatusArea[#, 461]& , TagBoxNote->"461"], StyleBox["461", {}, StripOnInput -> False]], Annotation[#, Style[461, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 1.5921976056144214`}, {464., 2.4078023943855786`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 77.46749271137026}, {66.24613506919468, 74.30277923595719}}], StatusArea[#, 464]& , TagBoxNote->"464"], StyleBox["464", {}, StripOnInput -> False]], Annotation[#, Style[464, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 2.5921976056144214`}, {473., 3.4078023943855786`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 78.13119407861667}, {56.9810543943401, 65.0376985611026}}], StatusArea[#, 473]& , TagBoxNote->"473"], StyleBox["473", {}, StripOnInput -> False]], Annotation[#, Style[473, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 3.5921976056144214`}, {495., 4.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 79.75357519855233}, {47.71597371948551, 55.77261788624802}}], StatusArea[#, 495]& , TagBoxNote->"495"], StyleBox["495", {}, StripOnInput -> False]], Annotation[#, Style[495, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 4.592197605614421}, {524., 5.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 81.89216849301297}, {38.45089304463093, 46.50753721139343}}], StatusArea[#, 524]& , TagBoxNote->"524"], StyleBox["524", {}, StripOnInput -> False]], Annotation[#, Style[524, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 5.592197605614421}, {532., 6.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 82.48212526389867}, {29.185812369776343`, 37.242456536538846`}}], StatusArea[#, 532]& , TagBoxNote->"532"], StyleBox["532", {}, StripOnInput -> False]], Annotation[#, Style[532, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 6.592197605614421}, {535., 7.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 82.7033590529808}, {19.920731694921756`, 27.97737586168426}}], StatusArea[#, 535]& , TagBoxNote->"535"], StyleBox["535", {}, StripOnInput -> False]], Annotation[#, Style[535, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 7.592197605614421}, {667., 8.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 92.43764577259475}, {10.655651020067168`, 18.712295186829678`}}], StatusArea[#, 667]& , TagBoxNote->"667"], StyleBox["667", {}, StripOnInput -> False]], Annotation[#, Style[667, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 8.592197605614421}, {683., 9.407802394385579}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 93.61755931436613}, {1.3905703452125806`, 9.44721451197509}}], StatusArea[#, 683]& , TagBoxNote->"683"], StyleBox["683", {}, StripOnInput -> False]], Annotation[#, Style[683, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 9.592197605614421}, {715., 10.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 95.97738639790893}, {-7.874510329642007, 0.18213383712050302`}}], StatusArea[#, 715]& , TagBoxNote->"715"], StyleBox["715", {}, StripOnInput -> False]], Annotation[#, Style[715, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 10.592197605614421`}, {727., 11.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 96.86232155423747}, {-17.13959100449658, -9.082946837734085}}], StatusArea[#, 727]& , TagBoxNote->"727"], StyleBox["727", {}, StripOnInput -> False]], Annotation[#, Style[727, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 11.592197605614421`}, {992., 12.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 116.40463958982608`}, {-26.404671679351168`, \ -18.348027512588672`}}], StatusArea[#, 992]& , TagBoxNote->"992"], StyleBox["992", {}, StripOnInput -> False]], Annotation[#, Style[992, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 12.592197605614421`}, {1051., 13.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 120.75557077510808`}, {-35.669752354205755`, -27.61310818744326}}], StatusArea[#, 1051]& , TagBoxNote->"1051"], StyleBox["1051", {}, StripOnInput -> False]], Annotation[#, Style[1051, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 13.592197605614421`}, {1070., 14.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 122.1567181059616}, {-44.93483302906034, -36.87818886229783}}], StatusArea[#, 1070]& , TagBoxNote->"1070"], StyleBox["1070", {}, StripOnInput -> False]], Annotation[#, Style[1070, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 14.592197605614421`}, {1772., 15.407802394385579`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 173.92542475118125`}, {-54.199913703914916`, \ -46.143269537152435`}}], StatusArea[#, 1772]& , TagBoxNote->"1772"], StyleBox["1772", {}, StripOnInput -> False]], Annotation[#, Style[1772, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 15.592197605614421`}, {1953., 16.407802394385577`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 187.2731966924701}, {-63.46499437876949, -55.40835021200701}}], StatusArea[#, 1953]& , TagBoxNote->"1953"], StyleBox["1953", {}, StripOnInput -> False]], Annotation[#, Style[1953, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 16.59219760561442}, {2090., 17.407802394385577`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 197.3762063938876}, {-72.73007505362409, -64.67343088686158}}], StatusArea[#, 2090]& , TagBoxNote->"2090"], StyleBox["2090", {}, StripOnInput -> False]], Annotation[#, Style[2090, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 17.59219760561442}, {2568., 18.407802394385577`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 232.62612345430784`}, {-81.99515572847866, -73.93851156171615}}], StatusArea[#, 2568]& , TagBoxNote->"2568"], StyleBox["2568", {}, StripOnInput -> False]], Annotation[#, Style[2568, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 18.59219760561442}, {2576., 19.407802394385577`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 233.21608022519354`}, {-91.26023640333327, -83.20359223657076}}], StatusArea[#, 2576]& , TagBoxNote->"2576"], StyleBox["2576", {}, StripOnInput -> False]], Annotation[#, Style[2576, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[ 0.5599999999999999], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0., 19.59219760561442}, {4060., 20.407802394385577`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{42.75, 342.6530612244898}, {-100.52531707818784`, -92.46867291142533}}], StatusArea[#, 4060]& , TagBoxNote->"4060"], StyleBox["4060", {}, StripOnInput -> False]], Annotation[#, Style[4060, {}], "Tooltip"]& ]}}, {}, {}}, {}, {}, {}, {}, StyleBox[{ {Thickness[Tiny], LineBox[{{0., 0.19588550983899827`}, {0., 20.812040732076508`}}], StyleBox[{}, "GraphicsLabel", StripOnInput->False]}, StyleBox[{ {Thickness[Tiny], LineBox[{{0., 0.5921976056144214}, Offset[{-6., 0.}, {0., 0.5921976056144214}]}], LineBox[{{0., 20.407802394385577`}, Offset[{-6., 0.}, {0., 20.407802394385577`}]}], {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, { LineBox[{{0., 1.4078023943855786`}, Offset[{-4., 0.}, {0., 1.4078023943855786`}]}], LineBox[{{0., 1.5921976056144214`}, Offset[{-4., 0.}, {0., 1.5921976056144214`}]}], LineBox[{{0., 2.4078023943855786`}, Offset[{-4., 0.}, {0., 2.4078023943855786`}]}], LineBox[{{0., 2.5921976056144214`}, Offset[{-4., 0.}, {0., 2.5921976056144214`}]}], LineBox[{{0., 3.4078023943855786`}, Offset[{-4., 0.}, {0., 3.4078023943855786`}]}], LineBox[{{0., 3.5921976056144214`}, Offset[{-4., 0.}, {0., 3.5921976056144214`}]}], LineBox[{{0., 4.407802394385579}, Offset[{-4., 0.}, {0., 4.407802394385579}]}], LineBox[{{0., 4.592197605614421}, Offset[{-4., 0.}, {0., 4.592197605614421}]}], LineBox[{{0., 5.407802394385579}, Offset[{-4., 0.}, {0., 5.407802394385579}]}], LineBox[{{0., 5.592197605614421}, Offset[{-4., 0.}, {0., 5.592197605614421}]}], LineBox[{{0., 6.407802394385579}, Offset[{-4., 0.}, {0., 6.407802394385579}]}], LineBox[{{0., 6.592197605614421}, Offset[{-4., 0.}, {0., 6.592197605614421}]}], LineBox[{{0., 7.407802394385579}, Offset[{-4., 0.}, {0., 7.407802394385579}]}], LineBox[{{0., 7.592197605614421}, Offset[{-4., 0.}, {0., 7.592197605614421}]}], LineBox[{{0., 8.407802394385579}, Offset[{-4., 0.}, {0., 8.407802394385579}]}], LineBox[{{0., 8.592197605614421}, Offset[{-4., 0.}, {0., 8.592197605614421}]}], LineBox[{{0., 9.407802394385579}, Offset[{-4., 0.}, {0., 9.407802394385579}]}], LineBox[{{0., 9.592197605614421}, Offset[{-4., 0.}, {0., 9.592197605614421}]}], LineBox[{{0., 10.407802394385579`}, Offset[{-4., 0.}, {0., 10.407802394385579`}]}], LineBox[{{0., 10.592197605614421`}, Offset[{-4., 0.}, {0., 10.592197605614421`}]}], LineBox[{{0., 11.407802394385579`}, Offset[{-4., 0.}, {0., 11.407802394385579`}]}], LineBox[{{0., 11.592197605614421`}, Offset[{-4., 0.}, {0., 11.592197605614421`}]}], LineBox[{{0., 12.407802394385579`}, Offset[{-4., 0.}, {0., 12.407802394385579`}]}], LineBox[{{0., 12.592197605614421`}, Offset[{-4., 0.}, {0., 12.592197605614421`}]}], LineBox[{{0., 13.407802394385579`}, Offset[{-4., 0.}, {0., 13.407802394385579`}]}], LineBox[{{0., 13.592197605614421`}, Offset[{-4., 0.}, {0., 13.592197605614421`}]}], LineBox[{{0., 14.407802394385579`}, Offset[{-4., 0.}, {0., 14.407802394385579`}]}], LineBox[{{0., 14.592197605614421`}, Offset[{-4., 0.}, {0., 14.592197605614421`}]}], LineBox[{{0., 15.407802394385579`}, Offset[{-4., 0.}, {0., 15.407802394385579`}]}], LineBox[{{0., 15.592197605614421`}, Offset[{-4., 0.}, {0., 15.592197605614421`}]}], LineBox[{{0., 16.407802394385577`}, Offset[{-4., 0.}, {0., 16.407802394385577`}]}], LineBox[{{0., 16.59219760561442}, Offset[{-4., 0.}, {0., 16.59219760561442}]}], LineBox[{{0., 17.407802394385577`}, Offset[{-4., 0.}, {0., 17.407802394385577`}]}], LineBox[{{0., 17.592197605614416`}, Offset[{-4., 0.}, {0., 17.592197605614416`}]}], LineBox[{{0., 18.407802394385577`}, Offset[{-4., 0.}, {0., 18.407802394385577`}]}], LineBox[{{0., 18.592197605614416`}, Offset[{-4., 0.}, {0., 18.592197605614416`}]}], LineBox[{{0., 19.407802394385577`}, Offset[{-4., 0.}, {0., 19.407802394385577`}]}], LineBox[{{0., 19.592197605614416`}, Offset[{-4., 0.}, {0., 19.592197605614416`}]}]}, {}}}, StyleBox[ {Thickness[Tiny], InsetBox["\<\"returned\"\>", Offset[{-2., 0.}, {0., 1.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"made\"\>", Offset[{-2., 0.}, {0., 2.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"being\"\>", Offset[{-2., 0.}, {0., 3.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"say\"\>", Offset[{-2., 0.}, {0., 4.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"will\"\>", Offset[{-2., 0.}, {0., 5.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"has\"\>", Offset[{-2., 0.}, {0., 6.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"am\"\>", Offset[{-2., 0.}, {0., 7.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"know\"\>", Offset[{-2., 0.}, {0., 8.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"are\"\>", Offset[{-2., 0.}, {0., 9.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"do\"\>", Offset[{-2., 0.}, {0., 10.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"could\"\>", Offset[{-2., 0.}, {0., 11.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"been\"\>", Offset[{-2., 0.}, {0., 12.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"were\"\>", Offset[{-2., 0.}, {0., 13.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"would\"\>", Offset[{-2., 0.}, {0., 14.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"be\"\>", Offset[{-2., 0.}, {0., 15.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"have\"\>", Offset[{-2., 0.}, {0., 15.999999999999998}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"is\"\>", Offset[{-2., 0.}, {0., 17.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"said\"\>", Offset[{-2., 0.}, {0., 18.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"had\"\>", Offset[{-2., 0.}, {0., 19.}], {1, 0}, Automatic, {1, 0}], InsetBox["\<\"was\"\>", Offset[{-2., 0.}, {0., 20.}], {1, 0}, Automatic, {1, 0}]}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, "GraphicsAxes", StripOnInput->False, Antialiasing->False]}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, False}, AxesLabel->{None, None}, AxesOrigin->{0., 0.19588550983899827`}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& )}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{{{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 1., FormBox["\"returned\"", TraditionalForm], 0}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 2., FormBox["\"made\"", TraditionalForm], 0}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 3., FormBox["\"being\"", TraditionalForm], 0}, {4., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 4., FormBox["\"say\"", TraditionalForm], 0}, {5., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 5., FormBox["\"will\"", TraditionalForm], 0}, {6., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 6., FormBox["\"has\"", TraditionalForm], 0}, {7., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 7., FormBox["\"am\"", TraditionalForm], 0}, {8., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 8., FormBox["\"know\"", TraditionalForm], 0}, {9., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 9., FormBox["\"are\"", TraditionalForm], 0}, {10., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {10., FormBox["\"do\"", TraditionalForm], 0}, {11., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {11., FormBox["\"could\"", TraditionalForm], 0}, {12., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {12., FormBox["\"been\"", TraditionalForm], 0}, {13., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {13., FormBox["\"were\"", TraditionalForm], 0}, {14., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {14., FormBox["\"would\"", TraditionalForm], 0}, {15., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {15., FormBox["\"be\"", TraditionalForm], 0}, {16., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {16., FormBox["\"have\"", TraditionalForm], 0}, {17., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {17., FormBox["\"is\"", TraditionalForm], 0}, {18., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {18., FormBox["\"said\"", TraditionalForm], 0}, {19., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {19., FormBox["\"had\"", TraditionalForm], 0}, {20., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {20., FormBox["\"was\"", TraditionalForm], 0}}, {{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 4., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 5., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 6., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 7., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 8., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, { 9., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {10., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {11., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {12., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {13., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {14., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {15., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {16., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {17., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {18., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {19., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}, {20., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0], Selectable -> False], TraditionalForm], {0.004, 0}}}}, { Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{All, All}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.05]}, { Scaled[0.02], Scaled[0.02]}}, Ticks->{Automatic, None}]], "Output", CellChangeTimes->{3.683315797091123*^9, 3.709571758653317*^9}] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"Examples for Dombey and Son", 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[621, 23, 36, 0, 70, "Subsection",ExpressionUUID->"11cc9624-a081-4ac9-8243-ea39768af74e"], Cell[660, 25, 215, 3, 70, "Text",ExpressionUUID->"206ef87e-a83d-4b8c-94d2-1bcff353d7ea"], Cell[CellGroupData[{ Cell[900, 32, 211, 3, 70, "Input",ExpressionUUID->"f8d93b88-7a8a-4807-bb65-a5d44a2ccb67"], Cell[1114, 37, 17454, 393, 70, "Output",ExpressionUUID->"455a5aae-3c0b-4e31-9019-0144d0ce1e11"] }, Open ]], Cell[18583, 433, 204, 3, 70, "Text",ExpressionUUID->"a384ba60-47df-4af6-a9dc-66224dbb8b7b"], Cell[CellGroupData[{ Cell[18812, 440, 314, 8, 70, "Input",ExpressionUUID->"656c41f5-97e3-4186-b1b2-7b83e3287650"], Cell[19129, 450, 399, 6, 70, "Output",ExpressionUUID->"dbc16cd5-2e96-45eb-9509-2676b033936f"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[19577, 462, 35, 0, 70, "Subsection",ExpressionUUID->"29f71909-662d-4555-8568-3727a1ffafd4"], Cell[19615, 464, 162, 2, 70, "Text",ExpressionUUID->"22a45eb6-580d-4827-8013-1a579e845022"], Cell[CellGroupData[{ Cell[19802, 470, 728, 17, 70, "Input",ExpressionUUID->"d0318dad-95f3-4c13-a2df-87d946788469"], Cell[20533, 489, 24922, 727, 70, "Output",ExpressionUUID->"f9136bf4-9dfe-46b5-8e1f-2fe1d213fd5d"] }, Open ]], Cell[45470, 1219, 196, 2, 70, "Text",ExpressionUUID->"fea385ab-8088-4eb7-8f53-f52fd797b1d5"], Cell[CellGroupData[{ Cell[45691, 1225, 751, 17, 70, "Input",ExpressionUUID->"10c5a5bf-cc45-437c-bcea-d7ca185045e9"], Cell[46445, 1244, 35770, 904, 70, "Output",ExpressionUUID->"174efab5-3967-48e2-adaf-75e2f8294308"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)