(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 95045, 2331] NotebookOptionsPosition[ 93085, 2285] NotebookOutlinePosition[ 93658, 2308] CellTagsIndexPosition[ 93615, 2305] WindowTitle->Examples for Sense and Sensibility 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["\<\"Sense and Sensibility\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Jane Austen's \\\"Sense and \ Sensibility\\\"\"\>", "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["\<\"Sense and Sensibility\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Jane Austen's \\\"Sense and \ Sensibility\\\"\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Categories: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",", "\",\"", "\"Textual Data\"", "\"Literature\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"ContentTypes: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{",", "\",\"", "\"Text\""}, "RowWithSeparators"], Short], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Keywords: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",", "\",\"", "\"text\"", "\"novel\"", "\"fiction\"", "\"united kingdom\""}, "RowWithSeparators"], Short], "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[ "a4a65731-a369-4fbd-86e0-bec3dee049da"]; 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["\<\"a4a65731-a369-4fbd-86e0-bec3dee049da\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Version: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1.0.0\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Size: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TemplateBox[{ "673.7040000000001`", "\"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[<| "Name" -> "Sense and Sensibility", "UUID" -> "a4a65731-a369-4fbd-86e0-bec3dee049da", "ResourceType" -> "DataResource", "Version" -> "1.0.0", "Description" -> "Plaintext for Jane Austen's \"Sense and Sensibility\"", "ContentSize" -> Quantity[673.7040000000001, "Kilobytes"], "ContentElements" -> {"Plaintext"}|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.683655689910911*^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.6804518239459944`*^9, 3.680451854651065*^9}, { 3.683655701184079*^9, 3.683655709494687*^9}, {3.7029193343681297`*^9, 3.702919337205112*^9}}], Cell[BoxData["\<\"So acutely did Mrs. Dashwood feel this ungracious \ behaviour, and so\\nearnestly did she despise her daughter-in-law for it, \ that, on the\\narrival of the latter, she would have quitted the house for \ ever, had\\nnot the entreaty of her eldest girl induced her first to reflect \ on the\\npropriety of going, and her own tender love for all her three \ children\\ndetermined her afterwards to stay, and for their sakes avoid a \ breach\\nwith their brother.\"\>"], "Output", CellChangeTimes->{{3.683655694538062*^9, 3.683655710094511*^9}, 3.702919338603071*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection"], Cell["Compare sentence lengths between different works:", "Text", CellChangeTimes->{{3.683377141291443*^9, 3.6833771513624783`*^9}, { 3.683392785368867*^9, 3.683392786695593*^9}, {3.683645441584592*^9, 3.6836454424239273`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PairedHistogram", "[", RowBox[{ RowBox[{"StringLength", "/@", RowBox[{"TextSentences", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}]}], ",", RowBox[{"StringLength", "/@", RowBox[{"TextSentences", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}]}], ",", "Automatic"}], "]"}]], "Input", CellChangeTimes->{{3.683655717314514*^9, 3.68365574042808*^9}}], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.581], Thickness[Small]}], {{{}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{Opacity[0.581], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-1891.725, 0.}], Offset[{0, 0}, {-324.725, 100.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{65.48650168451663, 160.2218698592579}, { 75.11460120096594, 87.00493456368058}}], StatusArea[#, 1567]& , TagBoxNote->"1567"], StyleBox["1567", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1567, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-1517.725, 100.}], Offset[{0, 0}, {-324.725, 200.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{87.97790417165973, 160.2218698592579}, { 63.72426783825129, 75.61460120096594}}], StatusArea[#, 1193]& , TagBoxNote->"1193"], StyleBox["1193", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1193, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-974.725, 200.}], Offset[{0, 0}, {-324.725, 300.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{120.63253398588085`, 160.2218698592579}, { 52.33393447553666, 64.2242678382513}}], StatusArea[#, 650]& , TagBoxNote->"650"], StyleBox["650", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[650, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-629.725, 300.}], Offset[{0, 0}, {-324.725, 400.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{141.37995071867329`, 160.2218698592579}, { 40.943601112822016`, 52.83393447553666}}], StatusArea[#, 305]& , TagBoxNote->"305"], StyleBox["305", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[305, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-487.725, 400.}], Offset[{0, 0}, {-324.725, 500.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{149.91946717101104`, 160.2218698592579}, { 29.55326775010738, 41.443601112822016`}}], StatusArea[#, 163]& , TagBoxNote->"163"], StyleBox["163", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[163, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-389.725, 500.}], Offset[{0, 0}, {-324.725, 600.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{155.8129362719202, 160.2218698592579}, { 18.16293438739274, 30.05326775010738}}], StatusArea[#, 65]& , TagBoxNote->"65"], StyleBox["65", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[65, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-354.725, 600.}], Offset[{0, 0}, {-324.725, 700.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{157.91774666510204`, 160.2218698592579}, { 6.772601024678096, 18.66293438739274}}], StatusArea[#, 30]& , TagBoxNote->"30"], StyleBox["30", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[30, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-334.725, 700.}], Offset[{0, 0}, {-324.725, 800.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{159.12049546120596`, 160.2218698592579}, {-4.6177323380365465`, 7.272601024678096}}], StatusArea[#, 10]& , TagBoxNote->"10"], StyleBox["10", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[10, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-333.725, 800.}], Offset[{0, 0}, {-324.725, 900.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{159.18063290101114`, 160.2218698592579}, {-16.008065700751175`, -4.1177323380365465`}}], StatusArea[#, 9]& , TagBoxNote->"9"], StyleBox["9", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[9, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-325.725, 900.}], Offset[{0, 0}, {-324.725, 1000.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{159.6617324194527, 160.2218698592579}, {-27.398399063465817`, -15.508065700751175`}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-325.725, 1000.}], Offset[{0, 0}, {-324.725, 1100.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{159.6617324194527, 160.2218698592579}, {-38.78873242618046, -26.898399063465817`}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ], {}, {}, {}, {}, {}, TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-325.725, 1600.}], Offset[{0, 0}, {-324.725, 1700.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{159.6617324194527, 160.2218698592579}, {-107.13073260246831`, -95.24039923975367}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ]}, {}, {}}, {{}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{Opacity[0.581], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 0.}], Offset[{0, 0}, {2419.725, 100.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 325.2660665326266}, { 75.11460120096594, 87.00493456368058}}], StatusArea[#, 2095]& , TagBoxNote->"2095"], StyleBox["2095", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[2095, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 100.}], Offset[{0, 0}, {1734.725, 200.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 284.0719202660677}, { 63.72426783825129, 75.61460120096594}}], StatusArea[#, 1410]& , TagBoxNote->"1410"], StyleBox["1410", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1410, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 200.}], Offset[{0, 0}, {1046.725, 300.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 242.6973616800932}, { 52.33393447553666, 64.2242678382513}}], StatusArea[#, 722]& , TagBoxNote->"722"], StyleBox["722", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[722, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 300.}], Offset[{0, 0}, {612.725, 400.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 216.59771280463838`}, { 40.943601112822016`, 52.83393447553666}}], StatusArea[#, 288]& , TagBoxNote->"288"], StyleBox["288", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[288, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 400.}], Offset[{0, 0}, {430.725, 500.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 205.65269876009282`}, { 29.55326775010738, 41.443601112822016`}}], StatusArea[#, 106]& , TagBoxNote->"106"], StyleBox["106", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[106, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 500.}], Offset[{0, 0}, {370.725, 600.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 202.0444523717811}, { 18.16293438739274, 30.05326775010738}}], StatusArea[#, 46]& , TagBoxNote->"46"], StyleBox["46", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[46, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 600.}], Offset[{0, 0}, {344.725, 700.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 200.480878936846}, { 6.772601024678096, 18.66293438739274}}], StatusArea[#, 20]& , TagBoxNote->"20"], StyleBox["20", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[20, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 700.}], Offset[{0, 0}, {334.725, 800.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 199.87950453879404`}, {-4.6177323380365465`, 7.272601024678096}}], StatusArea[#, 10]& , TagBoxNote->"10"], StyleBox["10", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[10, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 800.}], Offset[{0, 0}, {326.725, 900.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 199.3984050203525}, {-16.008065700751175`, -4.1177323380365465`}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[2, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {324.725, 900.}], Offset[{0, 0}, {325.725, 1000.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{198.7781301407421, 199.3382675805473}, {-27.398399063465817`, -15.508065700751175`}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ], {}, {}, {}, {}, {}, {}, {}}, {}, {}}}, {}}, \ {{{{{{{{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, \ {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {}, {}, {}, {}, {}, {{}, {}}}, {}}, \ {}}, {{{{{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, \ {{}, {}}, {{}, {}}, {{}, {}}, {}, {}, {}, {}, {}, {}, {}}, {}}, {}}}, {}}, \ {}}, StyleBox[{ TagBox[{ StyleBox[{ LineBox[{ Offset[{0, 0}, {-324.725, -85.}], Offset[{0, 0}, {-2865.4362499999997`, -85.}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {-324.725, -85.}], Offset[{0, -4.}, {-324.725, -85.}]}, { Offset[{0, 0}, {-1324.7250000000001`, -85.}], Offset[{0, -4.}, {-1324.7250000000001`, -85.}]}, { Offset[{0, 0}, {-2324.725, -85.}], Offset[{0, -4.}, {-2324.725, -85.}]}}], LineBox[{{ Offset[{0, 0}, {-524.725, -85.}], Offset[{0., -2.5}, {-524.725, -85.}]}, { Offset[{0, 0}, {-724.725, -85.}], Offset[{0., -2.5}, {-724.725, -85.}]}, { Offset[{0, 0}, {-924.725, -85.}], Offset[{0., -2.5}, {-924.725, -85.}]}, { Offset[{0, 0}, {-1124.7250000000001`, -85.}], Offset[{0., -2.5}, {-1124.7250000000001`, -85.}]}, { Offset[{0, 0}, {-1524.7250000000001`, -85.}], Offset[{0., -2.5}, {-1524.7250000000001`, -85.}]}, { Offset[{0, 0}, {-1724.7250000000001`, -85.}], Offset[{0., -2.5}, {-1724.7250000000001`, -85.}]}, { Offset[{0, 0}, {-1924.7250000000001`, -85.}], Offset[{0., -2.5}, {-1924.7250000000001`, -85.}]}, { Offset[{0, 0}, {-2124.725, -85.}], Offset[{0., -2.5}, {-2124.725, -85.}]}, { Offset[{0, 0}, {-2524.725, -85.}], Offset[{0., -2.5}, {-2524.725, -85.}]}, { Offset[{0, 0}, {-2724.725, -85.}], Offset[{0., -2.5}, {-2724.725, -85.}]}}]}, StyleBox[{{{ InsetBox["0", Offset[{0., -7.}, {-324.725, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["1000", Offset[{0., -7.}, {-1324.7250000000001, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["2000", Offset[{0., -7.}, {-2324.725, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}]}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], StyleBox[{ LineBox[{ Offset[{0, 0}, {324.725, -85.}], Offset[{0, 0}, {2865.4362499999997`, -85.}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {324.725, -85.}], Offset[{0, -4.}, {324.725, -85.}]}, { Offset[{0, 0}, {1324.7250000000001`, -85.}], Offset[{0, -4.}, {1324.7250000000001`, -85.}]}, { Offset[{0, 0}, {2324.725, -85.}], Offset[{0, -4.}, {2324.725, -85.}]}}], LineBox[{{ Offset[{0, 0}, {524.725, -85.}], Offset[{0., -2.5}, {524.725, -85.}]}, { Offset[{0, 0}, {724.725, -85.}], Offset[{0., -2.5}, {724.725, -85.}]}, { Offset[{0, 0}, {924.725, -85.}], Offset[{0., -2.5}, {924.725, -85.}]}, { Offset[{0, 0}, {1124.7250000000001`, -85.}], Offset[{0., -2.5}, {1124.7250000000001`, -85.}]}, { Offset[{0, 0}, {1524.7250000000001`, -85.}], Offset[{0., -2.5}, {1524.7250000000001`, -85.}]}, { Offset[{0, 0}, {1724.7250000000001`, -85.}], Offset[{0., -2.5}, {1724.7250000000001`, -85.}]}, { Offset[{0, 0}, {1924.7250000000001`, -85.}], Offset[{0., -2.5}, {1924.7250000000001`, -85.}]}, { Offset[{0, 0}, {2124.725, -85.}], Offset[{0., -2.5}, {2124.725, -85.}]}, { Offset[{0, 0}, {2524.725, -85.}], Offset[{0., -2.5}, {2524.725, -85.}]}, { Offset[{0, 0}, {2724.725, -85.}], Offset[{0., -2.5}, {2724.725, -85.}]}}]}, StyleBox[{{{ InsetBox["0", Offset[{0., -7.}, {324.725, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["1000", Offset[{0., -7.}, {1324.7250000000001, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["2000", Offset[{0., -7.}, {2324.725, -85.}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}]}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False]}, Deploy, DefaultBaseStyle->"Deploy"], { StyleBox[{ LineBox[{ Offset[{0, 0}, {-324.725, -85.}], Offset[{0, 0}, {-324.725, 1785.}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {-324.725, 0.}], Offset[{4., 0}, {-324.725, 0.}]}, { Offset[{0, 0}, {-324.725, 500.}], Offset[{4., 0}, {-324.725, 500.}]}, { Offset[{0, 0}, {-324.725, 1000.}], Offset[{4., 0}, {-324.725, 1000.}]}, { Offset[{0, 0}, {-324.725, 1500.}], Offset[{4., 0}, {-324.725, 1500.}]}}], LineBox[{{ Offset[{0, 0}, {-324.725, 100.}], Offset[{2.5, 0.}, {-324.725, 100.}]}, { Offset[{0, 0}, {-324.725, 200.}], Offset[{2.5, 0.}, {-324.725, 200.}]}, { Offset[{0, 0}, {-324.725, 300.}], Offset[{2.5, 0.}, {-324.725, 300.}]}, { Offset[{0, 0}, {-324.725, 400.}], Offset[{2.5, 0.}, {-324.725, 400.}]}, { Offset[{0, 0}, {-324.725, 600.}], Offset[{2.5, 0.}, {-324.725, 600.}]}, { Offset[{0, 0}, {-324.725, 700.}], Offset[{2.5, 0.}, {-324.725, 700.}]}, { Offset[{0, 0}, {-324.725, 800.}], Offset[{2.5, 0.}, {-324.725, 800.}]}, { Offset[{0, 0}, {-324.725, 900.}], Offset[{2.5, 0.}, {-324.725, 900.}]}, { Offset[{0, 0}, {-324.725, 1100.}], Offset[{2.5, 0.}, {-324.725, 1100.}]}, { Offset[{0, 0}, {-324.725, 1200.}], Offset[{2.5, 0.}, {-324.725, 1200.}]}, { Offset[{0, 0}, {-324.725, 1300.}], Offset[{2.5, 0.}, {-324.725, 1300.}]}, { Offset[{0, 0}, {-324.725, 1400.}], Offset[{2.5, 0.}, {-324.725, 1400.}]}, { Offset[{0, 0}, {-324.725, 1600.}], Offset[{2.5, 0.}, {-324.725, 1600.}]}, { Offset[{0, 0}, {-324.725, 1700.}], Offset[{2.5, 0.}, {-324.725, 1700.}]}}]}, StyleBox[{{{{}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], StyleBox[{ LineBox[{ Offset[{0, 0}, {324.725, -85.}], Offset[{0, 0}, {324.725, 1785.}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {324.725, 0.}], Offset[{-4., 0}, {324.725, 0.}]}, { Offset[{0, 0}, {324.725, 500.}], Offset[{-4., 0}, {324.725, 500.}]}, { Offset[{0, 0}, {324.725, 1000.}], Offset[{-4., 0}, {324.725, 1000.}]}, { Offset[{0, 0}, {324.725, 1500.}], Offset[{-4., 0}, {324.725, 1500.}]}}], LineBox[{{ Offset[{0, 0}, {324.725, 100.}], Offset[{-2.5, 0.}, {324.725, 100.}]}, { Offset[{0, 0}, {324.725, 200.}], Offset[{-2.5, 0.}, {324.725, 200.}]}, { Offset[{0, 0}, {324.725, 300.}], Offset[{-2.5, 0.}, {324.725, 300.}]}, { Offset[{0, 0}, {324.725, 400.}], Offset[{-2.5, 0.}, {324.725, 400.}]}, { Offset[{0, 0}, {324.725, 600.}], Offset[{-2.5, 0.}, {324.725, 600.}]}, { Offset[{0, 0}, {324.725, 700.}], Offset[{-2.5, 0.}, {324.725, 700.}]}, { Offset[{0, 0}, {324.725, 800.}], Offset[{-2.5, 0.}, {324.725, 800.}]}, { Offset[{0, 0}, {324.725, 900.}], Offset[{-2.5, 0.}, {324.725, 900.}]}, { Offset[{0, 0}, {324.725, 1100.}], Offset[{-2.5, 0.}, {324.725, 1100.}]}, { Offset[{0, 0}, {324.725, 1200.}], Offset[{-2.5, 0.}, {324.725, 1200.}]}, { Offset[{0, 0}, {324.725, 1300.}], Offset[{-2.5, 0.}, {324.725, 1300.}]}, { Offset[{0, 0}, {324.725, 1400.}], Offset[{-2.5, 0.}, {324.725, 1400.}]}, { Offset[{0, 0}, {324.725, 1600.}], Offset[{-2.5, 0.}, {324.725, 1600.}]}, { Offset[{0, 0}, {324.725, 1700.}], Offset[{-2.5, 0.}, {324.725, 1700.}]}}]}, StyleBox[{{{{}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], { StyleBox[InsetBox[ PaneBox["0"], {0, 0.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["500"], {0, 500.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["1000"], {0, 1000.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["1500"], {0, 1500.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False]}, {}}}, Antialiasing->False]}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, False}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {{{-324.725, FormBox["0", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-824.725, FormBox["500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-1324.725, FormBox["1000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-1824.725, FormBox["1500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-2324.725, FormBox["2000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-2824.725, FormBox["2500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3324.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {324.725, FormBox["0", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {824.725, FormBox["500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {1324.725, FormBox["1000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {1824.725, FormBox["1500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {2324.725, FormBox["2000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {2824.725, FormBox["2500", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2424.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2524.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2624.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2724.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2924.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3024.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3124.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3224.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3324.725, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}, {{-324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-1324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-1824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-2324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-2824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3324.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {1324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {1824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {2324.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {2824.725, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2424.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2524.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2624.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2724.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2924.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3024.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3124.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3224.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3324.725, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{All, All}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.02]}}]], "Output", CellChangeTimes->{{3.6836557337476883`*^9, 3.683655751124902*^9}}] }, Open ]], Cell["Create a word cloud:", "Text", CellChangeTimes->{{3.6833768895573597`*^9, 3.68337689196535*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"WordCloud", "[", RowBox[{"DeleteStopwords", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.683032640005966*^9, 3.6830326503422127`*^9}, 3.683035633524098*^9, 3.683655758395637*^9}], Cell[BoxData[ GraphicsBox[{InsetBox[ StyleBox["\<\"Marianne\"\>", StripOnInput->False, FontSize->Scaled[0.1721205449291317], FontColor->RGBColor[0.560181, 0.691569, 0.194885]], {0, 0}, Center, Automatic], InsetBox[ StyleBox["\<\"Elinor\"\>", StripOnInput->False, FontSize->Scaled[0.2153846153846154], FontColor->RGBColor[0.368417, 0.506779, 0.709798]], {0., 47.}, Center, Automatic], InsetBox[ StyleBox["\<\"Mrs.\"\>", StripOnInput->False, FontSize->Scaled[0.18301912756295582`], FontColor->RGBColor[0.880722, 0.611041, 0.142051]], {0., -48.}, Center, Automatic], InsetBox[ StyleBox["\<\"Dashwood\"\>", StripOnInput->False, FontSize->Scaled[0.08592266409797716], FontColor->RGBColor[0.363898, 0.618501, 0.782349]], {0., -81.}, Center, Automatic], InsetBox[ StyleBox["\<\"said\"\>", StripOnInput->False, FontSize->Scaled[0.14074583734691068`], FontColor->RGBColor[0.922526, 0.385626, 0.209179]], {30., 83.}, Center, Automatic], InsetBox[ StyleBox["\<\"Willoughby\"\>", StripOnInput->False, FontSize->Scaled[0.06940966010733453], FontColor->RGBColor[ 0.838355547812947, 0.44746667828057946`, 0.0208888695323676]], {0., -104.}, Center, Automatic], InsetBox[ StyleBox["\<\"Jennings\"\>", StripOnInput->False, FontSize->Scaled[0.07535434154396588], FontColor->RGBColor[ 0.9728288904374106, 0.621644452187053, 0.07336199581899142]], {-15., 111.}, Center, Automatic], InsetBox[ StyleBox["\<\"Edward\"\>", StripOnInput->False, FontSize->Scaled[0.08228980322003578], FontColor->RGBColor[0.647624, 0.37816, 0.614037]], {86., -32.}, Center, Automatic], InsetBox[ StyleBox["\<\"mother\"\>", StripOnInput->False, FontSize->Scaled[0.07964772258153295], FontColor->RGBColor[0.571589, 0.586483, 0.]], {-99., -32.}, Center, Automatic], InsetBox[ StyleBox["\<\"sister\"\>", StripOnInput->False, FontSize->Scaled[0.08394110361910005], FontColor->RGBColor[1, 0.75, 0]], {-97., -57.}, Center, Automatic], InsetBox[ StyleBox["\<\"know\"\>", StripOnInput->False, FontSize->Scaled[0.08625292417779001], FontColor->RGBColor[0.772079, 0.431554, 0.102387]], {99., -57.}, Center, Automatic], InsetBox[ StyleBox["\<\"time\"\>", StripOnInput->False, FontSize->Scaled[0.08856474473647998], FontColor->RGBColor[0.528488, 0.470624, 0.701351]], {109., 26.}, Center, Automatic], InsetBox[ StyleBox["\<\"Colonel\"\>", StripOnInput->False, FontSize->Scaled[0.06412549883032889], FontColor->RGBColor[0.8996399512215667, 0.7463488834690629, 0.]], {-61., 89.}, Center, Automatic], InsetBox[ StyleBox["\<\"think\"\>", StripOnInput->False, FontSize->Scaled[0.07898720242190725], FontColor->RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85]], {96., -81.}, Center, Automatic], InsetBox[ StyleBox["\<\"thing\"\>", StripOnInput->False, FontSize->Scaled[0.07073070042658593], FontColor->RGBColor[0.736782672705901, 0.358, 0.5030266573755369]], {-111., 37.}, Center, Automatic], InsetBox[ StyleBox["\<\"Miss\"\>", StripOnInput->False, FontSize->Scaled[0.07898720242190725], FontColor->RGBColor[0.915, 0.3325, 0.2125]], {97., 76.}, Center, Automatic], InsetBox[ StyleBox["\<\"house\"\>", StripOnInput->False, FontSize->Scaled[0.05851107747351039], FontColor->RGBColor[ 0.8857244243136628, 0.3764133635295058, 0.1393110607841571]], {-94., -79.}, Center, Automatic], InsetBox[ StyleBox["\<\"Brandon\"\>", StripOnInput->False, FontSize->Scaled[0.04893353515893766], FontColor->RGBColor[ 0.35558897405758294`, 0.5505288207539337, 0.8417067688690995]], {-9., -123.}, Center, Automatic], InsetBox[ StyleBox["\<\"good\"\>", StripOnInput->False, FontSize->Scaled[0.060822898032200354`], FontColor->RGBColor[ 0.6753413537738198, 0.3589675436319385, 0.5991466155654507]], {-108., 62.}, Center, Automatic], InsetBox[ StyleBox["\<\"Lucy\"\>", StripOnInput->False, FontSize->Scaled[0.06247419843126462], FontColor->RGBColor[ 0.28240003484173815`, 0.6090799721266095, 0.7538800418100857]], {113., 48.}, Center, Automatic], InsetBox[ StyleBox["\<\"thought\"\>", StripOnInput->False, FontSize->Scaled[0.047942754919499106`], FontColor->RGBColor[0.37977756485605163`, 0.715, 0.3025558265468435]], {31., 126.}, Center, Automatic], InsetBox[ StyleBox["\<\"great\"\>", StripOnInput->False, FontSize->Scaled[0.05884133755332324], FontColor->RGBColor[0.5407932311309059, 0.715, 0.09762679674248334]], {-80., -101.}, Center, Automatic], InsetBox[ StyleBox["\<\"John\"\>", StripOnInput->False, FontSize->Scaled[0.05851107747351039], FontColor->RGBColor[0.47401116530937026`, 0.47809330081437784`, 0.85]], {80., -103.}, Center, Automatic], InsetBox[ StyleBox["\<\"make\"\>", StripOnInput->False, FontSize->Scaled[0.05553873675519471], FontColor->RGBColor[0.7748409210981391, 0.358, 0.4444755060028629]], {94., 96.}, Center, Automatic], InsetBox[ StyleBox["\<\"Ferrars\"\>", StripOnInput->False, FontSize->Scaled[0.0472822347598734], FontColor->RGBColor[ 0.8564488486273256, 0.42032672705901153`, 0.06612212156831418]], {-24., 131.}, Center, Automatic], InsetBox[ StyleBox["\<\"immediately\"\>", StripOnInput->False, FontSize->Scaled[0.03341131140773359], FontColor->RGBColor[ 0.8926354502560807, 0.366046824615879, 0.15658862564020168`]], {53., -123.}, Center, Automatic], InsetBox[ StyleBox["\<\"little\"\>", StripOnInput->False, FontSize->Scaled[0.06247419843126462], FontColor->RGBColor[ 0.8439466852489265, 0.3467106629502147, 0.3309221912517893]], {-61., -121.}, Center, Automatic], InsetBox[ StyleBox["\<\"Middleton\"\>", StripOnInput->False, FontSize->Scaled[0.038365212604926376`], FontColor->RGBColor[0.5019668524892619, 0.46131988850644284`, 0.85]], {-95., 106.}, Center, Automatic], InsetBox[ StyleBox["\<\"acquaintance\"\>", StripOnInput->False, FontSize->Scaled[0.03076923076923077], FontColor->RGBColor[ 0.9107287510704583, 0.33890687339431275`, 0.20182187767614543`]], {75., 112.}, Center, Automatic], InsetBox[ StyleBox["\<\"soon\"\>", StripOnInput->False, FontSize->Scaled[0.06940966010733453], FontColor->RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965]], {-84., 122.}, Center, Automatic], InsetBox[ StyleBox["\<\"Marianne's\"\>", StripOnInput->False, FontSize->Scaled[0.03374157148754644], FontColor->RGBColor[ 0.922066817647527, 0.5213778784316846, 0.08286013588277422]], {86., 124.}, Center, Automatic], InsetBox[ StyleBox["\<\"heart\"\>", StripOnInput->False, FontSize->Scaled[0.05157561579744048], FontColor->RGBColor[0.7678998606330495, 0.7317110956258943, 0.]], {-118., 77.}, Center, Automatic], InsetBox[ StyleBox["\<\"say\"\>", StripOnInput->False, FontSize->Scaled[0.06247419843126462], FontColor->RGBColor[ 0.9324333565611593, 0.5282889043741062, 0.0921900209050434]], {-120., -95.}, Center, Automatic], InsetBox[ StyleBox["\<\"Mr.\"\>", StripOnInput->False, FontSize->Scaled[0.06841887986789597], FontColor->RGBColor[ 0.5833680111493557, 0.4126186601628758, 0.8290799721266107]], {119., -103.}, Center, Automatic], InsetBox[ StyleBox["\<\"indeed\"\>", StripOnInput->False, FontSize->Scaled[0.04265859364249346], FontColor->RGBColor[0.428777913273419, 0.5052332520359486, 0.85]], {-102., -119.}, Center, Automatic], InsetBox[ StyleBox["\<\"replied\"\>", StripOnInput->False, FontSize->Scaled[0.04331911380211917], FontColor->RGBColor[0.6361597700445392, 0.7170733077827265, 0.]], {107., -120.}, Center, Automatic], InsetBox[ StyleBox["\<\"young\"\>", StripOnInput->False, FontSize->Scaled[0.043649373881932026`], FontColor->RGBColor[ 0.23716678280579248`, 0.645266573755366, 0.699600139366951]], {-102., -131.}, Center, Automatic], InsetBox[ StyleBox["\<\"lady\"\>", StripOnInput->False, FontSize->Scaled[0.05520847667538186], FontColor->RGBColor[ 0.16397784358994957`, 0.7038177251280403, 0.6117734123079395]], {-133., 0.}, Center, Automatic], InsetBox[ StyleBox["\<\"away\"\>", StripOnInput->False, FontSize->Scaled[0.04662171460024769], FontColor->RGBColor[0.9810598048862722, 0.7553955338762525, 0.]], {0., -137.}, Center, Automatic], InsetBox[ StyleBox["\<\"shall\"\>", StripOnInput->False, FontSize->Scaled[0.05190587587725334], FontColor->RGBColor[ 0.6184987019729621, 0.39212575718243875`, 0.7412532450675947]], {19., 142.}, Center, Automatic], InsetBox[ StyleBox["\<\"morning\"\>", StripOnInput->False, FontSize->Scaled[0.03704417228567497], FontColor->RGBColor[0.7175796237092107, 0.7261199581899123, 0.]], {-42., -136.}, Center, Automatic], InsetBox[ StyleBox["\<\"happy\"\>", StripOnInput->False, FontSize->Scaled[0.04265859364249346], FontColor->RGBColor[ 0.9038177251280404, 0.3492734123079395, 0.18454431282010084`]], {43., -137.}, Center, Automatic], InsetBox[ StyleBox["\<\"affection\"\>", StripOnInput->False, FontSize->Scaled[0.03572313196642356], FontColor->RGBColor[0.7277983389807635, 0.358, 0.5168487092603637]], {61., 140.}, Center, Automatic], InsetBox[ StyleBox["\<\"happiness\"\>", StripOnInput->False, FontSize->Scaled[0.03142975092885648], FontColor->RGBColor[ 0.8064401951137368, 0.3542119609772526, 0.39343300814377197`]], {-48., 145.}, Center, Automatic], InsetBox[ StyleBox["\<\"present\"\>", StripOnInput->False, FontSize->Scaled[0.03737443236548782], FontColor->RGBColor[ 0.8781534541180211, 0.4921023027453475, 0.04333810870621905]], {85., -136.}, Center, Automatic], InsetBox[ StyleBox["\<\"believe\"\>", StripOnInput->False, FontSize->Scaled[0.03935599284436494], FontColor->RGBColor[ 0.8607200975568693, 0.34335598048862614`, 0.30296650407188447`]], {-128., 93.}, Center, Automatic], InsetBox[ StyleBox["\<\"day\"\>", StripOnInput->False, FontSize->Scaled[0.05685977707444612], FontColor->RGBColor[ 0.9874666782805795, 0.6948333914028977, 0.033839968642435214`]], {134., 0.}, Center, Automatic], InsetBox[ StyleBox["\<\"moment\"\>", StripOnInput->False, FontSize->Scaled[0.038365212604926376`], FontColor->RGBColor[ 0.9930578157165594, 0.7227890785827968, 0.01874389756528967]], {-97., 136.}, Center, Automatic], InsetBox[ StyleBox["\<\"dear\"\>", StripOnInput->False, FontSize->Scaled[0.04860327507912481], FontColor->RGBColor[0.7132613816472081, 0.358, 0.5392132590042952]], {-132., 18.}, Center, Automatic], InsetBox[ StyleBox["\<\"feelings\"\>", StripOnInput->False, FontSize->Scaled[0.03374157148754644], FontColor->RGBColor[ 0.26512246998569167`, 0.6229020240114467, 0.73314696398283]], {130., 108.}, Center, Automatic], InsetBox[ StyleBox["\<\"Barton\"\>", StripOnInput->False, FontSize->Scaled[0.03902573276455209], FontColor->RGBColor[ 0.9492067688690977, 0.5394711792460651, 0.10728609198218791`]], {104., 137.}, Center, Automatic], InsetBox[ StyleBox["\<\"pleasure\"\>", StripOnInput->False, FontSize->Scaled[0.03142975092885648], FontColor->RGBColor[ 0.2198892179497479, 0.6590886256402017, 0.6788670615396974]], {-86., -145.}, Center, Automatic], InsetBox[ StyleBox["\<\"mind\"\>", StripOnInput->False, FontSize->Scaled[0.04265859364249346], FontColor->RGBColor[ 0.9784200278733908, 0.649600139366954, 0.058265924741844846`]], {134., 90.}, Center, Automatic], InsetBox[ StyleBox["\<\"brother\"\>", StripOnInput->False, FontSize->Scaled[0.03341131140773359], FontColor->RGBColor[0.5788038738141875, 0.715, 0.049249615145579635`]], {-129., 119.}, Center, Automatic], InsetBox[ StyleBox["\<\"family\"\>", StripOnInput->False, FontSize->Scaled[0.03704417228567497], FontColor->RGBColor[ 0.6319174318193065, 0.38429816477207124`, 0.7077064204517338]], {133., 121.}, Center, Automatic], InsetBox[ StyleBox["\<\"world\"\>", StripOnInput->False, FontSize->Scaled[0.040346773083803494`], FontColor->RGBColor[0.8493197142977551, 0.7407577460330839, 0.]], {125., -132.}, Center, Automatic], InsetBox[ StyleBox["\<\"subject\"\>", StripOnInput->False, FontSize->Scaled[0.032090271088482177`], FontColor->RGBColor[0.4177882075393331, 0.715, 0.25417864494993975`]], {-10., -151.}, Center, Automatic], InsetBox[ StyleBox["\<\"towards\"\>", StripOnInput->False, FontSize->Scaled[0.03109949084904362], FontColor->RGBColor[0.6672593867853922, 0.7205288207539324, 0.]], {-141., -15.}, Center, Automatic], InsetBox[ StyleBox["\<\"sure\"\>", StripOnInput->False, FontSize->Scaled[0.05454795651575616], FontColor->RGBColor[ 0.8613800418100862, 0.48092002787339083`, 0.02824203762907758]], {34., -152.}, Center, Automatic], InsetBox[ StyleBox["\<\"long\"\>", StripOnInput->False, FontSize->Scaled[0.04331911380211917], FontColor->RGBColor[ 0.6536293927965667, 0.37163285420200276`, 0.6534265180085832]], {147., -20.}, Center, Automatic], InsetBox[ StyleBox["\<\"really\"\>", StripOnInput->False, FontSize->Scaled[0.038034952525113526`], FontColor->RGBColor[ 0.7896667828057927, 0.3575666434388414, 0.4213886953236787]], {141., 62.}, Center, Automatic], InsetBox[ StyleBox["\<\"quite\"\>", StripOnInput->False, FontSize->Scaled[0.040346773083803494`], FontColor->RGBColor[ 0.596786740995709, 0.404791067752503, 0.7955331475107271]], {-138., -73.}, Center, Automatic], InsetBox[ StyleBox["\<\"Palmer\"\>", StripOnInput->False, FontSize->Scaled[0.03109949084904362], FontColor->RGBColor[ 0.6453361616656581, 0.37647057236169945`, 0.6741595958358548]], {-8., 154.}, Center, Automatic], InsetBox[ StyleBox["\<\"cried\"\>", StripOnInput->False, FontSize->Scaled[0.038365212604926376`], FontColor->RGBColor[ 0.8745421494417032, 0.39318677583744527`, 0.11135537360425793`]], {-146., -49.}, Center, Automatic], InsetBox[ StyleBox["\<\"heard\"\>", StripOnInput->False, FontSize->Scaled[0.03539287188661071], FontColor->RGBColor[ 0.845266573755366, 0.437100139366951, 0.03816643438841502]], {-46., -149.}, Center, Automatic], InsetBox[ StyleBox["\<\"better\"\>", StripOnInput->False, FontSize->Scaled[0.03539287188661071], FontColor->RGBColor[0.31827505306025683`, 0.715, 0.3808317506505822]], {140., -74.}, Center, Automatic], InsetBox[ StyleBox["\<\"place\"\>", StripOnInput->False, FontSize->Scaled[0.036053392046236414`], FontColor->RGBColor[ 0.969373377466199, 0.6043668873309952, 0.08269188084126262]], {140., 76.}, Center, Automatic], InsetBox[ StyleBox["\<\"hope\"\>", StripOnInput->False, FontSize->Scaled[0.03869547268473923], FontColor->RGBColor[0.47929071933511125`, 0.715, 0.1759027208462221]], {57., 153.}, Center, Automatic], InsetBox[ StyleBox["\<\"person\"\>", StripOnInput->False, FontSize->Scaled[0.03176001100866933], FontColor->RGBColor[0.529922539669161, 0.44454647619850335`, 0.85]], {71., -150.}, Center, Automatic], InsetBox[ StyleBox["\<\"found\"\>", StripOnInput->False, FontSize->Scaled[0.03308105132792073], FontColor->RGBColor[0.4567336004533182, 0.4884598397280091, 0.85]], {141., -88.}, Center, Automatic], InsetBox[ StyleBox["\<\"man\"\>", StripOnInput->False, FontSize->Scaled[0.04893353515893766], FontColor->RGBColor[ 0.9637822400302223, 0.5764112001511111, 0.0977879519184]], {-90., 149.}, Center, Automatic], InsetBox[ StyleBox["\<\"come\"\>", StripOnInput->False, FontSize->Scaled[0.04331911380211917], FontColor->RGBColor[ 0.9052934053395919, 0.510195603559728, 0.06776406480563275]], {-80., -156.}, Center, Automatic], InsetBox[ StyleBox["\<\"spirits\"\>", StripOnInput->False, FontSize->Scaled[0.03242053116829503], FontColor->RGBColor[0.7989994773739094, 0.735166608597101, 0.]], {88., 152.}, Center, Automatic], InsetBox[ StyleBox["\<\"Sir\"\>", StripOnInput->False, FontSize->Scaled[0.04926379523875052], FontColor->RGBColor[ 0.8878600487784333, 0.33792799024431336`, 0.2577332520359445]], {144., -36.}, Center, Automatic], InsetBox[ StyleBox["\<\"came\"\>", StripOnInput->False, FontSize->Scaled[0.03902573276455209], FontColor->RGBColor[0.6897400905885174, 0.358, 0.5753998606330502]], {-142., -109.}, Center, Automatic], InsetBox[ StyleBox["\<\"hardly\"\>", StripOnInput->False, FontSize->Scaled[0.03109949084904362], FontColor->RGBColor[ 0.8949268664259606, 0.5032845776173072, 0.05843417978336459]], {104., -149.}, Center, Automatic], InsetBox[ StyleBox["\<\"woman\"\>", StripOnInput->False, FontSize->Scaled[0.032090271088482177`], FontColor->RGBColor[ 0.8633598745697435, 0.40996018814538476`, 0.08339968642435877]], {9., -23.}, Center, Automatic], InsetBox[ StyleBox["\<\"town\"\>", StripOnInput->False, FontSize->Scaled[0.038034952525113526`], FontColor->RGBColor[ 0.19193353076984873`, 0.681453175384121, 0.6453202369238185]], {-146., 53.}, Center, Automatic], InsetBox[ StyleBox["\<\"kind\"\>", StripOnInput->False, FontSize->Scaled[0.0410072932434292], FontColor->RGBColor[ 0.8342400905885153, 0.4628267270590103, 0.0038160815296638794`]], {148., -51.}, Center, Automatic], InsetBox[ StyleBox["\<\"gave\"\>", StripOnInput->False, FontSize->Scaled[0.03308105132792073], FontColor->RGBColor[ 0.9840111653093676, 0.677555826546838, 0.04316985366470745]], {148., 38.}, Center, Automatic], InsetBox[ StyleBox["\<\"letter\"\>", StripOnInput->False, FontSize->Scaled[0.03440209164717215], FontColor->RGBColor[0.9307395679624266, 0.7498043964402695, 0.]], {-139., -123.}, Center, Automatic], InsetBox[ StyleBox["\<\"saw\"\>", StripOnInput->False, FontSize->Scaled[0.04695197468006054], FontColor->RGBColor[0.5472001045252132, 0.43417993728487203`, 0.85]], {-137., 132.}, Center, Automatic], InsetBox[ StyleBox["\<\"left\"\>", StripOnInput->False, FontSize->Scaled[0.04199807348286776], FontColor->RGBColor[0.7513196300394465, 0.358, 0.48066210763162087`]], {148., 13.}, Center, Automatic], InsetBox[ StyleBox["\<\"room\"\>", StripOnInput->False, FontSize->Scaled[0.04199807348286776], FontColor->RGBColor[0.2187618985811806, 0.715, 0.5074848563512248]], {-124., -145.}, Center, Automatic], InsetBox[ StyleBox["\<\"felt\"\>", StripOnInput->False, FontSize->Scaled[0.04464015412137058], FontColor->RGBColor[ 0.8168067340273636, 0.3521386531945273, 0.3761554432877274]], {-150., -90.}, Center, Automatic], InsetBox[ StyleBox["\<\"home\"\>", StripOnInput->False, FontSize->Scaled[0.03242053116829503], FontColor->RGBColor[ 0.8510135028964549, 0.47400900193096995`, 0.018912152606809424`]], {-139., 106.}, Center, Automatic], InsetBox[ StyleBox["\<\"wish\"\>", StripOnInput->False, FontSize->Scaled[0.03374157148754644], FontColor->RGBColor[ 0.6670481226429111, 0.3638052617916352, 0.6198796933927223]], {148., -102.}, Center, Automatic], InsetBox[ StyleBox["\<\"poor\"\>", StripOnInput->False, FontSize->Scaled[0.03308105132792073], FontColor->RGBColor[0.7658565873730018, 0.358, 0.4582975578876895]], {-149., 32.}, Center, Automatic], InsetBox[ StyleBox["\<\"way\"\>", StripOnInput->False, FontSize->Scaled[0.034071831567359295`], FontColor->RGBColor[ 0.8335801463353031, 0.3487839707329394, 0.3481997561078282]], {53., -48.}, Center, Automatic], InsetBox[ StyleBox["\<\"love\"\>", StripOnInput->False, FontSize->Scaled[0.034732351726985], FontColor->RGBColor[ 0.5750747800184488, 0.4174563783225715, 0.8498130499538777]], {-150., 65.}, Center, Automatic], InsetBox[ StyleBox["\<\"hear\"\>", StripOnInput->False, FontSize->Scaled[0.03275079124810788], FontColor->RGBColor[0.15725938678540247`, 0.715, 0.5857607804549424]], {147., -114.}, Center, Automatic], InsetBox[ StyleBox["\<\"tell\"\>", StripOnInput->False, FontSize->Scaled[0.03935599284436494], FontColor->RGBColor[ 0.3103557220216354, 0.5867154223826917, 0.7874268664259625]], {-149., -28.}, Center, Automatic], InsetBox[ StyleBox["\<\"just\"\>", StripOnInput->False, FontSize->Scaled[0.032090271088482177`], FontColor->RGBColor[ 0.9603267270590103, 0.5591336352950514, 0.10711783694067224`]], {-117., 146.}, Center, Automatic], InsetBox[ StyleBox["\<\"look\"\>", StripOnInput->False, FontSize->Scaled[0.032090271088482177`], FontColor->RGBColor[0.7042770479220728, 0.358, 0.5530353108891188]], {114., 149.}, Center, Automatic], InsetBox[ StyleBox["\<\"feel\"\>", StripOnInput->False, FontSize->Scaled[0.03142975092885648], FontColor->RGBColor[ 0.9986489531525362, 0.7507447657626809, 0.0036478264881522893`]], {-148., 76.}, Center, Automatic], InsetBox[ StyleBox["\<\"like\"\>", StripOnInput->False, FontSize->Scaled[0.036053392046236414`], FontColor->RGBColor[0.38354466123747527`, 0.5323732032575149, 0.85]], {135., 134.}, Center, Automatic], InsetBox[ StyleBox["\<\"told\"\>", StripOnInput->False, FontSize->Scaled[0.03242053116829503], FontColor->RGBColor[ 0.8774935098648088, 0.34000129802703827`, 0.2750108168919853]], {130., -145.}, Center, Automatic], InsetBox[ StyleBox["\<\"Oh\"\>", StripOnInput->False, FontSize->Scaled[0.03242053116829503], FontColor->RGBColor[ 0.6102054708420535, 0.39696347534213544`, 0.7619863228948663]], {-136., 143.}, Center, Automatic], InsetBox[ StyleBox["\<\"till\"\>", StripOnInput->False, FontSize->Scaled[0.03704417228567497], FontColor->RGBColor[ 0.9046334610863751, 0.334573307782725, 0.22977756485604156`]], {150., -127.}, Center, Automatic], InsetBox[ StyleBox["\<\"far\"\>", StripOnInput->False, FontSize->Scaled[0.032090271088482177`], FontColor->RGBColor[ 0.3383114092015346, 0.5643508726387724, 0.8209736910418415]], {-34., 155.}, Center, Automatic]}, DefaultBaseStyle->{ "Graphics", FontFamily -> "Helvetica", FontWeight -> Plain, FontTracking -> "Plain", FontSlant -> Plain, FontVariations -> {}}, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}, PlotRange->{{-162.5, 162.5}, {-162.5, 161.5}}]], "Output", CellChangeTimes->{3.683655768354639*^9}] }, Open ]] }, Open ]] }, ClosingSaveDialog->False, WindowSize->{775, 873}, WindowMargins->{{136, Automatic}, {Automatic, 0}}, WindowTitle->"Examples for Sense and Sensibility", Visible->True, DockedCells->{}, TaggingRules->{"NotebookTemplateVersion" -> 1.}, CellContext->Notebook, ShowCellTags->True, Background->GrayLevel[0.9999], FrontEndVersion->"13.2 for Mac OS X x86 (64-bit) (November 18, 2022)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[628, 23, 36, 0, 70, "Subsection",ExpressionUUID->"dd388b27-9217-4d07-9f77-bce37877ad1b"], Cell[667, 25, 215, 3, 70, "Text",ExpressionUUID->"58c2e2bf-94f4-465a-aba0-2c22e0803240"], Cell[CellGroupData[{ Cell[907, 32, 221, 4, 70, "Input",ExpressionUUID->"ce035ad8-4fba-46aa-9d4e-496dcddddae2"], Cell[1131, 38, 14409, 321, 70, "Output",ExpressionUUID->"f052ef91-3590-4625-ad56-cd6e7121da37"] }, Open ]], Cell[15555, 362, 204, 3, 70, "Text",ExpressionUUID->"1bd24bf5-901d-4a50-b5b6-b7fabce587bd"], Cell[CellGroupData[{ Cell[15784, 369, 396, 9, 70, "Input",ExpressionUUID->"0dd67855-2aa7-4cda-b73a-e16869452c8c"], Cell[16183, 380, 588, 8, 70, "Output",ExpressionUUID->"6b5d539d-b45c-431d-9468-bc9b14dbb05f"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[16820, 394, 35, 0, 70, "Subsection",ExpressionUUID->"8d024f67-03fa-4993-8412-cb493a0d5179"], Cell[16858, 396, 233, 3, 70, "Text",ExpressionUUID->"5f9416c5-4c32-4a1e-acaa-c958eb0eba61"], Cell[CellGroupData[{ Cell[17116, 403, 480, 11, 70, "Input",ExpressionUUID->"a52ea5e5-740d-44ba-b7c1-8f30e3519589"], Cell[17599, 416, 51350, 1286, 70, "Output",ExpressionUUID->"5f181d28-ab20-4a8e-b02b-98eec20c3536"] }, Open ]], Cell[68964, 1705, 103, 1, 70, "Text",ExpressionUUID->"8c9d72f9-0759-42f3-9dc6-af283a503c98"], Cell[CellGroupData[{ Cell[69092, 1710, 291, 6, 70, "Input",ExpressionUUID->"d203246d-7af2-4724-bdd3-44ab8dbac6da"], Cell[69386, 1718, 23671, 563, 70, "Output",ExpressionUUID->"490f1949-c2ba-4687-a546-483acecf68f9"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)