(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 80037, 1967] NotebookOptionsPosition[ 77933, 1907] NotebookOutlinePosition[ 78553, 1930] CellTagsIndexPosition[ 78510, 1927] WindowTitle->Examples for The Virginians WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection",ExpressionUUID->"8e73b263-f5ff-432f-b2d7-115dc77c792e"], Cell["Retrieve the ResourceObject:", "Text", CellChangeTimes->{{3.6821849447840075`*^9, 3.682184951647694*^9}, { 3.6821850182913575`*^9, 3.6821850462121496`*^9}, {3.6821850885233803`*^9, 3.68218509051958*^9}},ExpressionUUID->"16de7666-7fc7-459e-9560-\ 1f8c234b4858"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceObject", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6804517731799183`*^9, 3.6804517885604563`*^9}, { 3.6804527318597765`*^9, 3.6804527390684977`*^9}},ExpressionUUID->"75044300-0712-47e2-83dc-\ fc7e8aa6c959"], 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["\<\"The Virginians\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for William Makepeace Thackeray's \\\"The \ Virginians\\\"\"\>", "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["\<\"The Virginians\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for William Makepeace Thackeray's \\\"The \ Virginians\\\"\"\>", "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[{ ",","\",\"","\"fiction\"","\"text\"","\"book\"","\"novel\"", "\"historical novel\""}, "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[ "9c34d07b-2ba7-44c6-80ef-edbc48d5fd25"]; 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["\<\"9c34d07b-2ba7-44c6-80ef-edbc48d5fd25\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Version: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1.0.0\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Size: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TemplateBox[{"1978.728`","\"kB\"","kilobytes","\"Kilobytes\""}, "Quantity"], "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Elements: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{",","\",\"","\"Plaintext\""}, "RowWithSeparators"], Short[#, 2]& ], "SummaryItem"]}]} }, AutoDelete->False, BaseStyle->{ ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{2}}, "Rows" -> {{Automatic}}}]} }, AutoDelete->False, BaselinePosition->{1, 1}, GridBoxAlignment->{"Rows" -> {{Top}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open$$], ImageSize->Automatic], BaselinePosition->Baseline], DynamicModuleValues:>{}], "]"}], ResourceObject[ Association[ "Name" -> "The Virginians", "UUID" -> "9c34d07b-2ba7-44c6-80ef-edbc48d5fd25", "ResourceType" -> "DataResource", "Version" -> "1.0.0", "Description" -> "Plaintext for William Makepeace Thackeray's \"The Virginians\"", "ContentSize" -> Quantity[1978.728, "Kilobytes"], "ContentElements" -> {"Plaintext"}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.683895195171224*^9},ExpressionUUID->"c82dbdcd-3864-433b-a65f-\ 599998cde6bf"] }, 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}},ExpressionUUID->"de832eef-fd43-4b6a-9808-\ b168072fc746"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "[", RowBox[{"[", "10", "]"}], "]"}]], "Input", CellChangeTimes->{{3.6804518239459944`*^9, 3.680451854651065*^9}, { 3.683895210238852*^9, 3.683895220781896*^9}, {3.702920745971898*^9, 3.702920748874555*^9}},ExpressionUUID->"5d969c36-e676-4c33-a7c5-\ fcdda3baedec"], Cell[BoxData["\<\"On the library wall of one of the most famous writers of \ America, there\\nhang two crossed swords, which his relatives wore in the \ great War of\\nIndependence. The one sword was gallantly drawn in the service \ of\\nthe king, the other was the weapon of a brave and honoured \ republican\\nsoldier. The possessor of the harmless trophy has earned for \ himself a\\nname alike honoured in his ancestors' country and his own, where \ genius\\nsuch as his has always a peaceful welcome.\"\>"], "Output", CellChangeTimes->{{3.683895197178996*^9, 3.683895221469919*^9}, 3.702920750109786*^9},ExpressionUUID->"3fa2b98f-d878-42ca-98be-\ 14987344c8c8"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection",ExpressionUUID->"18f8af26-1570-4e8b-b3ad-0068b167588e"], Cell["Create a word cloud:", "Text", CellChangeTimes->{{3.6833768895573597`*^9, 3.68337689196535*^9}},ExpressionUUID->"797814c6-e390-4a0b-b33c-\ f38b00de769b"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"WordCloud", "[", RowBox[{"DeleteStopwords", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.683895225300995*^9, 3.683895236101346*^9}},ExpressionUUID->"6041a808-a699-4700-a8d3-\ bc2d0d42e7d2"], Cell[BoxData[ GraphicsBox[{InsetBox[ StyleBox["\<\"Warrington\"\>", StripOnInput->False, FontSize->Scaled[0.11251722015417533`], FontColor->RGBColor[0.772079, 0.431554, 0.102387]], {0, 0}, Center, Automatic], InsetBox[ StyleBox["\<\"Mr.\"\>", StripOnInput->False, FontSize->Scaled[0.22364217252396165`], FontColor->RGBColor[0.368417, 0.506779, 0.709798]], {-0.5, 38.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Harry\"\>", StripOnInput->False, FontSize->Scaled[0.15373567429727114`], FontColor->RGBColor[0.880722, 0.611041, 0.142051]], {-0.5, -36.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Young\"\>", StripOnInput->False, FontSize->Scaled[0.11746343465134683`], FontColor->RGBColor[0.922526, 0.385626, 0.209179]], {-31.5, -65.5}, Center, Automatic], InsetBox[ StyleBox["\<\"George\"\>", StripOnInput->False, FontSize->Scaled[0.10899991206729784`], FontColor->RGBColor[1, 0.75, 0]], {-0.5, 84.5}, Center, Automatic], InsetBox[ StyleBox["\<\"says\"\>", StripOnInput->False, FontSize->Scaled[0.11790309816220652`], FontColor->RGBColor[0.560181, 0.691569, 0.194885]], {71.5, 41.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Little\"\>", StripOnInput->False, FontSize->Scaled[0.115814696485623], FontColor->RGBColor[0.528488, 0.470624, 0.701351]], {-87.5, 30.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Lady\"\>", StripOnInput->False, FontSize->Scaled[0.10130580062725328`], FontColor->RGBColor[0.647624, 0.37816, 0.614037]], {56.5, -72.5}, Center, Automatic], InsetBox[ StyleBox["\<\"said\"\>", StripOnInput->False, FontSize->Scaled[0.1098792390890172], FontColor->RGBColor[0.363898, 0.618501, 0.782349]], {-89.5, -28.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Castlewood\"\>", StripOnInput->False, FontSize->Scaled[0.05909810358472316], FontColor->RGBColor[0.5407932311309059, 0.715, 0.09762679674248334]], {-0.5, -94.5}, Center, Automatic], InsetBox[ StyleBox["\<\"good\"\>", StripOnInput->False, FontSize->Scaled[0.087566315912888], FontColor->RGBColor[0.915, 0.3325, 0.2125]], {90.5, -20.5}, Center, Automatic], InsetBox[ StyleBox["\<\"gentleman\"\>", StripOnInput->False, FontSize->Scaled[0.05426180496526658], FontColor->RGBColor[ 0.6184987019729621, 0.39212575718243875`, 0.7412532450675947]], {76.5, 63.5}, Center, Automatic], InsetBox[ StyleBox["\<\"mother\"\>", StripOnInput->False, FontSize->Scaled[0.06613271975847818], FontColor->RGBColor[ 0.8439466852489265, 0.3467106629502147, 0.3309221912517893]], {89.5, -43.5}, Center, Automatic], InsetBox[ StyleBox["\<\"know\"\>", StripOnInput->False, FontSize->Scaled[0.07778380279625993], FontColor->RGBColor[0.736782672705901, 0.358, 0.5030266573755369]], {-78.5, 58.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Madam\"\>", StripOnInput->False, FontSize->Scaled[0.06118650526130668], FontColor->RGBColor[ 0.6753413537738198, 0.3589675436319385, 0.5991466155654507]], {1.5, 102.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Esmond\"\>", StripOnInput->False, FontSize->Scaled[0.056240290764135184`], FontColor->RGBColor[0.47401116530937026`, 0.47809330081437784`, 0.85]], {-0.5, -113.5}, Center, Automatic], InsetBox[ StyleBox["\<\"SIR\"\>", StripOnInput->False, FontSize->Scaled[0.08437875545915526], FontColor->RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85]], {-108.5, -0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"say\"\>", StripOnInput->False, FontSize->Scaled[0.08316968080429112], FontColor->RGBColor[ 0.9728288904374106, 0.621644452187053, 0.07336199581899142]], {106.5, 16.5}, Center, Automatic], InsetBox[ StyleBox["\<\"great\"\>", StripOnInput->False, FontSize->Scaled[0.06844095319049155], FontColor->RGBColor[ 0.5833680111493557, 0.4126186601628758, 0.8290799721266107]], {-76.5, -89.5}, Center, Automatic], InsetBox[ StyleBox["\<\"brother\"\>", StripOnInput->False, FontSize->Scaled[0.05810886068528885], FontColor->RGBColor[ 0.8857244243136628, 0.3764133635295058, 0.1393110607841571]], {87.5, 78.5}, Center, Automatic], InsetBox[ StyleBox["\<\"old\"\>", StripOnInput->False, FontSize->Scaled[0.09185303514376997], FontColor->RGBColor[0.571589, 0.586483, 0.]], {-77.5, 77.5}, Center, Automatic], InsetBox[ StyleBox["\<\"dear\"\>", StripOnInput->False, FontSize->Scaled[0.06965002784535569], FontColor->RGBColor[ 0.838355547812947, 0.44746667828057946`, 0.0208888695323676]], {57.5, 103.5}, Center, Automatic], InsetBox[ StyleBox["\<\"gentlemen\"\>", StripOnInput->False, FontSize->Scaled[0.043270217193774364`], FontColor->RGBColor[ 0.9038177251280404, 0.3492734123079395, 0.18454431282010084`]], {-8.5, 119.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Lambert\"\>", StripOnInput->False, FontSize->Scaled[0.04898584283495031], FontColor->RGBColor[0.5472001045252132, 0.43417993728487203`, 0.85]], {78.5, -99.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Family\"\>", StripOnInput->False, FontSize->Scaled[0.0543717208429815], FontColor->RGBColor[ 0.8613800418100862, 0.48092002787339083`, 0.02824203762907758]], {-106.5, -68.5}, Center, Automatic], InsetBox[ StyleBox["\<\"poor\"\>", StripOnInput->False, FontSize->Scaled[0.06514347685904387], FontColor->RGBColor[ 0.28240003484173815`, 0.6090799721266095, 0.7538800418100857]], {-56.5, -110.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Home\"\>", StripOnInput->False, FontSize->Scaled[0.05602045900870534], FontColor->RGBColor[0.7748409210981391, 0.358, 0.4444755060028629]], {-111.5, -47.5}, Center, Automatic], InsetBox[ StyleBox["\<\"lord\"\>", StripOnInput->False, FontSize->Scaled[0.07426649470938242], FontColor->RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965]], {-61.5, 110.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Colonel\"\>", StripOnInput->False, FontSize->Scaled[0.04997508573438462], FontColor->RGBColor[0.37977756485605163`, 0.715, 0.3025558265468435]], {60.5, -115.5}, Center, Automatic], InsetBox[ StyleBox["\<\"thought\"\>", StripOnInput->False, FontSize->Scaled[0.04612803001436234], FontColor->RGBColor[ 0.8168067340273636, 0.3521386531945273, 0.3761554432877274]], {51.5, 122.5}, Center, Automatic], InsetBox[ StyleBox["\<\"house\"\>", StripOnInput->False, FontSize->Scaled[0.053162646188117356`], FontColor->RGBColor[0.7678998606330495, 0.7317110956258943, 0.]], {104.5, 95.5}, Center, Automatic], InsetBox[ StyleBox["\<\"general\"\>", StripOnInput->False, FontSize->Scaled[0.04458920772635343], FontColor->RGBColor[ 0.6536293927965667, 0.37163285420200276`, 0.6534265180085832]], {-106.5, 93.5}, Center, Automatic], InsetBox[ StyleBox["\<\"people\"\>", StripOnInput->False, FontSize->Scaled[0.0449189553594982], FontColor->RGBColor[ 0.9052934053395919, 0.510195603559728, 0.06776406480563275]], {113.5, -76.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Maria\"\>", StripOnInput->False, FontSize->Scaled[0.051294076266963674`], FontColor->RGBColor[ 0.35558897405758294`, 0.5505288207539337, 0.8417067688690995]], {-45.5, -127.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Bernstein\"\>", StripOnInput->False, FontSize->Scaled[0.036675264530879034`], FontColor->RGBColor[0.31827505306025683`, 0.715, 0.3808317506505822]], {2.5, -128.5}, Center, Automatic], InsetBox[ StyleBox["\<\"away\"\>", StripOnInput->False, FontSize->Scaled[0.04953542222352493], FontColor->RGBColor[ 0.8564488486273256, 0.42032672705901153`, 0.06612212156831418]], {-98.5, -109.5}, Center, Automatic], InsetBox[ StyleBox["\<\"think\"\>", StripOnInput->False, FontSize->Scaled[0.05514113198698596], FontColor->RGBColor[ 0.16397784358994957`, 0.7038177251280403, 0.6117734123079395]], {-101.5, 108.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Sampson\"\>", StripOnInput->False, FontSize->Scaled[0.035905853386874576`], FontColor->RGBColor[ 0.8335801463353031, 0.3487839707329394, 0.3481997561078282]], {-65.5, 128.5}, Center, Automatic], InsetBox[ StyleBox["\<\"man\"\>", StripOnInput->False, FontSize->Scaled[0.06734179441334232], FontColor->RGBColor[0.8996399512215667, 0.7463488834690629, 0.]], {102.5, 112.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Company\"\>", StripOnInput->False, FontSize->Scaled[0.0340372834657209], FontColor->RGBColor[0.7989994773739094, 0.735166608597101, 0.]], {-91.5, -127.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Virginia\"\>", StripOnInput->False, FontSize->Scaled[0.03865375032974763], FontColor->RGBColor[0.47929071933511125`, 0.715, 0.1759027208462221]], {113.5, -58.5}, Center, Automatic], InsetBox[ StyleBox["\<\"like\"\>", StripOnInput->False, FontSize->Scaled[0.06338482281560512], FontColor->RGBColor[ 0.9324333565611593, 0.5282889043741062, 0.0921900209050434]], {-118.5, -87.5}, Center, Automatic], InsetBox[ StyleBox["\<\"time\"\>", StripOnInput->False, FontSize->Scaled[0.05305273031040243], FontColor->RGBColor[ 0.8878600487784333, 0.33792799024431336`, 0.2577332520359445]], {106.5, -116.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Cousin\"\>", StripOnInput->False, FontSize->Scaled[0.04019257261775654], FontColor->RGBColor[ 0.596786740995709, 0.404791067752503, 0.7955331475107271]], {98.5, 125.5}, Center, Automatic], InsetBox[ StyleBox["\<\"come\"\>", StripOnInput->False, FontSize->Scaled[0.05602045900870534], FontColor->RGBColor[ 0.9874666782805795, 0.6948333914028977, 0.033839968642435214`]], {51.5, -129.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Madame\"\>", StripOnInput->False, FontSize->Scaled[0.03315795644400152], FontColor->RGBColor[ 0.9986489531525362, 0.7507447657626809, 0.0036478264881522893`]], {-112.5, 122.5}, Center, Automatic], InsetBox[ StyleBox["\<\"World\"\>", StripOnInput->False, FontSize->Scaled[0.04107189963947592], FontColor->RGBColor[ 0.8342400905885153, 0.4628267270590103, 0.0038160815296638794`]], {-0.5, 133.5}, Center, Automatic], InsetBox[ StyleBox["\<\"came\"\>", StripOnInput->False, FontSize->Scaled[0.050194917489814465`], FontColor->RGBColor[0.7132613816472081, 0.358, 0.5392132590042952]], {38.5, 137.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Friends\"\>", StripOnInput->False, FontSize->Scaled[0.03524635812058504], FontColor->RGBColor[ 0.6670481226429111, 0.3638052617916352, 0.6198796933927223]], {-40.5, 138.5}, Center, Automatic], InsetBox[ StyleBox["\<\"day\"\>", StripOnInput->False, FontSize->Scaled[0.050414749245244306`], FontColor->RGBColor[ 0.9637822400302223, 0.5764112001511111, 0.0977879519184]], {124.5, 34.5}, Center, Automatic], InsetBox[ StyleBox["\<\"better\"\>", StripOnInput->False, FontSize->Scaled[0.04008265674004162], FontColor->RGBColor[0.8493197142977551, 0.7407577460330839, 0.]], {-126.5, 55.5}, Center, Automatic], InsetBox[ StyleBox["\<\"hand\"\>", StripOnInput->False, FontSize->Scaled[0.04294046956062959], FontColor->RGBColor[ 0.9784200278733908, 0.649600139366954, 0.058265924741844846`]], {-124.5, 68.5}, Center, Automatic], InsetBox[ StyleBox["\<\"country\"\>", StripOnInput->False, FontSize->Scaled[0.03348770407714629], FontColor->RGBColor[ 0.3383114092015346, 0.5643508726387724, 0.8209736910418415]], {79.5, 138.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Love\"\>", StripOnInput->False, FontSize->Scaled[0.04568836650350265], FontColor->RGBColor[ 0.23716678280579248`, 0.645266573755366, 0.699600139366951]], {125.5, -93.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Theo\"\>", StripOnInput->False, FontSize->Scaled[0.042500806049769906`], FontColor->RGBColor[0.2187618985811806, 0.715, 0.5074848563512248]], {92.5, -130.5}, Center, Automatic], InsetBox[ StyleBox["\<\"money\"\>", StripOnInput->False, FontSize->Scaled[0.03447694697658059], FontColor->RGBColor[0.7658565873730018, 0.358, 0.4582975578876895]], {127.5, 48.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Miss\"\>", StripOnInput->False, FontSize->Scaled[0.04316030131605944], FontColor->RGBColor[0.428777913273419, 0.5052332520359486, 0.85]], {-105.5, 134.5}, Center, Automatic], InsetBox[ StyleBox["\<\"indeed\"\>", StripOnInput->False, FontSize->Scaled[0.03832400269660286], FontColor->RGBColor[ 0.9930578157165594, 0.7227890785827968, 0.01874389756528967]], {118.5, 139.5}, Center, Automatic], InsetBox[ StyleBox["\<\"cries\"\>", StripOnInput->False, FontSize->Scaled[0.04283055368291468], FontColor->RGBColor[0.7513196300394465, 0.358, 0.48066210763162087`]], {127.5, -129.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Mrs.\"\>", StripOnInput->False, FontSize->Scaled[0.04667760940293695], FontColor->RGBColor[0.9810598048862722, 0.7553955338762525, 0.]], {-127.5, -133.5}, Center, Automatic], InsetBox[ StyleBox["\<\"woman\"\>", StripOnInput->False, FontSize->Scaled[0.037444675674883486`], FontColor->RGBColor[ 0.9046334610863751, 0.334573307782725, 0.22977756485604156`]], {-0.5, -139.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Gumbo\"\>", StripOnInput->False, FontSize->Scaled[0.03315795644400152], FontColor->RGBColor[0.529922539669161, 0.44454647619850335`, 0.85]], {-0.5, 146.5}, Center, Automatic], InsetBox[ StyleBox["\<\"friend\"\>", StripOnInput->False, FontSize->Scaled[0.03733475979716857], FontColor->RGBColor[0.38354466123747527`, 0.5323732032575149, 0.85]], {137.5, -3.5}, Center, Automatic], InsetBox[ StyleBox["\<\"make\"\>", StripOnInput->False, FontSize->Scaled[0.037224843919453646`], FontColor->RGBColor[ 0.969373377466199, 0.6043668873309952, 0.08269188084126262]], {-137.5, -16.5}, Center, Automatic], InsetBox[ StyleBox["\<\"honour\"\>", StripOnInput->False, FontSize->Scaled[0.032608377055426914`], FontColor->RGBColor[ 0.8949268664259606, 0.5032845776173072, 0.05843417978336459]], {-39.5, -140.5}, Center, Automatic], InsetBox[ StyleBox["\<\"ladies\"\>", StripOnInput->False, FontSize->Scaled[0.03557610575372981], FontColor->RGBColor[ 0.922066817647527, 0.5213778784316846, 0.08286013588277422]], {137.5, -17.5}, Center, Automatic], InsetBox[ StyleBox["\<\"heard\"\>", StripOnInput->False, FontSize->Scaled[0.036675264530879034`], FontColor->RGBColor[ 0.845266573755366, 0.437100139366951, 0.03816643438841502]], {139.5, -31.5}, Center, Automatic], InsetBox[ StyleBox["\<\"eyes\"\>", StripOnInput->False, FontSize->Scaled[0.03832400269660286], FontColor->RGBColor[0.5019668524892619, 0.46131988850644284`, 0.85]], {-137.5, -27.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Father\"\>", StripOnInput->False, FontSize->Scaled[0.03227862942228215], FontColor->RGBColor[0.6672593867853922, 0.7205288207539324, 0.]], {133.5, 58.5}, Center, Automatic], InsetBox[ StyleBox["\<\"round\"\>", StripOnInput->False, FontSize->Scaled[0.03491661048744028], FontColor->RGBColor[ 0.8926354502560807, 0.366046824615879, 0.15658862564020168`]], {-140.5, 18.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Way\"\>", StripOnInput->False, FontSize->Scaled[0.038433918574317785`], FontColor->RGBColor[ 0.8745421494417032, 0.39318677583744527`, 0.11135537360425793`]], {-139.5, 33.5}, Center, Automatic], InsetBox[ StyleBox["\<\"going\"\>", StripOnInput->False, FontSize->Scaled[0.03326787232171644], FontColor->RGBColor[0.4177882075393331, 0.715, 0.25417864494993975`]], {141.5, 10.5}, Center, Automatic], InsetBox[ StyleBox["\<\"place\"\>", StripOnInput->False, FontSize->Scaled[0.03392736758800598], FontColor->RGBColor[ 0.8774935098648088, 0.34000129802703827`, 0.2750108168919853]], {33.5, -143.5}, Center, Automatic], InsetBox[ StyleBox["\<\"face\"\>", StripOnInput->False, FontSize->Scaled[0.038763666207462556`], FontColor->RGBColor[0.6897400905885174, 0.358, 0.5753998606330502]], {140.5, -45.5}, Center, Automatic], InsetBox[ StyleBox["\<\"shall\"\>", StripOnInput->False, FontSize->Scaled[0.03909341384060732], FontColor->RGBColor[ 0.3103557220216354, 0.5867154223826917, 0.7874268664259625]], {130.5, 72.5}, Center, Automatic], InsetBox[ StyleBox["\<\"look\"\>", StripOnInput->False, FontSize->Scaled[0.04008265674004162], FontColor->RGBColor[ 0.8607200975568693, 0.34335598048862614`, 0.30296650407188447`]], {61.5, -144.5}, Center, Automatic], InsetBox[ StyleBox["\<\"quite\"\>", StripOnInput->False, FontSize->Scaled[0.034696778732010436`], FontColor->RGBColor[0.4567336004533182, 0.4884598397280091, 0.85]], {-70.5, -143.5}, Center, Automatic], InsetBox[ StyleBox["\<\"heart\"\>", StripOnInput->False, FontSize->Scaled[0.035905853386874576`], FontColor->RGBColor[0.9307395679624266, 0.7498043964402695, 0.]], {32.5, 148.5}, Center, Automatic], InsetBox[ StyleBox["\<\"years\"\>", StripOnInput->False, FontSize->Scaled[0.032608377055426914`], FontColor->RGBColor[ 0.6453361616656581, 0.37647057236169945`, 0.6741595958358548]], {-74.5, 142.5}, Center, Automatic], InsetBox[ StyleBox["\<\"went\"\>", StripOnInput->False, FontSize->Scaled[0.037444675674883486`], FontColor->RGBColor[0.7175796237092107, 0.7261199581899123, 0.]], {61.5, 148.5}, Center, Automatic], InsetBox[ StyleBox["\<\"night\"\>", StripOnInput->False, FontSize->Scaled[0.034367031098865665`], FontColor->RGBColor[ 0.8510135028964549, 0.47400900193096995`, 0.018912152606809424`]], {141.5, 87.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Hetty\"\>", StripOnInput->False, FontSize->Scaled[0.03271829293314184], FontColor->RGBColor[ 0.2198892179497479, 0.6590886256402017, 0.6788670615396974]], {-131.5, -101.5}, Center, Automatic], InsetBox[ StyleBox["\<\"found\"\>", StripOnInput->False, FontSize->Scaled[0.03326787232171644], FontColor->RGBColor[0.7042770479220728, 0.358, 0.5530353108891188]], {91.5, -143.5}, Center, Automatic], InsetBox[ StyleBox["\<\"life\"\>", StripOnInput->False, FontSize->Scaled[0.04359996482691913], FontColor->RGBColor[0.6361597700445392, 0.7170733077827265, 0.]], {95.5, -2.5}, Center, Automatic], InsetBox[ StyleBox["\<\"took\"\>", StripOnInput->False, FontSize->Scaled[0.03832400269660286], FontColor->RGBColor[ 0.7896667828057927, 0.3575666434388414, 0.4213886953236787]], {-135.5, 104.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Play\"\>", StripOnInput->False, FontSize->Scaled[0.03447694697658059], FontColor->RGBColor[0.15725938678540247`, 0.715, 0.5857607804549424]], {135.5, 106.5}, Center, Automatic], InsetBox[ StyleBox["\<\"aunt\"\>", StripOnInput->False, FontSize->Scaled[0.03711492804173872], FontColor->RGBColor[0.7277983389807635, 0.358, 0.5168487092603637]], {136.5, -106.5}, Center, Automatic], InsetBox[ StyleBox["\<\"days\"\>", StripOnInput->False, FontSize->Scaled[0.03315795644400152], FontColor->RGBColor[ 0.8633598745697435, 0.40996018814538476`, 0.08339968642435877]], {-97.5, -142.5}, Center, Automatic], InsetBox[ StyleBox["\<\"knew\"\>", StripOnInput->False, FontSize->Scaled[0.03348770407714629], FontColor->RGBColor[ 0.9603267270590103, 0.5591336352950514, 0.10711783694067224`]], {-35.5, 149.5}, Center, Automatic], InsetBox[ StyleBox["\<\"best\"\>", StripOnInput->False, FontSize->Scaled[0.037664507430313326`], FontColor->RGBColor[ 0.6319174318193065, 0.38429816477207124`, 0.7077064204517338]], {-131.5, -115.5}, Center, Automatic], InsetBox[ StyleBox["\<\"wife\"\>", StripOnInput->False, FontSize->Scaled[0.03656534865316411], FontColor->RGBColor[ 0.5750747800184488, 0.4174563783225715, 0.8498130499538777]], {-143.5, 0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"head\"\>", StripOnInput->False, FontSize->Scaled[0.0330480405662866], FontColor->RGBColor[ 0.8064401951137368, 0.3542119609772526, 0.39343300814377197`]], {136.5, 117.5}, Center, Automatic], InsetBox[ StyleBox["\<\"long\"\>", StripOnInput->False, FontSize->Scaled[0.034147199343435825`], FontColor->RGBColor[ 0.6102054708420535, 0.39696347534213544`, 0.7619863228948663]], {-144.5, -58.5}, Center, Automatic], InsetBox[ StyleBox["\<\"told\"\>", StripOnInput->False, FontSize->Scaled[0.035905853386874576`], FontColor->RGBColor[ 0.26512246998569167`, 0.6229020240114467, 0.73314696398283]], {58.5, 17.5}, Center, Automatic], InsetBox[ StyleBox["\<\"tell\"\>", StripOnInput->False, FontSize->Scaled[0.03887358208517748], FontColor->RGBColor[ 0.9492067688690977, 0.5394711792460651, 0.10728609198218791`]], {-144.5, -43.5}, Center, Automatic], InsetBox[ StyleBox["\<\"sure\"\>", StripOnInput->False, FontSize->Scaled[0.037884339185743174`], FontColor->RGBColor[ 0.8781534541180211, 0.4921023027453475, 0.04333810870621905]], {-0.5, -150.5}, Center, Automatic], InsetBox[ StyleBox["\<\"men\"\>", StripOnInput->False, FontSize->Scaled[0.03810417094117302], FontColor->RGBColor[ 0.19193353076984873`, 0.681453175384121, 0.6453202369238185]], {-26.5, -150.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Oh\"\>", StripOnInput->False, FontSize->Scaled[0.03524635812058504], FontColor->RGBColor[0.5788038738141875, 0.715, 0.049249615145579635`]], {145.5, 21.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Let\"\>", StripOnInput->False, FontSize->Scaled[0.03447694697658059], FontColor->RGBColor[ 0.9840111653093676, 0.677555826546838, 0.04316985366470745]], {144.5, -58.5}, Center, Automatic], InsetBox[ StyleBox["\<\"son\"\>", StripOnInput->False, FontSize->Scaled[0.03194888178913738], FontColor->RGBColor[ 0.9107287510704583, 0.33890687339431275`, 0.20182187767614543`]], {1.5, -15.5}, Center, Automatic]}, DefaultBaseStyle->{ "Graphics", FontFamily -> "Helvetica", FontWeight -> Plain, FontTracking -> "Plain", FontSlant -> Plain, FontVariations -> {}}, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultPlotStyle" -> Automatic}, PlotRange->{{-157., 156.}, {-157., 156.}}]], "Output", CellChangeTimes->{ 3.6838952609295673`*^9},ExpressionUUID->"61187922-43e3-4af0-bc94-\ 6ecf883e9549"] }, Open ]], Cell["Show the most frequently used verbs:", "Text", CellChangeTimes->{{3.683033608693839*^9, 3.683033616124875*^9}, { 3.6832949032376537`*^9, 3.6832949042537556`*^9}, {3.683376838599346*^9, 3.683376841005747*^9}, {3.683392707585814*^9, 3.683392712816613*^9}, 3.68339277883292*^9},ExpressionUUID->"5604b2b6-8478-42f9-90d5-\ 76f9b80ceadc"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BarChart", "[", RowBox[{ RowBox[{ RowBox[{"TakeLargest", "[", RowBox[{ RowBox[{"Counts", "[", RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "]"}], ",", "20"}], "]"}], "//", "Reverse"}], ",", RowBox[{"BarOrigin", "\[Rule]", "Left"}], ",", RowBox[{"ChartLabels", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.6832887705512333`*^9, 3.6832888072249002`*^9}, 3.6838952645012083`*^9},ExpressionUUID->"11ebfac2-8528-4141-9601-\ bdb542d05d0c"], Cell[BoxData[ GraphicsBox[{ {Opacity[0], PointBox[{0., 0.13851851851851854`}]}, {{}, {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.5370370370370371}, {500., 1.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 70.9274508755384}, {77.75077561883937, 87.02542168322799}}], StatusArea[#, 500]& , TagBoxNote->"500"], StyleBox["500", {}, StripOnInput -> False]], Annotation[#, Style[500, {}], "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.5370370370370372`}, {588., 2.4629629629629632`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 77.38268222963316}, {68.27415786929966, 77.54880393368828}}], StatusArea[#, 588]& , TagBoxNote->"588"], StyleBox["588", {}, StripOnInput -> False]], Annotation[#, Style[588, {}], "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.537037037037037}, {593., 3.4629629629629632`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 77.74945673838855}, {58.79754011975995, 68.07218618414856}}], StatusArea[#, 593]& , TagBoxNote->"593"], StyleBox["593", {}, StripOnInput -> False]], Annotation[#, Style[593, {}], "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.537037037037037}, {595., 4.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 77.8961665418907}, {49.320922370220245`, 58.595568434608865`}}], StatusArea[#, 595]& , TagBoxNote->"595"], StyleBox["595", {}, StripOnInput -> False]], Annotation[#, Style[595, {}], "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.537037037037037}, {610., 5.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 78.99649006815685}, {39.84430462068054, 49.11895068506915}}], StatusArea[#, 610]& , TagBoxNote->"610"], StyleBox["610", {}, StripOnInput -> False]], Annotation[#, Style[610, {}], "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.537037037037037}, {634., 6.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 80.75700771018269}, {30.367686871140833`, 39.642332935529446`}}], StatusArea[#, 634]& , TagBoxNote->"634"], StyleBox["634", {}, StripOnInput -> False]], Annotation[#, Style[634, {}], "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.537037037037037}, {648., 7.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 81.78397633469777}, {20.89106912160112, 30.16571518598974}}], StatusArea[#, 648]& , TagBoxNote->"648"], StyleBox["648", {}, StripOnInput -> False]], Annotation[#, Style[648, {}], "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.537037037037037}, {773., 8.462962962962964}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 90.95333905358237}, {11.414451372061407`, 20.689097436450027`}}], StatusArea[#, 773]& , TagBoxNote->"773"], StyleBox["773", {}, StripOnInput -> False]], Annotation[#, Style[773, {}], "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.537037037037038}, {882., 9.462962962962964}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 98.94902334444974}, {1.937833622521694, 11.212479686910314`}}], StatusArea[#, 882]& , TagBoxNote->"882"], StyleBox["882", {}, StripOnInput -> False]], Annotation[#, Style[882, {}], "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.537037037037038}, {904., 10.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 100.56283118297343`}, {-7.538784127018005, 1.7358619373706148`}}], StatusArea[#, 904]& , TagBoxNote->"904"], StyleBox["904", {}, StripOnInput -> False]], Annotation[#, Style[904, {}], "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.537037037037038`}, {979., 11.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 106.06444881430419`}, {-17.015401876557718`, -7.740755812169098}}], StatusArea[#, 979]& , TagBoxNote->"979"], StyleBox["979", {}, StripOnInput -> False]], Annotation[#, Style[979, {}], "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.537037037037038`}, {1066., 12.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 112.44632526664786`}, {-26.492019626097417`, -17.21737356170881}}], StatusArea[#, 1066]& , TagBoxNote->"1066"], StyleBox["1066", {}, StripOnInput -> False]], Annotation[#, Style[1066, {}], "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.537037037037038`}, {1103., 13.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 115.16045663143771`}, {-35.96863737563713, -26.69399131124851}}], StatusArea[#, 1103]& , TagBoxNote->"1103"], StyleBox["1103", {}, StripOnInput -> False]], Annotation[#, Style[1103, {}], "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.537037037037038`}, {1200., 14.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 122.27588210129215`}, {-45.44525512517684, -36.17060906078821}}], StatusArea[#, 1200]& , TagBoxNote->"1200"], StyleBox["1200", {}, StripOnInput -> False]], Annotation[#, Style[1200, {}], "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.537037037037038`}, {1424., 15.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 138.70738009353335`}, {-54.921872874716556`, -45.64722681032792}}], StatusArea[#, 1424]& , TagBoxNote->"1424"], StyleBox["1424", {}, StripOnInput -> False]], Annotation[#, Style[1424, {}], "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.537037037037038`}, {1785., 16.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 165.18849962567208`}, {-64.39849062425627, -55.123844559867635`}}], StatusArea[#, 1785]& , TagBoxNote->"1785"], StyleBox["1785", {}, StripOnInput -> False]], Annotation[#, Style[1785, {}], "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.537037037037038`}, {2174., 17.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 193.72355640684097`}, {-73.87510837379598, -64.60046230940735}}], StatusArea[#, 2174]& , TagBoxNote->"2174"], StyleBox["2174", {}, StripOnInput -> False]], Annotation[#, Style[2174, {}], "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.537037037037038`}, {2213., 18.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 196.58439757513295`}, {-83.3517261233357, -74.07708005894706}}], StatusArea[#, 2213]& , TagBoxNote->"2213"], StyleBox["2213", {}, StripOnInput -> False]], Annotation[#, Style[2213, {}], "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.537037037037038`}, {2863., 19.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 244.26508371333287`}, {-92.82834387287538, -83.55369780848677}}], StatusArea[#, 2863]& , TagBoxNote->"2863"], StyleBox["2863", {}, StripOnInput -> False]], Annotation[#, Style[2863, {}], "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.537037037037038`}, {4198., 20.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{33.75, 342.1938775510204}, {-102.30496162241509`, -93.03031555802646}}], StatusArea[#, 4198]& , TagBoxNote->"4198"], StyleBox["4198", {}, StripOnInput -> False]], Annotation[#, Style[4198, {}], "Tooltip"]& ]}}, {}, {}}, {}, {}, StyleBox[{ {Thickness[Tiny], LineBox[{{0., 0.13851851851851854`}, {0., 20.869451851851853`}}], StyleBox[{}, "GraphicsLabel", StripOnInput->False]}, StyleBox[{ {Thickness[Tiny], LineBox[{{0., 0.5370370370370371}, Offset[{-6., 0.}, {0., 0.5370370370370371}]}], LineBox[{{0., 20.462962962962965`}, Offset[{-6., 0.}, {0., 20.462962962962965`}]}], {{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, { LineBox[{{0., 1.462962962962963}, Offset[{-4., 0.}, {0., 1.462962962962963}]}], LineBox[{{0., 1.5370370370370372`}, Offset[{-4., 0.}, {0., 1.5370370370370372`}]}], LineBox[{{0., 2.4629629629629632`}, Offset[{-4., 0.}, {0., 2.4629629629629632`}]}], LineBox[{{0., 2.537037037037037}, Offset[{-4., 0.}, {0., 2.537037037037037}]}], LineBox[{{0., 3.4629629629629632`}, Offset[{-4., 0.}, {0., 3.4629629629629632`}]}], LineBox[{{0., 3.537037037037037}, Offset[{-4., 0.}, {0., 3.537037037037037}]}], LineBox[{{0., 4.462962962962963}, Offset[{-4., 0.}, {0., 4.462962962962963}]}], LineBox[{{0., 4.537037037037036}, Offset[{-4., 0.}, {0., 4.537037037037036}]}], LineBox[{{0., 5.462962962962963}, Offset[{-4., 0.}, {0., 5.462962962962963}]}], LineBox[{{0., 5.537037037037037}, Offset[{-4., 0.}, {0., 5.537037037037037}]}], LineBox[{{0., 6.462962962962963}, Offset[{-4., 0.}, {0., 6.462962962962963}]}], LineBox[{{0., 6.537037037037037}, Offset[{-4., 0.}, {0., 6.537037037037037}]}], LineBox[{{0., 7.462962962962963}, Offset[{-4., 0.}, {0., 7.462962962962963}]}], LineBox[{{0., 7.537037037037037}, Offset[{-4., 0.}, {0., 7.537037037037037}]}], LineBox[{{0., 8.462962962962964}, Offset[{-4., 0.}, {0., 8.462962962962964}]}], LineBox[{{0., 8.537037037037036}, Offset[{-4., 0.}, {0., 8.537037037037036}]}], LineBox[{{0., 9.462962962962962}, Offset[{-4., 0.}, {0., 9.462962962962962}]}], LineBox[{{0., 9.537037037037036}, Offset[{-4., 0.}, {0., 9.537037037037036}]}], LineBox[{{0., 10.462962962962962`}, Offset[{-4., 0.}, {0., 10.462962962962962`}]}], LineBox[{{0., 10.537037037037036`}, Offset[{-4., 0.}, {0., 10.537037037037036`}]}], LineBox[{{0., 11.462962962962962`}, Offset[{-4., 0.}, {0., 11.462962962962962`}]}], LineBox[{{0., 11.537037037037036`}, Offset[{-4., 0.}, {0., 11.537037037037036`}]}], LineBox[{{0., 12.462962962962962`}, Offset[{-4., 0.}, {0., 12.462962962962962`}]}], LineBox[{{0., 12.537037037037036`}, Offset[{-4., 0.}, {0., 12.537037037037036`}]}], LineBox[{{0., 13.462962962962962`}, Offset[{-4., 0.}, {0., 13.462962962962962`}]}], LineBox[{{0., 13.537037037037036`}, Offset[{-4., 0.}, {0., 13.537037037037036`}]}], LineBox[{{0., 14.462962962962962`}, Offset[{-4., 0.}, {0., 14.462962962962962`}]}], LineBox[{{0., 14.537037037037036`}, Offset[{-4., 0.}, {0., 14.537037037037036`}]}], LineBox[{{0., 15.462962962962962`}, Offset[{-4., 0.}, {0., 15.462962962962962`}]}], LineBox[{{0., 15.537037037037036`}, Offset[{-4., 0.}, {0., 15.537037037037036`}]}], LineBox[{{0., 16.462962962962965`}, Offset[{-4., 0.}, {0., 16.462962962962965`}]}], LineBox[{{0., 16.537037037037038`}, Offset[{-4., 0.}, {0., 16.537037037037038`}]}], LineBox[{{0., 17.462962962962965`}, Offset[{-4., 0.}, {0., 17.462962962962965`}]}], LineBox[{{0., 17.537037037037038`}, Offset[{-4., 0.}, {0., 17.537037037037038`}]}], LineBox[{{0., 18.462962962962965`}, Offset[{-4., 0.}, {0., 18.462962962962965`}]}], LineBox[{{0., 18.537037037037038`}, Offset[{-4., 0.}, {0., 18.537037037037038`}]}], LineBox[{{0., 19.462962962962965`}, Offset[{-4., 0.}, {0., 19.462962962962965`}]}], LineBox[{{0., 19.537037037037038`}, Offset[{-4., 0.}, {0., 19.537037037037038`}]}]}, {}}}, StyleBox[ {Thickness[Tiny], InsetBox["\<\"see\"\>", Offset[{-2., 0.}, {0., 1.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"do\"\>", Offset[{-2., 0.}, {0., 2.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"did\"\>", Offset[{-2., 0.}, {0., 3.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"could\"\>", Offset[{-2., 0.}, {0., 4.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"know\"\>", Offset[{-2., 0.}, {0., 5.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"should\"\>", Offset[{-2., 0.}, {0., 6.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"say\"\>", Offset[{-2., 0.}, {0., 7.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"will\"\>", Offset[{-2., 0.}, {0., 8.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"has\"\>", Offset[{-2., 0.}, {0., 8.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"said\"\>", Offset[{-2., 0.}, {0., 9.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"says\"\>", Offset[{-2., 0.}, {0., 10.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"are\"\>", Offset[{-2., 0.}, {0., 11.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"been\"\>", Offset[{-2., 0.}, {0., 12.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"would\"\>", Offset[{-2., 0.}, {0., 13.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"were\"\>", Offset[{-2., 0.}, {0., 14.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"be\"\>", Offset[{-2., 0.}, {0., 16.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"have\"\>", Offset[{-2., 0.}, {0., 17.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"is\"\>", Offset[{-2., 0.}, {0., 18.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"had\"\>", Offset[{-2., 0.}, {0., 19.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"was\"\>", Offset[{-2., 0.}, {0., 20.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}]}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, "GraphicsAxes", StripOnInput->False, Antialiasing->False]}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, False}, AxesLabel->{None, None}, AxesOrigin->{0., 0.13851851851851854`}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Identity[ Part[#, 1]], Identity[ Part[#, 2]]}& )}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{{{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {1., FormBox["\"see\"", TraditionalForm], 0}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {2., FormBox["\"do\"", TraditionalForm], 0}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {3., FormBox["\"did\"", TraditionalForm], 0}, {4., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {4., FormBox["\"could\"", TraditionalForm], 0}, {5., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {5., FormBox["\"know\"", TraditionalForm], 0}, {6., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {6., FormBox["\"should\"", TraditionalForm], 0}, {7., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {7., FormBox["\"say\"", TraditionalForm], 0}, {8., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {8., FormBox["\"will\"", TraditionalForm], 0}, {9., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {9., FormBox["\"has\"", TraditionalForm], 0}, {10., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {10., FormBox["\"said\"", TraditionalForm], 0}, {11., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {11., FormBox["\"says\"", TraditionalForm], 0}, {12., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {12., FormBox["\"are\"", TraditionalForm], 0}, {13., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {13., FormBox["\"been\"", TraditionalForm], 0}, {14., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {14., FormBox["\"would\"", TraditionalForm], 0}, {15., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {15., FormBox["\"were\"", TraditionalForm], 0}, {16., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {16., FormBox["\"be\"", TraditionalForm], 0}, {17., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {17., FormBox["\"have\"", TraditionalForm], 0}, {18., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {18., FormBox["\"is\"", TraditionalForm], 0}, {19., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {19., FormBox["\"had\"", TraditionalForm], 0}, {20., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {20., FormBox["\"was\"", TraditionalForm], 0}}, {{1., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {4., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {5., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {6., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {7., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {8., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {9., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {10., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {11., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {12., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {13., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {14., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {15., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {16., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {17., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {18., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {19., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {20., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], 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.683895345546668*^9},ExpressionUUID->"60b08bf4-635a-4338-83f3-\ 288688ecf254"] }, Open ]] }, Open ]] }, WindowSize->{775, 873}, WindowMargins->{{136, Automatic}, {Automatic, 0}}, WindowTitle->"Examples for The Virginians", Visible->True, DockedCells->{}, TaggingRules->{"NotebookTemplateVersion" -> 1.}, CellContext->Notebook, ShowCellTags->True, Background->GrayLevel[0.9999], FrontEndVersion->"11.1 for Linux x86 (64-bit) (April 18, 2017)", StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "CreateDataResourceStyleSheet.nb", CharacterEncoding -> "UTF-8"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[621, 23, 91, 0, 70, "Subsection", "ExpressionUUID" -> \ "8e73b263-f5ff-432f-b2d7-115dc77c792e"], Cell[715, 25, 272, 4, 70, "Text", "ExpressionUUID" -> \ "16de7666-7fc7-459e-9560-1f8c234b4858"], Cell[CellGroupData[{ Cell[1012, 33, 271, 5, 70, "Input", "ExpressionUUID" -> \ "75044300-0712-47e2-83dc-fc7e8aa6c959"], Cell[1286, 40, 14412, 321, 70, "Output", "ExpressionUUID" -> \ "c82dbdcd-3864-433b-a65f-599998cde6bf"] }, Open ]], Cell[15713, 364, 261, 4, 70, "Text", "ExpressionUUID" -> \ "de832eef-fd43-4b6a-9808-b168072fc746"], Cell[CellGroupData[{ Cell[15999, 372, 444, 10, 70, "Input", "ExpressionUUID" -> \ "5d969c36-e676-4c33-a7c5-fcdda3baedec"], Cell[16446, 384, 671, 9, 70, "Output", "ExpressionUUID" -> \ "3fa2b98f-d878-42ca-98be-14987344c8c8"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[17166, 399, 90, 0, 70, "Subsection", "ExpressionUUID" -> \ "18f8af26-1570-4e8b-b3ad-0068b167588e"], Cell[17259, 401, 163, 3, 70, "Text", "ExpressionUUID" -> \ "797814c6-e390-4a0b-b33c-f38b00de769b"], Cell[CellGroupData[{ Cell[17447, 408, 294, 7, 70, "Input", "ExpressionUUID" -> \ "6041a808-a699-4700-a8d3-bc2d0d42e7d2"], Cell[17744, 417, 23888, 565, 70, "Output", "ExpressionUUID" -> \ "61187922-43e3-4af0-bc94-6ecf883e9549"] }, Open ]], Cell[41647, 985, 350, 5, 70, "Text", "ExpressionUUID" -> \ "5604b2b6-8478-42f9-90d5-76f9b80ceadc"], Cell[CellGroupData[{ Cell[42022, 994, 636, 16, 70, "Input", "ExpressionUUID" -> \ "11ebfac2-8528-4141-9601-bdb542d05d0c"], Cell[42661, 1012, 35244, 891, 70, "Output", "ExpressionUUID" -> \ "60b08bf4-635a-4338-83f3-288688ecf254"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)