(* 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[ 97256, 2402] NotebookOptionsPosition[ 95141, 2342] NotebookOutlinePosition[ 95769, 2365] CellTagsIndexPosition[ 95726, 2362] WindowTitle->Examples for The Second Jungle Book WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection",ExpressionUUID->"3ed4ff12-f198-429f-958c-35ed1b423c23"], 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->"c63cd1b3-b7de-42fb-ac05-\ 9a5e37ce48dc"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceObject", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.6804517731799183`*^9, 3.6804517885604563`*^9}, { 3.6804527318597765`*^9, 3.6804527390684977`*^9}},ExpressionUUID->"fa3b0649-99cb-4182-bd82-\ 4f1bc7e585f9"], 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 Second Jungle Book\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Rudyard Kipling's \\\"The Second \ Jungle Book\\\"\"\>", "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 Second Jungle Book\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Type: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"DataResource\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Description: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"Plaintext for Rudyard Kipling's \\\"The Second \ Jungle Book\\\"\"\>", "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\"", "\"short stories\"","\"children's literature\""}, "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[ "de9098e1-ae28-47a0-b256-e895de34c79d"]; 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["\<\"de9098e1-ae28-47a0-b256-e895de34c79d\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Version: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\<\"1.0.0\"\>", "SummaryItem"]}]}, { RowBox[{ TagBox["\<\"Size: \"\>", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ RowBox[{"\\[LeftAssociation]", RowBox[{"\<\"Plaintext\"\>", "\[Rule]", "347592"}], "\\[RightAssociation]"}], "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 Second Jungle Book", "UUID" -> "de9098e1-ae28-47a0-b256-e895de34c79d", "ResourceType" -> "DataResource", "Version" -> "1.0.0", "Description" -> "Plaintext for Rudyard Kipling's \"The Second Jungle Book\"", "ContentSize" -> Association["Plaintext" -> 347592], "ContentElements" -> {"Plaintext"}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.6836508107773037`*^9},ExpressionUUID->"2fe3c4ce-c554-4ebe-a2d7-\ 268ad0acb10e"] }, 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->"6399a069-f37c-4155-a7a1-\ 75e4d5aa2c65"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "[", RowBox[{"[", "10", "]"}], "]"}]], "Input", CellChangeTimes->{ 3.683650837905258*^9, {3.7028353909044123`*^9, 3.702835393234894*^9}},ExpressionUUID->"c190995f-5467-4fc7-8757-\ 04b3e48c2b13"], Cell[BoxData["\<\"\\\"Not much NOW,\\\" said Ikki, rattling his quills in a \ stiff, uncomfortable\\nway, \\\"but later we shall see. Is there any more \ diving into the deep\\nrock-pool below the Bee-Rocks, Little \ Brother?\\\"\"\>"], "Output", CellChangeTimes->{{3.683650843485764*^9, 3.6836508487852917`*^9}, 3.702835394138484*^9},ExpressionUUID->"a8522c13-ea55-461b-b53b-\ 616676c1bb13"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection",ExpressionUUID->"9fa02303-e2fa-459b-9a59-1dc093ba654c"], Cell["Show the most frequently used adjectives:", "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.68365106416912*^9, 3.683651066000186*^9}},ExpressionUUID->"db2359cb-b32a-4442-8e34-\ 9b8988b3a494"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BarChart", "[", RowBox[{ RowBox[{ RowBox[{"TakeLargest", "[", RowBox[{ RowBox[{"Counts", "[", RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}], "]"}], ",", "20"}], "]"}], "//", "Reverse"}], ",", RowBox[{"BarOrigin", "\[Rule]", "Left"}], ",", RowBox[{"ChartLabels", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.6832887705512333`*^9, 3.6832888072249002`*^9}, 3.6833081371530533`*^9, {3.683308191179655*^9, 3.683308192307106*^9}, { 3.6833082251442356`*^9, 3.683308276981035*^9}, 3.6833089065155134`*^9, { 3.6836510506685534`*^9, 3.683651059460904*^9}},ExpressionUUID->"c8018a5e-2b25-4f59-bfca-\ 26f48c77854b"], 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}, {37., 1.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 98.52835146034462}, {78.64755182251945, 88.05740044568138}}], StatusArea[#, 37]& , TagBoxNote->"37"], StyleBox["37", {}, StripOnInput -> False]], Annotation[#, Style[37, {}], "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`}, {41., 2.4629629629629632`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 106.01790296957107`}, {69.02491530950455, 78.43476393266648}}], StatusArea[#, 41]& , TagBoxNote->"41"], StyleBox["41", {}, StripOnInput -> False]], Annotation[#, Style[41, {}], "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}, {44., 3.4629629629629632`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 111.6350666014909}, {59.402278796489654`, 68.8121274196516}}], StatusArea[#, 44]& , TagBoxNote->"44"], StyleBox["44", {}, StripOnInput -> False]], Annotation[#, Style[44, {}], "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}, {45., 4.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 113.50745447879751`}, {49.779642283474764`, 59.1894909066367}}], StatusArea[#, 45]& , TagBoxNote->"45"], StyleBox["45", {}, StripOnInput -> False]], Annotation[#, Style[45, {}], "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}, {48., 5.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 119.12461811071735`}, {40.15700577045987, 49.5668543936218}}], StatusArea[#, 48]& , TagBoxNote->"48"], StyleBox["48", {}, StripOnInput -> False]], Annotation[#, Style[48, {}], "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}, {49., 6.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 120.99700598802396`}, {30.534369257444972`, 39.944217880606914`}}], StatusArea[#, 49]& , TagBoxNote->"49"], StyleBox["49", {}, StripOnInput -> False]], Annotation[#, Style[49, {}], "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}, {50., 7.462962962962963}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 122.86939386533057`}, {20.911732744430083`, 30.321581367592017`}}], StatusArea[#, 50]& , TagBoxNote->"50"], StyleBox["50", {}, StripOnInput -> False]], Annotation[#, Style[50, {}], "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}, {51., 8.462962962962964}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 124.74178174263719`}, {11.289096231415172`, 20.69894485457712}}], StatusArea[#, 51]& , TagBoxNote->"51"], StyleBox["51", {}, StripOnInput -> False]], Annotation[#, Style[51, {}], "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}, {51., 9.462962962962964}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 124.74178174263719`}, {1.6664597184002758`, 11.076308341562225`}}], StatusArea[#, 51]& , TagBoxNote->"51"], StyleBox["51", {}, StripOnInput -> False]], Annotation[#, Style[51, {}], "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}, {52., 10.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 126.6141696199438}, {-7.956176794614606, 1.4536718285473285`}}], StatusArea[#, 52]& , TagBoxNote->"52"], StyleBox["52", {}, StripOnInput -> False]], Annotation[#, Style[52, {}], "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`}, {53., 11.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 128.4865574972504}, {-17.578813307629503`, -8.168964684467568}}], StatusArea[#, 53]& , TagBoxNote->"53"], StyleBox["53", {}, StripOnInput -> False]], Annotation[#, Style[53, {}], "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`}, {59., 12.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 139.72088476109008`}, {-27.2014498206444, -17.791601197482464`}}], StatusArea[#, 59]& , TagBoxNote->"59"], StyleBox["59", {}, StripOnInput -> False]], Annotation[#, Style[59, {}], "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`}, {63., 13.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 147.2104362703165}, {-36.824086333659295`, -27.41423771049736}}], StatusArea[#, 63]& , TagBoxNote->"63"], StyleBox["63", {}, StripOnInput -> False]], Annotation[#, Style[63, {}], "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`}, {64., 14.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 149.0828241476231}, {-46.44672284667419, -37.03687422351226}}], StatusArea[#, 64]& , TagBoxNote->"64"], StyleBox["64", {}, StripOnInput -> False]], Annotation[#, Style[64, {}], "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`}, {74., 15.462962962962964`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 167.80670292068925`}, {-56.06935935968909, -46.65951073652715}}], StatusArea[#, 74]& , TagBoxNote->"74"], StyleBox["74", {}, StripOnInput -> False]], Annotation[#, Style[74, {}], "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`}, {76., 16.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 171.55147867530246`}, {-65.69199587270398, -56.28214724954205}}], StatusArea[#, 76]& , TagBoxNote->"76"], StyleBox["76", {}, StripOnInput -> False]], Annotation[#, Style[76, {}], "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`}, {86., 17.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 190.27535744836857`}, {-75.31463238571888, -65.90478376255695}}], StatusArea[#, 86]& , TagBoxNote->"86"], StyleBox["86", {}, StripOnInput -> False]], Annotation[#, Style[86, {}], "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`}, {91., 18.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 199.63729683490163`}, {-84.93726889873378, -75.52742027557184}}], StatusArea[#, 91]& , TagBoxNote->"91"], StyleBox["91", {}, StripOnInput -> False]], Annotation[#, Style[91, {}], "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`}, {91., 19.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 199.63729683490163`}, {-94.55990541174867, -85.15005678858674}}], StatusArea[#, 91]& , TagBoxNote->"91"], StyleBox["91", {}, StripOnInput -> False]], Annotation[#, Style[91, {}], "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`}, {167., 20.462962962962965`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{28.75, 341.9387755102041}, {-104.18254192476357`, -94.77269330160163}}], StatusArea[#, 167]& , TagBoxNote->"167"], StyleBox["167", {}, StripOnInput -> False]], Annotation[#, Style[167, {}], "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["\<\"red\"\>", Offset[{-2., 0.}, {0., 1.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"deep\"\>", Offset[{-2., 0.}, {0., 2.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"black\"\>", Offset[{-2., 0.}, {0., 3.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"wild\"\>", Offset[{-2., 0.}, {0., 4.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"dead\"\>", Offset[{-2., 0.}, {0., 5.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"big\"\>", Offset[{-2., 0.}, {0., 6.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"white\"\>", Offset[{-2., 0.}, {0., 7.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"new\"\>", Offset[{-2., 0.}, {0., 8.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"many\"\>", Offset[{-2., 0.}, {0., 8.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"full\"\>", Offset[{-2., 0.}, {0., 9.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"other\"\>", Offset[{-2., 0.}, {0., 10.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"own\"\>", Offset[{-2., 0.}, {0., 11.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"more\"\>", Offset[{-2., 0.}, {0., 12.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"great\"\>", Offset[{-2., 0.}, {0., 13.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"long\"\>", Offset[{-2., 0.}, {0., 14.999999999999998}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"old\"\>", Offset[{-2., 0.}, {0., 16.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"last\"\>", Offset[{-2., 0.}, {0., 17.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"thy\"\>", Offset[{-2., 0.}, {0., 18.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"good\"\>", Offset[{-2., 0.}, {0., 19.}], ImageScaled[{1, 1/2}], Automatic, {1, 0}], InsetBox["\<\"little\"\>", 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["\"red\"", TraditionalForm], 0}, {2., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {2., FormBox["\"deep\"", TraditionalForm], 0}, {3., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {3., FormBox["\"black\"", TraditionalForm], 0}, {4., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {4., FormBox["\"wild\"", TraditionalForm], 0}, {5., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {5., FormBox["\"dead\"", TraditionalForm], 0}, {6., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {6., FormBox["\"big\"", TraditionalForm], 0}, {7., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {7., FormBox["\"white\"", TraditionalForm], 0}, {8., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {8., FormBox["\"new\"", TraditionalForm], 0}, {9., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {9., FormBox["\"many\"", TraditionalForm], 0}, {10., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {10., FormBox["\"full\"", TraditionalForm], 0}, {11., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {11., FormBox["\"other\"", TraditionalForm], 0}, {12., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {12., FormBox["\"own\"", TraditionalForm], 0}, {13., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {13., FormBox["\"more\"", TraditionalForm], 0}, {14., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {14., FormBox["\"great\"", TraditionalForm], 0}, {15., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {15., FormBox["\"long\"", TraditionalForm], 0}, {16., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {16., FormBox["\"old\"", TraditionalForm], 0}, {17., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {17., FormBox["\"last\"", TraditionalForm], 0}, {18., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {18., FormBox["\"thy\"", TraditionalForm], 0}, {19., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {19., FormBox["\"good\"", TraditionalForm], 0}, {20., FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[0]], TraditionalForm], {0.004, 0}}, {20., FormBox["\"little\"", 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.683288820857263*^9, 3.683308208402542*^9, {3.6833082423100996`*^9, 3.6833082928962173`*^9}, 3.6833089312569876`*^9, {3.683651056602789*^9, 3.6836510732544117`*^9}},ExpressionUUID->"8ecb87c1-7881-41bb-85b5-\ aeeb4e625c67"] }, Open ]], Cell["Compare word lengths between different works:", "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.683392294018386*^9, 3.683392298490833*^9}},ExpressionUUID->"d5934470-9f35-4351-be73-\ 800567df8365"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PairedHistogram", "[", RowBox[{ RowBox[{"StringLength", "/@", RowBox[{"TextWords", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}]}], ",", RowBox[{"StringLength", "/@", RowBox[{"TextWords", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}]}], ",", "Automatic"}], "]"}]], "Input", CellChangeTimes->{{3.683295434571782*^9, 3.6832954707624006`*^9}, { 3.683650923198951*^9, 3.68365092925986*^9}},ExpressionUUID->"56c2dc14-4a91-456f-aa96-\ b7119a7d0616"], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{ Opacity[0.595], Thickness[Small]}], {{{}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-46720.3, 0.}], Offset[{0, 0}, {-4247.3, 5.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{28.212549800796864`, 166.01932270916336`}, { 74.59589008593731, 88.00493456368056}}], StatusArea[#, 42473]& , TagBoxNote->"42473"], StyleBox["42473", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[42473, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-24679.3, 5.}], Offset[{0, 0}, {-4247.3, 10.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{99.46672496321312, 166.01932270916336`}, { 61.68684560819405, 75.09589008593731}}], StatusArea[#, 20432]& , TagBoxNote->"20432"], StyleBox["20432", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[20432, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-5415.3, 10.}], Offset[{0, 0}, {-4247.3, 15.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{161.7434107001936, 166.01932270916336`}, { 48.7778011304508, 62.18684560819405}}], StatusArea[#, 1168]& , TagBoxNote->"1168"], StyleBox["1168", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1168, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-4323.3, 15.}], Offset[{0, 0}, {-4247.3, 20.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{165.27362980447012`, 166.01932270916336`}, { 35.86875665270754, 49.2778011304508}}], StatusArea[#, 76]& , TagBoxNote->"76"], StyleBox["76", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[76, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-4255.3, 20.}], Offset[{0, 0}, {-4247.3, 25.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{165.49346029814302`, 166.01932270916336`}, { 22.95971217496428, 36.36875665270754}}], StatusArea[#, 8]& , TagBoxNote->"8"], StyleBox["8", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[8, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-4248.3, 25.}], Offset[{0, 0}, {-4247.3, 30.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{165.5160899077858, 166.01932270916336`}, { 10.05066769722103, 23.45971217496428}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ], {}, {}, {}, {}, {}, {}, {}, {}, TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {-4248.3, 70.}], Offset[{0, 0}, {-4247.3, 75.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{165.5160899077858, 166.01932270916336`}, {-106.1307326024683, -92.72168812472503}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ]}, {}, {}}, {{}, {RGBColor[0.987148, 0.8073604000000001, 0.49470040000000004`], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 0.}], Offset[{0, 0}, {38724.3, 5.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 304.9379703843726}, { 74.59589008593731, 88.00493456368056}}], StatusArea[#, 34477]& , TagBoxNote->"34477"], StyleBox["34477", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[34477, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 5.}], Offset[{0, 0}, {19984.3, 10.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 244.3552725692244}, { 61.68684560819405, 75.09589008593731}}], StatusArea[#, 15737]& , TagBoxNote->"15737"], StyleBox["15737", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[15737, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 10.}], Offset[{0, 0}, {5096.3, 15.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 196.22532566037032`}, { 48.7778011304508, 62.18684560819405}}], StatusArea[#, 849]& , TagBoxNote->"849"], StyleBox["849", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[849, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 15.}], Offset[{0, 0}, {4285.3, 20.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 193.60352374318327`}, { 35.86875665270754, 49.2778011304508}}], StatusArea[#, 38]& , TagBoxNote->"38"], StyleBox["38", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[38, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 20.}], Offset[{0, 0}, {4249.3, 25.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 193.48714289359174`}, { 22.95971217496428, 36.36875665270754}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[2, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 25.}], Offset[{0, 0}, {4249.3, 30.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 193.48714289359174`}, { 10.05066769722103, 23.45971217496428}}], StatusArea[#, 2]& , TagBoxNote->"2"], StyleBox["2", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[2, { Directive[], Directive[]}], "Tooltip"]& ], TagBox[ TooltipBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[ Offset[{0, 0}, {4247.3, 30.}], Offset[{0, 0}, {4248.3, 35.}], "RoundingRadius" -> 0]}, ImageSizeCache->{{192.98067729083664`, 193.4839100922142}, {-2.858376780522235, 10.55066769722103}}], StatusArea[#, 1]& , TagBoxNote->"1"], StyleBox["1", { Directive[], Directive[]}, StripOnInput -> False]], Annotation[#, Style[1, { Directive[], Directive[]}], "Tooltip"]& ], {}, {}, {}, {}, {}, {}, {}, {}}, {}, {}}}, {}}, \ {{{{{{{{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {}, {}, {}, \ {}, {}, {}, {}, {}, {{}, {}}}, {}}, {}}, {{{{{}, {}}, {{}, {}}, {{}, {}}, \ {{}, {}}, {{}, {}}, {{}, {}}, {{}, {}}, {}, {}, {}, {}, {}, {}, {}, {}}, {}}, \ {}}}, {}}, {}}, StyleBox[{ TagBox[{ StyleBox[{ LineBox[{ Offset[{0, 0}, {-4247.3, -3.7500000000000004`}], Offset[{0, 0}, {-53303.61500000001, -3.7500000000000004`}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {-4247.3, -3.7500000000000004`}], Offset[{0, -4.}, {-4247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-24247.3, -3.7500000000000004`}], Offset[{0, -4.}, {-24247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-44247.3, -3.7500000000000004`}], Offset[{0, -4.}, {-44247.3, -3.7500000000000004`}]}}], LineBox[{{ Offset[{0, 0}, {-9247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {-9247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-14247.300000000001`, -3.7500000000000004`}], Offset[{ 0., -2.5}, {-14247.300000000001`, -3.7500000000000004`}]}, { Offset[{0, 0}, {-19247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {-19247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-29247.300000000003`, -3.7500000000000004`}], Offset[{ 0., -2.5}, {-29247.300000000003`, -3.7500000000000004`}]}, { Offset[{0, 0}, {-34247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {-34247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-39247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {-39247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {-49247.30000000001, -3.7500000000000004`}], Offset[{ 0., -2.5}, {-49247.30000000001, -3.7500000000000004`}]}}]}, StyleBox[{{{ InsetBox["0", Offset[{0., -7.}, {-4247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["20000", Offset[{0., -7.}, {-24247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["40000", Offset[{0., -7.}, {-44247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}]}, {{}, {}, {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], StyleBox[{ LineBox[{ Offset[{0, 0}, {4247.3, -3.7500000000000004`}], Offset[{0, 0}, {53303.61500000001, -3.7500000000000004`}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {4247.3, -3.7500000000000004`}], Offset[{0, -4.}, {4247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {24247.3, -3.7500000000000004`}], Offset[{0, -4.}, {24247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {44247.3, -3.7500000000000004`}], Offset[{0, -4.}, {44247.3, -3.7500000000000004`}]}}], LineBox[{{ Offset[{0, 0}, {9247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {9247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {14247.300000000001`, -3.7500000000000004`}], Offset[{0., -2.5}, { 14247.300000000001`, -3.7500000000000004`}]}, { Offset[{0, 0}, {19247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {19247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {29247.300000000003`, -3.7500000000000004`}], Offset[{0., -2.5}, { 29247.300000000003`, -3.7500000000000004`}]}, { Offset[{0, 0}, {34247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {34247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {39247.3, -3.7500000000000004`}], Offset[{0., -2.5}, {39247.3, -3.7500000000000004`}]}, { Offset[{0, 0}, {49247.30000000001, -3.7500000000000004`}], Offset[{0., -2.5}, { 49247.30000000001, -3.7500000000000004`}]}}]}, StyleBox[{{{ InsetBox["0", Offset[{0., -7.}, {4247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["20000", Offset[{0., -7.}, {24247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}], InsetBox["40000", Offset[{0., -7.}, {44247.3, -3.7500000000000004}], ImageScaled[{0.5, 1.}], Automatic, {1, 0}]}, {{}, {}, {}, {}, {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False]}, Deploy, DefaultBaseStyle->"Deploy"], { StyleBox[{ LineBox[{ Offset[{0, 0}, {-4247.3, -3.75}], Offset[{0, 0}, {-4247.3, 78.75}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {-4247.3, 0.}], Offset[{4., 0}, {-4247.3, 0.}]}, { Offset[{0, 0}, {-4247.3, 20.}], Offset[{4., 0}, {-4247.3, 20.}]}, { Offset[{0, 0}, {-4247.3, 40.}], Offset[{4., 0}, {-4247.3, 40.}]}, { Offset[{0, 0}, {-4247.3, 60.}], Offset[{4., 0}, {-4247.3, 60.}]}}], LineBox[{{ Offset[{0, 0}, {-4247.3, 5.}], Offset[{2.5, 0.}, {-4247.3, 5.}]}, { Offset[{0, 0}, {-4247.3, 10.}], Offset[{2.5, 0.}, {-4247.3, 10.}]}, { Offset[{0, 0}, {-4247.3, 15.}], Offset[{2.5, 0.}, {-4247.3, 15.}]}, { Offset[{0, 0}, {-4247.3, 25.}], Offset[{2.5, 0.}, {-4247.3, 25.}]}, { Offset[{0, 0}, {-4247.3, 30.}], Offset[{2.5, 0.}, {-4247.3, 30.}]}, { Offset[{0, 0}, {-4247.3, 35.}], Offset[{2.5, 0.}, {-4247.3, 35.}]}, { Offset[{0, 0}, {-4247.3, 45.}], Offset[{2.5, 0.}, {-4247.3, 45.}]}, { Offset[{0, 0}, {-4247.3, 50.}], Offset[{2.5, 0.}, {-4247.3, 50.}]}, { Offset[{0, 0}, {-4247.3, 55.}], Offset[{2.5, 0.}, {-4247.3, 55.}]}, { Offset[{0, 0}, {-4247.3, 65.}], Offset[{2.5, 0.}, {-4247.3, 65.}]}, { Offset[{0, 0}, {-4247.3, 70.}], Offset[{2.5, 0.}, {-4247.3, 70.}]}, { Offset[{0, 0}, {-4247.3, 75.}], Offset[{2.5, 0.}, {-4247.3, 75.}]}}]}, StyleBox[{{{{}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], StyleBox[{ LineBox[{ Offset[{0, 0}, {4247.3, -3.75}], Offset[{0, 0}, {4247.3, 78.75}]}], StyleBox[{{ LineBox[{{ Offset[{0, 0}, {4247.3, 0.}], Offset[{-4., 0}, {4247.3, 0.}]}, { Offset[{0, 0}, {4247.3, 20.}], Offset[{-4., 0}, {4247.3, 20.}]}, { Offset[{0, 0}, {4247.3, 40.}], Offset[{-4., 0}, {4247.3, 40.}]}, { Offset[{0, 0}, {4247.3, 60.}], Offset[{-4., 0}, {4247.3, 60.}]}}], LineBox[{{ Offset[{0, 0}, {4247.3, 5.}], Offset[{-2.5, 0.}, {4247.3, 5.}]}, { Offset[{0, 0}, {4247.3, 10.}], Offset[{-2.5, 0.}, {4247.3, 10.}]}, { Offset[{0, 0}, {4247.3, 15.}], Offset[{-2.5, 0.}, {4247.3, 15.}]}, { Offset[{0, 0}, {4247.3, 25.}], Offset[{-2.5, 0.}, {4247.3, 25.}]}, { Offset[{0, 0}, {4247.3, 30.}], Offset[{-2.5, 0.}, {4247.3, 30.}]}, { Offset[{0, 0}, {4247.3, 35.}], Offset[{-2.5, 0.}, {4247.3, 35.}]}, { Offset[{0, 0}, {4247.3, 45.}], Offset[{-2.5, 0.}, {4247.3, 45.}]}, { Offset[{0, 0}, {4247.3, 50.}], Offset[{-2.5, 0.}, {4247.3, 50.}]}, { Offset[{0, 0}, {4247.3, 55.}], Offset[{-2.5, 0.}, {4247.3, 55.}]}, { Offset[{0, 0}, {4247.3, 65.}], Offset[{-2.5, 0.}, {4247.3, 65.}]}, { Offset[{0, 0}, {4247.3, 70.}], Offset[{-2.5, 0.}, {4247.3, 70.}]}, { Offset[{0, 0}, {4247.3, 75.}], Offset[{-2.5, 0.}, {4247.3, 75.}]}}]}, StyleBox[{{{{}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}}}, {}}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, Antialiasing->False], { StyleBox[InsetBox[ PaneBox["0"], {0, 0.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["20"], {0, 20.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["40"], {0, 40.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False], StyleBox[InsetBox[ PaneBox["60"], {0, 60.}, ImageScaled[{1/2, 1/2}]], "GraphicsLabel", StripOnInput->False]}, {}}}, Antialiasing->False]}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, False}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {{{-4247.3, FormBox["0", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-14247.3, FormBox["10000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-24247.3, FormBox["20000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-34247.3, FormBox["30000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-44247.3, FormBox["40000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-6247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-8247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-10247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-16247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-18247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-20247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-22247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-26247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-28247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-30247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-32247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-36247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-38247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-40247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-42247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-46247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-48247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-50247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-52247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-54247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {4247.3, FormBox["0", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {14247.3, FormBox["10000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {24247.3, FormBox["20000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {34247.3, FormBox["30000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {44247.3, FormBox["40000", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {6247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {8247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {10247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {12247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {16247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {18247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {20247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {22247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {26247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {28247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {30247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {32247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {36247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {38247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {40247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {42247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {46247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {48247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {50247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {52247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {54247.3, FormBox[ InterpretationBox[ StyleBox[ GraphicsBox[{}, ImageSize -> {0, 0}, BaselinePosition -> Baseline], "CacheGraphics" -> False], Spacer[{0, 0}]], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}, {{-4247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-14247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-24247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-34247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-44247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-6247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-8247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-10247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-16247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-18247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-20247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-22247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-26247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-28247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-30247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-32247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-36247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-38247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-40247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-42247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-46247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-48247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-50247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-52247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-54247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {4247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {14247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {24247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {34247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {44247.3, FormBox["\"\"", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {6247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {8247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {10247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {12247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {16247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {18247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {20247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {22247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {26247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {28247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {30247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {32247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {36247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {38247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {40247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {42247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {46247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {48247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {50247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {52247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {54247.3, FormBox["\"\"", TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], PlotRange->{{All, All}, {All, All}}, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.02], Scaled[0.02]}}]], "Output", CellChangeTimes->{ 3.683650940153056*^9},ExpressionUUID->"3bc6da5c-d3c3-4e57-abc2-\ 23803f78c746"] }, Open ]] }, Open ]] }, WindowSize->{775, 873}, WindowMargins->{{136, Automatic}, {Automatic, 0}}, WindowTitle->"Examples for The Second Jungle Book", 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[629, 23, 91, 0, 70, "Subsection", "ExpressionUUID" -> \ "3ed4ff12-f198-429f-958c-35ed1b423c23"], Cell[723, 25, 272, 4, 70, "Text", "ExpressionUUID" -> \ "c63cd1b3-b7de-42fb-ac05-9a5e37ce48dc"], Cell[CellGroupData[{ Cell[1020, 33, 282, 6, 70, "Input", "ExpressionUUID" -> \ "fa3b0649-99cb-4182-bd82-4f1bc7e585f9"], Cell[1305, 41, 14507, 323, 70, "Output", "ExpressionUUID" -> \ "2fe3c4ce-c554-4ebe-a2d7-268ad0acb10e"] }, Open ]], Cell[15827, 367, 261, 4, 70, "Text", "ExpressionUUID" -> \ "6399a069-f37c-4155-a7a1-75e4d5aa2c65"], Cell[CellGroupData[{ Cell[16113, 375, 383, 10, 70, "Input", "ExpressionUUID" -> \ "c190995f-5467-4fc7-8757-04b3e48c2b13"], Cell[16499, 387, 397, 6, 70, "Output", "ExpressionUUID" -> \ "a8522c13-ea55-461b-b53b-616676c1bb13"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[16945, 399, 90, 0, 70, "Subsection", "ExpressionUUID" -> \ "9fa02303-e2fa-459b-9a59-1dc093ba654c"], Cell[17038, 401, 437, 6, 70, "Text", "ExpressionUUID" -> \ "db2359cb-b32a-4442-8e34-9b8988b3a494"], Cell[CellGroupData[{ Cell[17500, 411, 827, 19, 70, "Input", "ExpressionUUID" -> \ "c8018a5e-2b25-4f59-bfca-26f48c77854b"], Cell[18330, 432, 35253, 890, 70, "Output", "ExpressionUUID" -> \ "8ecb87c1-7881-41bb-85b5-aeeb4e625c67"] }, Open ]], Cell[53598, 1325, 442, 6, 70, "Text", "ExpressionUUID" -> \ "d5934470-9f35-4351-be73-800567df8365"], Cell[CellGroupData[{ Cell[54065, 1335, 578, 14, 70, "Input", "ExpressionUUID" -> \ "56c2dc14-4a91-456f-aa96-b7119a7d0616"], Cell[54646, 1351, 40467, 987, 70, "Output", "ExpressionUUID" -> \ "3bc6da5c-d3c3-4e57-abc2-23803f78c746"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)