Notebook[{Cell[ CellGroupData[{Cell[ "\","Subsection"],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.6821849447840075*^9,3.682184951647694*^9},{3.6821850182913575*^9,3.6821850462121496*^9},{3.6821850885233803*^9,3.68218509051958*^9}}, ExpressionUUID->"64bbe878-7584-43fb-8877-3f7984b44a71"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"ResourceObject","[","\"The Waste Land\"","]"}]],"Input",CellChangeTimes->{{3.6804517731799183*^9,3.6804517885604563*^9},{3.6804527318597765*^9,3.6804527390684977*^9}}, ExpressionUUID->"1340a543-348d-47db-91cd-1d19f4eb2d8f"],Cell[ BoxData[InterpretationBox[ RowBox[{TagBox["ResourceObject","SummaryHead"],"[",DynamicModuleBox[{Set[Typeset`open$$, False]},PanelBox[PaneSelectorBox[{False->GridBox[{{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps","SquarePlusIconMedium"],ImageSizeCache->{12.,{0.,12.}}],Appearance->None, RuleDelayed[ButtonFunction,Set[Typeset`open$$,True]],Evaluator->Automatic,Method->"Preemptive"], Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[3.5,CurrentValue["FontCapHeight"], Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[{{{{Thickness[0.011111111111111112],{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}}},{{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}}},{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"The Waste Land\"","SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Plaintext for T. S. Eliot's \\\"The Waste Land\\\"\"","SummaryItem"]}]}},AutoDelete->False, BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}],True->GridBox[ {{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource["FEBitmaps","SquareMinusIconMedium"]], Appearance->None,RuleDelayed[ButtonFunction,Set[Typeset`open$$,False]],Evaluator->Automatic, Method->"Preemptive"],Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[ 3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[ {{{{Thickness[0.011111111111111112],{{{{FaceForm[{RGBColor[0.648987,0.648987,0.648987],Opacity[ 1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}},{{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}}},{{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}}},{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"The Waste Land\"","SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Plaintext for T. S. Eliot's \\\"The Waste Land\\\"\"","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\"","\"poem\""},"RowWithSeparators"],Short],"SummaryItem"]}]},{RowBox[ {TagBox["\"Data Location: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ DynamicModuleBox[{Set[DataResource`Private`typesetstorage$$,DataResource`Private`typesetstorageLocation],DataResource`Private`info$$}, DynamicBox[ToBoxes[CompoundExpression[Set[DataResource`Private`info$$,DataResource`Private`resourceInfo[ "5acf8ea8-b002-4f0d-970f-747b5f7e4c63"]],If[AssociationQ[DataResource`Private`info$$], DataResource`Private`typesetstorage$$[Lookup[DataResource`Private`info$$,"ContentElementLocations", None]],Missing["NotAvailable"]]],StandardForm]],RuleDelayed[DynamicModuleValues,{}]], "SummaryItem"]}]},{RowBox[{TagBox["\"UUID: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"5acf8ea8-b002-4f0d-970f-747b5f7e4c63\"","SummaryItem"]}]},{RowBox[{TagBox["\"Version: \"", "SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox["\"1.0.0\"","SummaryItem"]}]},{RowBox[ {TagBox["\"Size: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[RowBox[{"\\[LeftAssociation]",RowBox[ {"\"Plaintext\"","\[Rule]","20520"}],"\\[RightAssociation]"}],"SummaryItem"]}]},{RowBox[ {TagBox["\"Elements: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ TemplateBox[{",","\",\"","\"Plaintext\""},"RowWithSeparators"],Function[Short[Slot[ 1],2]]],"SummaryItem"]}]}},AutoDelete->False,BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}]}, Dynamic[Typeset`open$$],ImageSize->Automatic],BaselinePosition->Baseline],RuleDelayed[ DynamicModuleValues,{}]],"]"}],ResourceObject[Association["Name"->"The Waste Land", "UUID"->"5acf8ea8-b002-4f0d-970f-747b5f7e4c63","ResourceType"->"DataResource","Version"->"1.0.0", "Description"->"Plaintext for T. S. Eliot's \"The Waste Land\"","ContentSize"->Association[ "Plaintext"->20520],"ContentElements"->{"Plaintext"}]],Editable->False,SelectWithContents->True, Selectable->False]],"Output",CellChangeTimes->{3.6884754853716707*^9},ExpressionUUID->"1f8736ac-a5df-4faa-968d-1e4054ebac33"]}, Open]]},Open]],Cell[ CellGroupData[{Cell[ "\","Text",CellChangeTimes->{{3.682184974529982*^9,3.6821849772962584*^9},{3.6821850234008684*^9,3.6821850240499334*^9},{3.6821850586563935*^9,3.6821850629428225*^9}}, ExpressionUUID->"6f40383c-5ccb-4fdd-ae57-a431e53edb6d"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"TextSentences","[",RowBox[{RowBox[{"ResourceData","[","\"The Waste Land\"","]"}],",","10"}],"]"}]], "Input",CellChangeTimes->{3.6884755132698097*^9,{3.701361910412228*^9,3.7013619450545597*^9}}, ExpressionUUID->"a4b21f6d-eded-47fe-a0b3-eef694a1b41e"],Cell[ BoxData[RowBox[{"{",RowBox[ {"\"THE WASTE LAND\"",",","\"By T.\"",",","\"S.\"",",","\"Eliot\"",",","\"\\\"Nam Sibyllam quidem Cumis ego ipse oculis meis\\n vidi in ampulla pendere, et cum illi pueri dicerent:\\n Sibylla ti theleis; respondebat illa: apothanein thelo.\\\"\"",",","\"I.\"",",","\"THE BURIAL OF THE DEAD\"",",","\"April is the cruellest month, breeding\\n Lilacs out of the dead land, mixing\\n Memory and desire, stirring\\n Dull roots with spring rain.\"",",","\"Winter kept us warm, covering\\n Earth in forgetful snow, feeding\\n A little life with dried tubers.\"",",","\"Summer surprised us, coming over the Starnbergersee\\n With a shower of rain; we stopped in the colonnade,\\n And went on in sunlight, into the Hofgarten, 10\\n And drank coffee, and talked for an hour.\""}],"}"}]], "Output",CellChangeTimes->{{3.6884754869297037*^9,3.688475559814478*^9},3.70136188073625*^9,{3.70136191700362*^9,3.701361945394719*^9}}, ExpressionUUID->"33382749-dd7c-41d5-a349-e683fd6e905f"]},Open]]},Open]]},Open]],Cell[ CellGroupData[ {Cell[ "\","Subsection"],Cell[ CellGroupData[{Cell[ "\", "Text",CellChangeTimes->{{3.682184974529982*^9,3.6821849772962584*^9},{3.6821850234008684*^9,3.6821850240499334*^9},{3.6821850586563935*^9,3.6821850629428225*^9},{3.6833729230254655*^9,3.6833729249134655*^9}}, ExpressionUUID->"1fd364c1-cfa7-46c0-b3e5-1a4834dc3844"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"WordCloud","[",RowBox[{"DeleteStopwords","[",RowBox[{"ResourceData","[","\"The Waste Land\"","]"}],"]"}],"]"}]], "Input",CellChangeTimes->{{3.683032640005966*^9,3.6830326503422127*^9},3.683035633524098*^9,3.6884755939805403*^9}, ExpressionUUID->"d8bbeee5-3965-40f6-b548-5083993f553e"],Cell[ BoxData[GraphicsBox[ {{InsetBox[StyleBox["\"said\"",StripOnInput->False,FontSize->Scaled[0.22435897435897434], FontColor->RGBColor[0.368417,0.506779,0.709798]],{0,0},Center,Automatic],InsetBox[ StyleBox["\"water\"",StripOnInput->False,FontSize->Scaled[0.1987179487179487],FontColor->RGBColor[ 0.880722,0.611041,0.142051]],{4.5,-47.5},Center,Automatic],InsetBox[StyleBox["\"mountains\"", StripOnInput->False,FontSize->Scaled[0.09615384615384615],FontColor->RGBColor[0.647624, 0.37816,0.614037]],{-0.5,45.5},Center,Automatic],InsetBox[StyleBox["\"DEAD\"",StripOnInput->False, FontSize->Scaled[0.12179487179487179],FontColor->RGBColor[0.528488,0.470624,0.701351]], {-16.5,71.5},Center,Automatic],InsetBox[StyleBox["\"rock\"",StripOnInput->False,FontSize->Scaled[ 0.1346153846153846],FontColor->RGBColor[0.922526,0.385626,0.209179]],{-0.5,-87.5}, Center,Automatic],InsetBox[StyleBox["\"time\"",StripOnInput->False,FontSize->Scaled[ 0.12179487179487179],FontColor->RGBColor[0.772079,0.431554,0.102387]],{75.5,68.5}, Center,Automatic],InsetBox[StyleBox["\"Goonight\"",StripOnInput->False,FontSize->Scaled[ 0.07051282051282051],FontColor->RGBColor[0.28026441037696703,0.715,0.4292089322474965]], {18.5,98.5},Center,Automatic],InsetBox[StyleBox["\"shall\"",StripOnInput->False,FontSize->Scaled[ 0.09615384615384615],FontColor->RGBColor[0.571589,0.586483,0.]],{94.5,0.5},Center, Automatic],InsetBox[StyleBox["\"night\"",StripOnInput->False,FontSize->Scaled[0.08333333333333333], FontColor->RGBColor[0.40082222609352647,0.5220066643438841,0.85]],{-93.5,4.5},Center, Automatic],InsetBox[StyleBox["\"O\"",StripOnInput->False,FontSize->Scaled[0.14743589743589744], FontColor->RGBColor[0.560181,0.691569,0.194885]],{-88.5,33.5},Center,Automatic],InsetBox[ StyleBox["\"eyes\"",StripOnInput->False,FontSize->Scaled[0.08333333333333333],FontColor->RGBColor[ 0.915,0.3325,0.2125]],{-68.5,-74.5},Center,Automatic],InsetBox[StyleBox["\"Jug\"", StripOnInput->False,FontSize->Scaled[0.09615384615384615],FontColor->RGBColor[0.363898, 0.618501,0.782349]],{93.5,33.5},Center,Automatic],InsetBox[StyleBox["\"sound\"",StripOnInput->False, FontSize->Scaled[0.07051282051282051],FontColor->RGBColor[0.8439466852489265,0.3467106629502147, 0.3309221912517893]],{-94.5,-18.5},Center,Automatic],InsetBox[StyleBox["\"PLEASE\"", StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.16397784358994957, 0.7038177251280403,0.6117734123079395]],{76.5,-77.5},Center,Automatic],InsetBox[StyleBox[ "\"know\"",StripOnInput->False,FontSize->Scaled[0.07051282051282051],FontColor->RGBColor[ 0.838355547812947,0.44746667828057946,0.0208888695323676]],{-100.5,-39.5},Center, Automatic],InsetBox[StyleBox["\"HURRY\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769], FontColor->RGBColor[0.7748409210981391,0.358,0.4444755060028629]],{97.5,-20.5},Center, Automatic],InsetBox[StyleBox["\"THUNDER\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.19193353076984873,0.681453175384121,0.6453202369238185]],{-0.5,-110.5}, Center,Automatic],InsetBox[StyleBox["\"Look\"",StripOnInput->False,FontSize->Scaled[ 0.07051282051282051],FontColor->RGBColor[0.5833680111493557,0.4126186601628758,0.8290799721266107]], {95.5,-55.5},Center,Automatic],InsetBox[StyleBox["\"Burning\"",StripOnInput->False, FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.6753413537738198,0.3589675436319385, 0.5991466155654507]],{-59.5,100.5},Center,Automatic],InsetBox[StyleBox["\"man\"", StripOnInput->False,FontSize->Scaled[0.09615384615384615],FontColor->RGBColor[1,0.75, 0]],{71.5,-94.5},Center,Automatic],InsetBox[StyleBox["\"Speak\"",StripOnInput->False, FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.6184987019729621,0.39212575718243875, 0.7412532450675947]],{-97.5,64.5},Center,Automatic],InsetBox[StyleBox["\"broken\"", StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.9324333565611593, 0.5282889043741062,0.0921900209050434]],{-68.5,-96.5},Center,Automatic],InsetBox[ StyleBox["\"Winter\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[ 0.9637822400302223,0.5764112001511111,0.0977879519184]],{-0.5,117.5},Center,Automatic],InsetBox[ StyleBox["\"Street\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[ 0.7678998606330495,0.7317110956258943,0.]],{91.5,87.5},Center,Automatic],InsetBox[ StyleBox["\"City\"",StripOnInput->False,FontSize->Scaled[0.07051282051282051],FontColor->RGBColor[ 0.9728288904374106,0.621644452187053,0.07336199581899142]],{-112.5,-59.5},Center, Automatic],InsetBox[StyleBox["\"departed\"",StripOnInput->False,FontSize->Scaled[ 0.04487179487179487],FontColor->RGBColor[0.23716678280579248,0.645266573755366,0.699600139366951]], {-0.5,-124.5},Center,Automatic],InsetBox[StyleBox["\"bones\"",StripOnInput->False, FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.28240003484173815,0.6090799721266095, 0.7538800418100857]],{-95.5,82.5},Center,Automatic],InsetBox[StyleBox["\"Thames\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.9930578157165594, 0.7227890785827968,0.01874389756528967]],{-54.5,115.5},Center,Automatic],InsetBox[ StyleBox["\"Think\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[ 0.8878600487784333,0.33792799024431336,0.2577332520359445]],{-57.5,-114.5},Center, Automatic],InsetBox[StyleBox["\"thinking\"",StripOnInput->False,FontSize->Scaled[ 0.04487179487179487],FontColor->RGBColor[0.7896667828057927,0.3575666434388414,0.4213886953236787]], {54.5,117.5},Center,Automatic],InsetBox[StyleBox["\"shadow\"",StripOnInput->False, FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.9492067688690977,0.5394711792460651, 0.10728609198218791]],{60.5,-114.5},Center,Automatic],InsetBox[StyleBox["\"London\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.8493197142977551, 0.7407577460330839,0.]],{104.5,103.5},Center,Automatic],InsetBox[StyleBox["\"Wind\"", StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.35558897405758294, 0.5505288207539337,0.8417067688690995]],{-104.5,-113.5},Center,Automatic],InsetBox[ StyleBox["\"dry\"",StripOnInput->False,FontSize->Scaled[0.07051282051282051],FontColor->RGBColor[ 0.736782672705901,0.358,0.5030266573755369]],{-114.5,-80.5},Center,Automatic],InsetBox[ StyleBox["\"good\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[ 0.47401116530937026,0.47809330081437784,0.85]],{111.5,-33.5},Center,Automatic],InsetBox[ StyleBox["\"red\"",StripOnInput->False,FontSize->Scaled[0.07051282051282051],FontColor->RGBColor[ 0.8996399512215667,0.7463488834690629,0.]],{-108.5,100.5},Center,Automatic],InsetBox[ StyleBox["\"silence\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.6897400905885174,0.358,0.5753998606330502]],{103.5,118.5},Center, Automatic],InsetBox[StyleBox["\"year\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769], FontColor->RGBColor[0.7132613816472081,0.358,0.5392132590042952]],{106.5,-111.5}, Center,Automatic],InsetBox[StyleBox["\"Falling\"",StripOnInput->False,FontSize->Scaled[ 0.04487179487179487],FontColor->RGBColor[0.6361597700445392,0.7170733077827265,0.]], {-104.5,121.5},Center,Automatic],InsetBox[StyleBox["\"drop\"",StripOnInput->False, FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.5407932311309059,0.715, 0.09762679674248334]],{3.5,134.5},Center,Automatic],InsetBox[StyleBox["\"feet\"", StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.8857244243136628, 0.3764133635295058,0.1393110607841571]],{-123.5,25.5},Center,Automatic],InsetBox[ StyleBox["\"Albert\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.8564488486273256,0.42032672705901153,0.06612212156831418]],{-48.5,129.5},Center, Automatic],InsetBox[StyleBox["\"spring\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.8745421494417032,0.39318677583744527,0.11135537360425793]], {-49.5,-129.5},Center,Automatic],InsetBox[StyleBox["\"brown\"",StripOnInput->False, FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.5472001045252132,0.43417993728487203, 0.85]],{49.5,-128.5},Center,Automatic],InsetBox[StyleBox["\"White\"",StripOnInput->False, FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.7175796237092107,0.7261199581899123, 0.]],{42.5,132.5},Center,Automatic],InsetBox[StyleBox["\"hair\"",StripOnInput->False, FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[0.9874666782805795,0.6948333914028977, 0.033839968642435214]],{-123.5,43.5},Center,Automatic],InsetBox[StyleBox["\"empty\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.6536293927965667, 0.37163285420200276,0.6534265180085832]],{121.5,-89.5},Center,Automatic],InsetBox[ StyleBox["\"violet\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.6319174318193065,0.38429816477207124,0.7077064204517338]],{124.5,48.5},Center,Automatic],InsetBox[ StyleBox["\"home\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.428777913273419,0.5052332520359486,0.85]],{80.5,133.5},Center,Automatic],InsetBox[ StyleBox["\"death\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.8168067340273636,0.3521386531945273,0.3761554432877274]],{89.5,-128.5},Center,Automatic],InsetBox[ StyleBox["\"rain\"",StripOnInput->False,FontSize->Scaled[0.05769230769230769],FontColor->RGBColor[ 0.8613800418100862,0.48092002787339083,0.02824203762907758]],{128.5,64.5},Center, Automatic],InsetBox[StyleBox["\"softly\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.47929071933511125,0.715,0.1759027208462221]],{-88.5,-129.5}, Center,Automatic],InsetBox[StyleBox["\"sweet\"",StripOnInput->False,FontSize->Scaled[ 0.04487179487179487],FontColor->RGBColor[0.5019668524892619,0.46131988850644284,0.85]], {-87.5,136.5},Center,Automatic],InsetBox[StyleBox["\"heart\"",StripOnInput->False, FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.9038177251280404,0.3492734123079395, 0.18454431282010084]],{117.5,130.5},Center,Automatic],InsetBox[StyleBox["\"Turn\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.8781534541180211, 0.4921023027453475,0.04333810870621905]],{-127.5,-94.5},Center,Automatic],InsetBox[ StyleBox["\"woman\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.9046334610863751,0.334573307782725,0.22977756485604156]],{-0.5,-138.5},Center,Automatic],InsetBox[ StyleBox["\"hour\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.9784200278733908,0.649600139366954,0.058265924741844846]],{128.5,-71.5},Center, Automatic],InsetBox[StyleBox["\"door\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.9052934053395919,0.510195603559728,0.06776406480563275]],{-122.5,-125.5}, Center,Automatic],InsetBox[StyleBox["\"Tiresias\"",StripOnInput->False,FontSize->Scaled[ 0.03205128205128205],FontColor->RGBColor[0.2198892179497479,0.6590886256402017,0.6788670615396974]], {-125.5,-138.5},Center,Automatic],InsetBox[StyleBox["\"Line\"",StripOnInput->False, FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.596786740995709,0.404791067752503, 0.7955331475107271]],{123.5,-127.5},Center,Automatic],InsetBox[StyleBox["\"King\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.7513196300394465, 0.358,0.48066210763162087]],{133.5,21.5},Center,Automatic],InsetBox[StyleBox["\"window\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.9107287510704583, 0.33890687339431275,0.20182187767614543]],{-33.5,142.5},Center,Automatic],InsetBox[ StyleBox["\"evening\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205], FontColor->RGBColor[0.9307395679624266,0.7498043964402695,0.]],{42.5,-141.5},Center, Automatic],InsetBox[StyleBox["\"Shantih\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205], FontColor->RGBColor[0.529922539669161,0.44454647619850335,0.85]],{15.5,146.5},Center, Automatic],InsetBox[StyleBox["\"light\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487], FontColor->RGBColor[0.8342400905885153,0.4628267270590103,0.0038160815296638794]], {-136.5,0.5},Center,Automatic],InsetBox[StyleBox["\"Spread\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.8064401951137368,0.3542119609772526, 0.39343300814377197]],{-41.5,-144.5},Center,Automatic],InsetBox[StyleBox["\"singing\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.9986489531525362, 0.7507447657626809,0.0036478264881522893]],{134.5,81.5},Center,Automatic],InsetBox[ StyleBox["\"Beside\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.7277983389807635,0.358,0.5168487092603637]],{137.5,-47.5},Center,Automatic],InsetBox[ StyleBox["\"people\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.9603267270590103,0.5591336352950514,0.10711783694067224]],{50.5,147.5},Center,Automatic],InsetBox[ StyleBox["\"Unreal\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.6672593867853922,0.7205288207539324,0.]],{-137.5,78.5},Center,Automatic],InsetBox[ StyleBox["\"Prison\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.7042770479220728,0.358,0.5530353108891188]],{-139.5,58.5},Center,Automatic],InsetBox[ StyleBox["\"Editor\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.5750747800184488,0.4174563783225715,0.8498130499538777]],{76.5,-141.5},Center,Automatic],InsetBox[ StyleBox["\"LAND\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.7658565873730018,0.358,0.4582975578876895]],{140.5,0.5},Center,Automatic],InsetBox[ StyleBox["\"hands\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.6670481226429111,0.3638052617916352,0.6198796933927223]],{-74.5,-142.5},Center, Automatic],InsetBox[StyleBox["\"towers\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205], FontColor->RGBColor[0.8949268664259606,0.5032845776173072,0.05843417978336459]],{-32.5,27.5}, Center,Automatic],InsetBox[StyleBox["\"Living\"",StripOnInput->False,FontSize->Scaled[ 0.03205128205128205],FontColor->RGBColor[0.6102054708420535,0.39696347534213544,0.7619863228948663]], {-140.5,-15.5},Center,Automatic],InsetBox[StyleBox["\"faces\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.8335801463353031,0.3487839707329394, 0.3481997561078282]],{-140.5,-27.5},Center,Automatic],InsetBox[StyleBox["\"glass\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.922066817647527, 0.5213778784316846,0.08286013588277422]],{-141.5,-39.5},Center,Automatic],InsetBox[ StyleBox["\"gave\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.26512246998569167,0.6229020240114467,0.73314696398283]],{36.5,26.5},Center,Automatic],InsetBox[ StyleBox["\"Co\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.9810598048862722,0.7553955338762525,0.]],{-78.5,-55.5},Center,Automatic],InsetBox[ StyleBox["\"sat\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.8607200975568693,0.34335598048862614,0.30296650407188447]],{141.5,-11.5},Center, Automatic],InsetBox[StyleBox["\"hear\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205], FontColor->RGBColor[0.5788038738141875,0.715,0.049249615145579635]],{132.5,-58.5}, Center,Automatic],InsetBox[StyleBox["\"bring\"",StripOnInput->False,FontSize->Scaled[ 0.03205128205128205],FontColor->RGBColor[0.31827505306025683,0.715,0.3808317506505822]], {-68.5,148.5},Center,Automatic],InsetBox[StyleBox["\"air\"",StripOnInput->False,FontSize->Scaled[ 0.04487179487179487],FontColor->RGBColor[0.37977756485605163,0.715,0.3025558265468435]], {142.5,-26.5},Center,Automatic],InsetBox[StyleBox["\"Twit\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.6453361616656581,0.37647057236169945, 0.6741595958358548]],{-0.5,26.5},Center,Automatic],InsetBox[StyleBox["\"road\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.4177882075393331,0.715, 0.25417864494993975]],{137.5,35.5},Center,Automatic],InsetBox[StyleBox["\"Mrs.\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.3383114092015346, 0.5643508726387724,0.8209736910418415]],{-140.5,-67.5},Center,Automatic],InsetBox[ StyleBox["\"sea\"",StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[ 0.3103557220216354,0.5867154223826917,0.7874268664259625]],{-137.5,91.5},Center,Automatic],InsetBox[ StyleBox["\"long\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.7989994773739094,0.735166608597101,0.]],{77.5,146.5},Center,Automatic],InsetBox[ StyleBox["\"kept\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.4567336004533182,0.4884598397280091,0.85]],{139.5,95.5},Center,Automatic],InsetBox[ StyleBox["\"little\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.8510135028964549,0.47400900193096995,0.018912152606809424]],{-143.5,-53.5},Center, Automatic],InsetBox[StyleBox["\"low\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205], FontColor->RGBColor[0.8774935098648088,0.34000129802703827,0.2750108168919853]],{-59.5,25.5}, Center,Automatic],InsetBox[StyleBox["\"bed\"",StripOnInput->False,FontSize->Scaled[ 0.03205128205128205],FontColor->RGBColor[0.969373377466199,0.6043668873309952,0.08269188084126262]], {-135.5,102.5},Center,Automatic],InsetBox[StyleBox["\"bad\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.38354466123747527,0.5323732032575149, 0.85]],{136.5,-104.5},Center,Automatic],InsetBox[StyleBox["\"key\"",StripOnInput->False, FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.9840111653093676,0.677555826546838, 0.04316985366470745]],{-135.5,-105.5},Center,Automatic],InsetBox[StyleBox["\"like\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.15725938678540247, 0.715,0.5857607804549424]],{-140.5,-78.5},Center,Automatic],InsetBox[StyleBox["\"la\"", StripOnInput->False,FontSize->Scaled[0.04487179487179487],FontColor->RGBColor[0.2187618985811806, 0.715,0.5074848563512248]],{-146.5,15.5},Center,Automatic],InsetBox[StyleBox["\"hot\"", StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[0.8926354502560807, 0.366046824615879,0.15658862564020168]],{-89.5,147.5},Center,Automatic],InsetBox[ StyleBox["\"DA\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.845266573755366,0.437100139366951,0.03816643438841502]],{97.5,143.5},Center,Automatic],InsetBox[ StyleBox["\"run\"",StripOnInput->False,FontSize->Scaled[0.03205128205128205],FontColor->RGBColor[ 0.8633598745697435,0.40996018814538476,0.08339968642435877]],{93.5,48.5},Center,Automatic]}}, DefaultBaseStyle->{"Graphics",FontFamily->"Helvetica"},Method->{"DefaultBoundaryStyle"->Automatic,"DefaultPlotStyle"->Automatic}, PlotRange->{{-156.,156.},{-152.,156.}}]],"Output",CellChangeTimes->{3.6830326595133963*^9,3.6830453855936227*^9,3.6884755982609673*^9,3.7013618884530163*^9}, ExpressionUUID->"6747c29c-e5c2-4639-86c9-29b79cc66f8a"]},Open]]},Open]],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.682184974529982*^9,3.6821849772962584*^9},{3.6821850234008684*^9,3.6821850240499334*^9},{3.6821850586563935*^9,3.6821850629428225*^9},{3.6833729230254655*^9,3.6833729249134655*^9},{3.6833743418977623*^9,3.683374346568762*^9},{3.688475672599289*^9,3.6884756739819803*^9}}, ExpressionUUID->"373d721b-7292-49a3-a9e5-03f352277679"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"BarChart","[",RowBox[{RowBox[{RowBox[{"TakeLargest","[",RowBox[{RowBox[{"Counts","[",RowBox[ {"TextCases","[",RowBox[{RowBox[{"ResourceData","[","\"The Waste Land\"","]"}],",","\"Adjective\""}],"]"}],"]"}],",","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.6884756390597353*^9,3.6884756586553164*^9}}, ExpressionUUID->"b7bd50d9-2f0a-4ade-8590-60bbf19f669d"],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}, {2.,1.4078023943855786},"RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,111.99872448979593},{78.17077113534054,86.41902593073728}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"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},{2.,2.4078023943855786}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,111.99872448979593},{68.67075973022023,76.91901452561697}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"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},{2.,3.4078023943855786}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,111.99872448979593},{59.17074832509992,67.41900312049665}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"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},{2.,4.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,111.99872448979593},{49.67073691997961,57.91899171537634}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"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},{2.,5.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,111.99872448979593},{40.1707255148593,48.41898031025603}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"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},{3.,6.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{30.670714109738988,38.91896890513572}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,7.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{21.170702704618677,29.41895750001541}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,8.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{11.670691299498358,19.918946094895105}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,9.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{2.170679894378054,10.418934689774787}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,10.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-7.329331510742264,0.9189232846544826}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,11.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-16.82934291586257,-8.581088120465836}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,12.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-26.329354320982887,-18.08109952558614}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,13.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-35.82936572610319,-27.58111093070646}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,14.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-45.329377131223495,-37.08112233582678}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{3.,15.407802394385579}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,150.3730867346939},{-54.829388536343814,-46.58113374094707}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"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},{4.,16.407802394385577}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,188.74744897959187},{-64.3293999414641,-56.081145146067385}}], Function[StatusArea[Slot[1],4]],TagBoxNote->"4"],StyleBox["4",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[4,{}],"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},{4.,17.407802394385577}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,188.74744897959187},{-73.82941134658442,-65.58115655118768}}], Function[StatusArea[Slot[1],4]],TagBoxNote->"4"],StyleBox["4",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[4,{}],"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},{4.,18.407802394385577}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,188.74744897959187},{-83.32942275170474,-75.081167956308}}], Function[StatusArea[Slot[1],4]],TagBoxNote->"4"],StyleBox["4",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[4,{}],"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},{5.,19.407802394385577}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,227.12181122448982},{-92.82943415682503,-84.58117936142831}}], Function[StatusArea[Slot[1],5]],TagBoxNote->"5"],StyleBox["5",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[5,{}],"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},{8.,20.407802394385577}, "RoundingRadius"->0]},ImageSizeCache->{{34.75000000000001,342.24489795918373},{-102.32944556194535,-94.08119076654863}}], Function[StatusArea[Slot[1],8]],TagBoxNote->"8"],StyleBox["8",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[8,{}],"Tooltip"]]]}}}}}},{},{}},{},{},{},{},{StyleBox[ {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[ "\"light\"",Offset[{-2.,0.},{0.,1.}],{1,0},Automatic,{1,0}],InsetBox["\"final\"", Offset[{-2.,0.},{0.,2.}],{1,0},Automatic,{1,0}],InsetBox["\"same\"",Offset[{-2.,0.}, {0.,3.}],{1,0},Automatic,{1,0}],InsetBox["\"only\"",Offset[{-2.,0.},{0.,4.}],{1,0}, Automatic,{1,0}],InsetBox["\"young\"",Offset[{-2.,0.},{0.,5.}],{1,0},Automatic,{1,0}],InsetBox[ "\"bad\"",Offset[{-2.,0.},{0.,6.}],{1,0},Automatic,{1,0}],InsetBox["\"key\"",Offset[ {-2.,0.},{0.,7.}],{1,0},Automatic,{1,0}],InsetBox["\"broken\"",Offset[{-2.,0.},{0.,8.}], {1,0},Automatic,{1,0}],InsetBox["\"other\"",Offset[{-2.,0.},{0.,9.}],{1,0},Automatic, {1,0}],InsetBox["\"low\"",Offset[{-2.,0.},{0.,10.}],{1,0},Automatic,{1,0}],InsetBox[ "\"last\"",Offset[{-2.,0.},{0.,11.}],{1,0},Automatic,{1,0}],InsetBox["\"hot\"",Offset[ {-2.,0.},{0.,12.}],{1,0},Automatic,{1,0}],InsetBox["\"little\"",Offset[{-2.,0.},{0.,13.}], {1,0},Automatic,{1,0}],InsetBox["\"long\"",Offset[{-2.,0.},{0.,14.}],{1,0},Automatic, {1,0}],InsetBox["\"red\"",Offset[{-2.,0.},{0.,15.}],{1,0},Automatic,{1,0}],InsetBox[ "\"good\"",Offset[{-2.,0.},{0.,15.999999999999998}],{1,0},Automatic,{1,0}],InsetBox[ "\"empty\"",Offset[{-2.,0.},{0.,17.}],{1,0},Automatic,{1,0}],InsetBox["\"brown\"", Offset[{-2.,0.},{0.,18.}],{1,0},Automatic,{1,0}],InsetBox["\"dry\"",Offset[{-2.,0.}, {0.,19.}],{1,0},Automatic,{1,0}],InsetBox["\"dead\"",Offset[{-2.,0.},{0.,20.}],{1,0}, Automatic,{1,0}]}}},"GraphicsLabel",StripOnInput->False]},"GraphicsTicks",StripOnInput->False]}, Antialiasing->False]},"GraphicsAxes",StripOnInput->False]}},AspectRatio->NCache[Power[ GoldenRatio,-1],0.6180339887498948],Axes->{True,False},AxesLabel->{None,None},AxesOrigin->{0.,0.19588550983899827}, RuleDelayed[CoordinatesToolOptions,{"DisplayFunction"->Function[{Identity[Part[Slot[ 1],1]],Identity[Part[Slot[1],2]]}],"CopiedValueFunction"->Function[{Identity[Part[ Slot[1],1]],Identity[Part[Slot[1],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[ "\"light\"",TraditionalForm],0},{2.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{2.,FormBox["\"final\"",TraditionalForm],0},{3.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{3.,FormBox[ "\"same\"",TraditionalForm],0},{4.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{4.,FormBox["\"only\"",TraditionalForm],0},{5.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{5.,FormBox[ "\"young\"",TraditionalForm],0},{6.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{6.,FormBox["\"bad\"",TraditionalForm],0},{7.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{7.,FormBox[ "\"key\"",TraditionalForm],0},{8.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{8.,FormBox["\"broken\"",TraditionalForm],0},{9.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{9.,FormBox[ "\"other\"",TraditionalForm],0},{10.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{10.,FormBox["\"low\"",TraditionalForm],0},{11.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{11.,FormBox[ "\"last\"",TraditionalForm],0},{12.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{12.,FormBox["\"hot\"",TraditionalForm],0},{13.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{13.,FormBox[ "\"little\"",TraditionalForm],0},{14.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{14.,FormBox["\"long\"",TraditionalForm],0},{15.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{15.,FormBox[ "\"red\"",TraditionalForm],0},{16.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{16.,FormBox["\"good\"",TraditionalForm],0},{17.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{17.,FormBox[ "\"empty\"",TraditionalForm],0},{18.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{18.,FormBox["\"brown\"",TraditionalForm],0},{19.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0],Selectable->False],TraditionalForm],{0.004,0}},{19.,FormBox[ "\"dry\"",TraditionalForm],0},{20.,FormBox[InterpretationBox[StyleBox[GraphicsBox[ {},ImageSize->{0,0},BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0], Selectable->False],TraditionalForm],{0.004,0}},{20.,FormBox["\"dead\"",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.683288820857263*^9,3.683308208402542*^9,{3.6833082423100996*^9,3.6833082928962173*^9},3.6833089312569876*^9,{3.688475641121853*^9,3.6884756602167883*^9},3.701361899221806*^9}, ExpressionUUID->"6a6d062d-2719-4d62-a932-4b0b7b04823a"]},Open]]},Open]]},Open]]}, WindowSize->{775,751},WindowMargins->{{Automatic,-30},{Automatic,0}},WindowTitle->"Examples for The Waste Land", TaggingRules->{"NotebookTemplateVersion"->1.},CellContext->Notebook,ShowCellTags->True, Nothing,Nothing,Nothing,Nothing,StyleDefinitions->FrontEnd`FileName[{"Wolfram"},"CreateDataResourceStyleSheet.nb", CharacterEncoding->"UTF-8"],DockedCells->{},Background->GrayLevel[0.9999],FrontEndVersion->"10.0 for Wolfram Cloud Platform (June 2 2014)"]