Notebook[{Cell[ CellGroupData[{Cell[ "\","Subsection"],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.6821849447840075*^9,3.682184951647694*^9},{3.6821850182913575*^9,3.6821850462121496*^9},{3.6821850885233803*^9,3.68218509051958*^9}}, ExpressionUUID->"6dd544fc-bada-4bad-930b-989342109294"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"ResourceObject","[","\"Dracula\"","]"}]],"Input",CellChangeTimes->{{3.6804517731799183*^9,3.6804517885604563*^9},{3.6804527318597765*^9,3.6804527390684977*^9}}, ExpressionUUID->"2659d9f3-3eb3-4850-a5dd-50996e941642"],Cell[ BoxData[InterpretationBox[ RowBox[{TagBox["ResourceObject","SummaryHead"],"[",DynamicModuleBox[{Set[Typeset`open$$, False]},PanelBox[PaneSelectorBox[{False->GridBox[{{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps","SquarePlusIconMedium"],ImageSizeCache->{12.,{0.,12.}}],Appearance->None, RuleDelayed[ButtonFunction,Set[Typeset`open$$,True]],Evaluator->Automatic,Method->"Preemptive"], Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[3.5,CurrentValue["FontCapHeight"], Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[{{{{{{Thickness[0.011111111111111112],{{{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}}}}},{{{{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}}}}},{{{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Dracula\"","SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Plaintext for Bram Stoker's \\\"Dracula\\\"\"","SummaryItem"]}]}},AutoDelete->False, BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}],True->GridBox[ {{PaneBox[ButtonBox[DynamicBox[FEPrivate`FrontEndResource["FEBitmaps","SquareMinusIconMedium"]], Appearance->None,RuleDelayed[ButtonFunction,Set[Typeset`open$$,False]],Evaluator->Automatic, Method->"Preemptive"],Alignment->{Center,Center},ImageSize->Dynamic[{Automatic,Times[ 3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification],-1]]}]],GraphicsBox[ {{{{{{Thickness[0.011111111111111112],{{{{{{FaceForm[{RGBColor[0.648987,0.648987, 0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}},{{{3.789,7.266},{86.20700000000001,7.266},{86.20700000000001,3.266},{3.789,3.266}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{14.129,54.07},{19.878999999999998,54.07},{19.878999999999998,15.57},{14.129,15.57}}}]}}}}}},{{{{{{FaceForm[ {RGBColor[0.274612,0.618881,0.810913],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{24.129,41.82},{29.879,41.82},{29.879,15.57},{24.129,15.57}}}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{33.160000000000004,54.07},{38.910000000000004,54.07},{38.910000000000004,15.57},{33.160000000000004,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{42.191,31.781},{47.941,31.781},{47.941,15.569999999999997},{42.191,15.569999999999997}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{51.223000000000006,46.875},{56.973000000000006,46.875},{56.973000000000006,15.57},{51.223000000000006,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{60.254,37.707},{66.00399999999999,37.707},{66.00399999999999,15.569999999999997},{60.254,15.569999999999997}}}]}}}}}},{{{{{{FaceForm[ {RGBColor[0.648987,0.648987,0.648987],Opacity[1.]}],FilledCurveBox[{{{0,2,0},{0,1,0},{0,1,0}}}, {{{70.12899999999999,54.07},{75.87899999999999,54.07},{75.87899999999999,15.57},{70.12899999999999,15.57}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.879000000000001,60.547},{24.129,60.547},{24.129,56.547},{9.879000000000001,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{9.871,13.097999999999999},{80.121,13.097999999999999},{80.121,9.097999999999999},{9.871,9.097999999999999}}}],FilledCurveBox[ {{{0,2,0},{0,1,0},{0,1,0}}},{{{65.87899999999999,60.547},{80.12899999999999,60.547},{80.12899999999999,56.547},{65.87899999999999,56.547}}}],FilledCurveBox[ {{{0,2,0},{0,1,0}},{{0,2,0},{0,1,0},{0,1,0},{0,1,0}}},{{{11.469000000000001,66.54700000000001},{45.,82.418},{78.398,66.54700000000001}},{{45.,86.73400000000001},{2.2230000000000003,66.54700000000001},{2.2230000000000003,62.547},{87.777,62.547},{87.777,66.54700000000001}}}]}}}}}}}}}}}}, AspectRatio->1,Axes->False,Background->None,Frame->None,FrameTicks->None,ImageSize->{Automatic,Dynamic[ Times[3.5,CurrentValue["FontCapHeight"],Power[AbsoluteCurrentValue[Magnification], -1]],ImageSizeCache->{45.,{0.,9.}}]}],GridBox[{{RowBox[{TagBox["\"Name: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Dracula\"","SummaryItem"]}]},{RowBox[{TagBox["\"Type: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"DataResource\"","SummaryItem"]}]},{RowBox[{TagBox["\"Description: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"Plaintext for Bram Stoker's \\\"Dracula\\\"\"","SummaryItem"]}]},{RowBox[{TagBox[ "\"Categories: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[TemplateBox[ {",","\",\"","\"Textual Data\"","\"Literature\""},"RowWithSeparators"],Short],"SummaryItem"]}]},{RowBox[ {TagBox["\"ContentTypes: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ TagBox[TemplateBox[{",","\",\"","\"Text\""},"RowWithSeparators"],Short],"SummaryItem"]}]},{RowBox[ {TagBox["\"Keywords: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ TemplateBox[{",","\",\"","\"text\"","\"novel\"","\"fiction\""},"RowWithSeparators"], Short],"SummaryItem"]}]},{RowBox[{TagBox["\"Data Location: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ DynamicModuleBox[{Set[DataResource`Private`typesetstorage$$,DataResource`Private`typesetstorageLocation],DataResource`Private`info$$}, DynamicBox[ToBoxes[CompoundExpression[Set[DataResource`Private`info$$,DataResource`Private`resourceInfo[ "39ecd1d5-fd1a-4bb7-877c-d7a963dbdb03"]],If[AssociationQ[DataResource`Private`info$$], DataResource`Private`typesetstorage$$[Lookup[DataResource`Private`info$$,"ContentElementLocations", None]],Missing["NotAvailable"]]],StandardForm]],RuleDelayed[DynamicModuleValues,{}]], "SummaryItem"]}]},{RowBox[{TagBox["\"UUID: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[ "\"39ecd1d5-fd1a-4bb7-877c-d7a963dbdb03\"","SummaryItem"]}]},{RowBox[{TagBox["\"Version: \"", "SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox["\"1.0.0\"","SummaryItem"]}]},{RowBox[ {TagBox["\"Size: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[RowBox[{"\\[LeftAssociation]",RowBox[ {"\"Plaintext\"","\[Rule]","842296"}],"\\[RightAssociation]"}],"SummaryItem"]}]},{RowBox[ {TagBox["\"Elements: \"","SummaryItemAnnotation"],"\[InvisibleSpace]",TagBox[TagBox[ TemplateBox[{",","\",\"","\"Plaintext\""},"RowWithSeparators"],Function[Short[Slot[ 1],2]]],"SummaryItem"]}]}},AutoDelete->False,BaseStyle->{ShowStringCharacters->False,NumberMarks->False,PrintPrecision->3,ShowSyntaxStyles->False}, GridBoxAlignment->{"Columns"->{{Left}},"Rows"->{{Automatic}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}, GridBoxSpacings->{"Columns"->{{2}},"Rows"->{{Automatic}}}]}},AutoDelete->False,BaselinePosition->{1,1}, GridBoxAlignment->{"Rows"->{{Top}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}]}, Dynamic[Typeset`open$$],ImageSize->Automatic],BaselinePosition->Baseline],RuleDelayed[ DynamicModuleValues,{}]],"]"}],ResourceObject[Association["Name"->"Dracula","UUID"->"39ecd1d5-fd1a-4bb7-877c-d7a963dbdb03", "ResourceType"->"DataResource","Version"->"1.0.0","Description"->"Plaintext for Bram Stoker's \"Dracula\"", "ContentSize"->Association["Plaintext"->842296],"ContentElements"->{"Plaintext"}]], Editable->False,SelectWithContents->True,Selectable->False]],"Output",CellChangeTimes->{3.6833725321564655*^9}, ExpressionUUID->"90df93b7-32b8-487f-8f2a-7d49e842471a"]},Open]]},Open]],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.682184974529982*^9,3.6821849772962584*^9},{3.6821850234008684*^9,3.6821850240499334*^9},{3.6821850586563935*^9,3.6821850629428225*^9}}, ExpressionUUID->"71b84f81-5d8a-4671-91bb-c7c4cef46ab1"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"RandomChoice","[",RowBox[{"TextCases","[",RowBox[{RowBox[{"ResourceData","[","\"Dracula\"","]"}],",","\"Paragraph\""}],"]"}],"]"}]], "Input",CellChangeTimes->{3.6833725409194655*^9},ExpressionUUID->"8e9b2a45-2774-460b-a17a-403bf4e872c6"],Cell[ BoxData[ "\"\\\"Jonathan is in a stupor such as we know the Vampire can produce. We can\\ndo nothing with poor Madam Mina for a few moments till she recovers\\nherself; I must wake him!\\\" He dipped the end of a towel in cold water\\nand with it began to flick him on the face, his wife all the while\\nholding her face between her hands and sobbing in a way that was\\nheart-breaking to hear. I raised the blind, and looked out of the\\nwindow. There was much moonshine; and as I looked I could see Quincey\\nMorris run across the lawn and hide himself in the shadow of a great\\nyew-tree. It puzzled me to think why he was doing this; but at the\\ninstant I heard Harker's quick exclamation as he woke to partial\\nconsciousness, and turned to the bed. On his face, as there might well\\nbe, was a look of wild amazement. He seemed dazed for a few seconds, and\\nthen full consciousness seemed to burst upon him all at once, and he\\nstarted up. His wife was aroused by the quick movement, and turned to\\nhim with her arms stretched out, as though to embrace him; instantly,\\nhowever, she drew them in again, and putting her elbows together, held\\nher hands before her face, and shuddered till the bed beneath her shook.\""], "Output",CellChangeTimes->{{3.683372543803466*^9,3.6833725496674657*^9}},ExpressionUUID->"963587b8-ca3d-41d8-a381-3baa7086c38a"]}, Open]]},Open]]},Open]],Cell[ CellGroupData[{Cell[ "\","Subsection"],Cell[ CellGroupData[ {Cell[ "\","Text",CellChangeTimes->{{3.6821849447840075*^9,3.682184951647694*^9},{3.6821850182913575*^9,3.6821850462121496*^9},{3.6821850885233803*^9,3.68218509051958*^9},{3.683372646355466*^9,3.6833726525784655*^9}}, ExpressionUUID->"be0f9d90-cb3c-4b09-b7f9-802fcaa23697"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{"BarChart","[",RowBox[{RowBox[{RowBox[{"TakeLargest","[",RowBox[{RowBox[{"Counts","[",RowBox[ {RowBox[{"Interpreter","[","\"Country\"","]"}],"[",RowBox[{"ToLowerCase","/@",RowBox[ {"TextCases","[",RowBox[{RowBox[{"ResourceData","[","\"Dracula\"","]"}],","," ","\"Country\""}],"]"}]}],"]"}],"]"}],",","10"}],"]"}],"//","Reverse"}],",",RowBox[ {"BarOrigin","\[Rule]","Left"}],",",RowBox[{"ChartLabels","\[Rule]","Automatic"}]}],"]"}]], "Input",CellChangeTimes->{3.6832948310374346*^9,{3.683303919441325*^9,3.6833039664439225*^9},{3.6833047256091137*^9,3.6833047577011137*^9},{3.6833725800734653*^9,3.683372585881466*^9}}, ExpressionUUID->"12ef7b1b-d609-4cfa-a2f0-6c185e3efe03"],Cell[ BoxData[GraphicsBox[ {{{{{{{Opacity[0],PointBox[{0.,0.3429357798165137}]}}}}}},{{},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,0.5412844036697247},{1.,1.4587155963302751}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,107.46173469387755},{63.69061443404155,80.25913211847015}}], Function[StatusArea[Slot[1],1]],TagBoxNote->"1"],StyleBox["1",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[1,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,1.5412844036697246},{1.,2.458715596330275}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,107.46173469387755},{46.175930158014374,62.74444784244298}}], Function[StatusArea[Slot[1],1]],TagBoxNote->"1"],StyleBox["1",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[1,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,2.541284403669725},{1.,3.4587155963302756}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,107.46173469387755},{28.661245881987185,45.2297635664158}}], Function[StatusArea[Slot[1],1]],TagBoxNote->"1"],StyleBox["1",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[1,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,3.5412844036697253},{2.,4.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,154.6734693877551},{11.146561605960002,27.71507929038861}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,4.541284403669725},{2.,5.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,154.6734693877551},{-6.368122670067166,10.200395014361433}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,5.541284403669725},{2.,6.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,154.6734693877551},{-23.882806946094348,-7.314289261665749}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,6.541284403669725},{2.,7.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,154.6734693877551},{-41.397491222121516,-24.82897353769293}}], Function[StatusArea[Slot[1],2]],TagBoxNote->"2"],StyleBox["2",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[2,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,7.541284403669725},{3.,8.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,201.88520408163265},{-58.91217549814871,-42.343657813720114}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,8.541284403669724},{3.,9.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,201.88520408163265},{-76.42685977417588,-59.85834208974728}}], Function[StatusArea[Slot[1],3]],TagBoxNote->"3"],StyleBox["3",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[3,{}],"Tooltip"]]]}}}}}},{{{{{{RGBColor[0.982864, 0.7431472,0.3262672],EdgeForm[{Opacity[0.63],Thickness[Small]}],TagBox[TooltipBox[ TagBox[DynamicBox[{FEPrivate`If[CurrentValue["MouseOver"],EdgeForm[{GrayLevel[0.5],AbsoluteThickness[ 1.5],Opacity[0.66]}],{},{}],RectangleBox[{0.,9.541284403669724},{6.,10.458715596330276}, "RoundingRadius"->0]},ImageSizeCache->{{59.75,343.5204081632653},{-93.94154405020308,-77.37302636577445}}], Function[StatusArea[Slot[1],6]],TagBoxNote->"6"],StyleBox["6",{},StripOnInput->False]], Function[Annotation[Slot[1],Style[6,{}],"Tooltip"]]]}}}}}}}}}}}},{},{}},{},{},StyleBox[ {{{{{{{Thickness[Tiny],LineBox[{{0.,0.3429357798165137},{0.,10.66103119266055}}],StyleBox[ {},"GraphicsLabel",StripOnInput->False]}}}}}},StyleBox[{{{{{{{Thickness[Tiny],LineBox[ {{0.,0.5412844036697247},Offset[{-6.,0.},{0.,0.5412844036697247}]}],LineBox[{{0.,10.458715596330276},Offset[ {-6.,0.},{0.,10.458715596330276}]}],{{},{},{},{},{},{},{},{},{},{},{LineBox[{{0.,1.4587155963302751},Offset[ {-4.,0.},{0.,1.4587155963302751}]}],LineBox[{{0.,1.5412844036697249},Offset[{-4.,0.}, {0.,1.5412844036697249}]}],LineBox[{{0.,2.458715596330275},Offset[{-4.,0.},{0.,2.458715596330275}]}],LineBox[ {{0.,2.541284403669725},Offset[{-4.,0.},{0.,2.541284403669725}]}],LineBox[{{0.,3.4587155963302756},Offset[ {-4.,0.},{0.,3.4587155963302756}]}],LineBox[{{0.,3.5412844036697253},Offset[{-4.,0.}, {0.,3.5412844036697253}]}],LineBox[{{0.,4.458715596330276},Offset[{-4.,0.},{0.,4.458715596330276}]}],LineBox[ {{0.,4.541284403669724},Offset[{-4.,0.},{0.,4.541284403669724}]}],LineBox[{{0.,5.458715596330275},Offset[ {-4.,0.},{0.,5.458715596330275}]}],LineBox[{{0.,5.541284403669724},Offset[{-4.,0.}, {0.,5.541284403669724}]}],LineBox[{{0.,6.458715596330275},Offset[{-4.,0.},{0.,6.458715596330275}]}],LineBox[ {{0.,6.541284403669724},Offset[{-4.,0.},{0.,6.541284403669724}]}],LineBox[{{0.,7.458715596330275},Offset[ {-4.,0.},{0.,7.458715596330275}]}],LineBox[{{0.,7.541284403669724},Offset[{-4.,0.}, {0.,7.541284403669724}]}],LineBox[{{0.,8.458715596330276},Offset[{-4.,0.},{0.,8.458715596330276}]}],LineBox[ {{0.,8.541284403669724},Offset[{-4.,0.},{0.,8.541284403669724}]}],LineBox[{{0.,9.458715596330276},Offset[ {-4.,0.},{0.,9.458715596330276}]}],LineBox[{{0.,9.541284403669724},Offset[{-4.,0.}, {0.,9.541284403669724}]}]},{}}}}}}}},StyleBox[{{{{{{Thickness[Tiny],InsetBox[InterpretationBox[ "\"Norway\"",Entity["Country","Norway"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,1.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Greece\"",Entity["Country","Greece"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,2.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Hungary\"",Entity["Country","Hungary"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,3.0000000000000004}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"India\"",Entity["Country","India"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,4.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Switzerland\"",Entity["Country","Switzerland"],BaseStyle->"Entity"],Offset[{-2.,0.}, {0.,5.}],ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Germany\"",Entity["Country","Germany"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,6.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"France\"",Entity["Country","France"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,7.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Greenland\"",Entity["Country","Greenland"],BaseStyle->"Entity"],Offset[{-2.,0.}, {0.,8.}],ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"China\"",Entity["Country","China"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,9.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}],InsetBox[InterpretationBox[ "\"Turkey\"",Entity["Country","Turkey"],BaseStyle->"Entity"],Offset[{-2.,0.},{0.,10.}], ImageScaled[{1,Times[1,Power[2,-1]]}],Automatic,{1,0}]}}}}}},"GraphicsLabel",StripOnInput->False]}, "GraphicsTicks",StripOnInput->False]},"GraphicsAxes",StripOnInput->False,Antialiasing->False]}, AspectRatio->NCache[Power[GoldenRatio,-1],0.6180339887498948],Axes->{True,False}, AxesLabel->{None,None},AxesOrigin->{0.,0.3429357798165137},RuleDelayed[CoordinatesToolOptions, {"DisplayFunction"->Function[{Identity[Part[Slot[1],1]],Identity[Part[Slot[1],2]]}],"CopiedValueFunction"->Function[ {Identity[Part[Slot[1],1]],Identity[Part[Slot[1],2]]}]}],FrameLabel->{{None,None},{None,None}}, FrameTicks->{{{{1.,FormBox[InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0}, BaselinePosition->Baseline],"CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{1.,FormBox[ InterpretationBox["\"Norway\"",Entity["Country","Norway"],BaseStyle->"Entity"],TraditionalForm],0},{2.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{2.,FormBox[InterpretationBox[ "\"Greece\"",Entity["Country","Greece"],BaseStyle->"Entity"],TraditionalForm],0},{3.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{3.,FormBox[InterpretationBox[ "\"Hungary\"",Entity["Country","Hungary"],BaseStyle->"Entity"],TraditionalForm],0},{4.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{4.,FormBox[InterpretationBox[ "\"India\"",Entity["Country","India"],BaseStyle->"Entity"],TraditionalForm],0},{5.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{5.,FormBox[InterpretationBox[ "\"Switzerland\"",Entity["Country","Switzerland"],BaseStyle->"Entity"],TraditionalForm],0},{6.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{6.,FormBox[InterpretationBox[ "\"Germany\"",Entity["Country","Germany"],BaseStyle->"Entity"],TraditionalForm],0},{7.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{7.,FormBox[InterpretationBox[ "\"France\"",Entity["Country","France"],BaseStyle->"Entity"],TraditionalForm],0},{8.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{8.,FormBox[InterpretationBox[ "\"Greenland\"",Entity["Country","Greenland"],BaseStyle->"Entity"],TraditionalForm],0},{9.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{9.,FormBox[InterpretationBox[ "\"China\"",Entity["Country","China"],BaseStyle->"Entity"],TraditionalForm],0},{10.,FormBox[ InterpretationBox[StyleBox[GraphicsBox[{},ImageSize->{0,0},BaselinePosition->Baseline], "CacheGraphics"->False],Spacer[0]],TraditionalForm],{0.004,0}},{10.,FormBox[InterpretationBox[ "\"Turkey\"",Entity["Country","Turkey"],BaseStyle->"Entity"],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}}}},{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},BoxID->"{\"type\":\"Image\",\"message\":\"RasterizedDueToUnsupportedContent\",\"imageData\":{\"imageSource\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAWgAAADHCAYAAAA02MlaAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAAAOxAAADsQBlSsOGwAAGSFJREFUeJzt3X+UXOV5H/Dv894Zzcpdjr1BopawW3Dr+qBgndgRxUSxUeHk4LgFWzGKqCJYmL33HQsbjFz8o9iUbto0qLGswBqxeme0awkhWAsZYjcJYE5iHIv+QDaODTWk5gSwTuMUGWythNidue/TPzRDRuv9Nbsze+/sfD/n7NHMnXfuPLPH+/D6ve99HoCIiIiIiIiIiIiIiJrCWqtJx0BENBsm6QCIiGhyTNBERCmVSTqAVplhKWPPggVCRJ2sdz5vlmZF0S6stXrXVT9LOgwiWuTytx/GPY++OK8cyyUOIqKUYoImIkqpBVmDnmw92Dk366m/tVYbGU9EtBgsSIKuJVcmWiKi2Ut0F8fEhF17bq1VVf0UgE3FYvGCutc/oqqXFYvFLfl8fmUQBF8BcJGIPAXgOufc89baHxhjNgwODj5nrV0G4KkVK1ac29/fX1nwL0hENA9pXoM+2tXVdWntST6fPwPAlSJyIwAEQXAHgKHx8fHlInI3gMHq0P3e+6uqjzcBOMjkTETtKLX7oOM4fmhgYGC09jwIgj9Q1e8Xi8UyAIjIJQCuzOVyUFUAOAEAlUrlviAI/gxAP4Be771NIHwionlLTYLu7e19S/3zoaGh0frnIvIzVV1Wdygol8tnDQ8PvzzhfS9aa1+x1m4EsLRUKn23dVETEbVO0ksc5TAM1/f19f3KkiVLvjrdQOdcv4gsDcPw1wFAVb+dzWZv3rp169IoigpRFD1RN3y/qt4JYF8rgyciaqVEE7T3fqMxZsQY82MAD83iLX9rjLkGAOI4vgHAmhMnThwVEWuMCWuDjDEHRWR5pVK5t0WhExG13KLc8hZF0cUiss05976Jr/FWbyJaCM241Ts1a9DNJCJfA3Bt0nEQEc3HokzQzrkzk46BiGi+kr5ISEREU1iUM+h6k9UByd9+OIlQqI0devoo1p6/bOaBRDR37ElIRO1iUe7iqDdZQj75wiNJhEJt7J5HX9yLeXbHIGrUok/QE3GbHc1F9pKDTNC04HiRkIgopZigiYhSKvFdHFEUfQLAvwOwDMCjmUwmvPvuu1+dqrg/i/4TUadIdAZtre0VkT7v/YfiOF4pIi9WKpW7pnsPkzMRdYqkZ9A3qOpNu3fv/hEAbN68+dalS5e+cSGmUChc472/RUTe4b3fWCqVHqzvugLg86oaicjZda9fqKo7RGQ1gGMi8rldu3btTeoLEhHNVaIJWlVXicj3a8/37dt3AsDO2nPv/fkicqH3/hJjzAiAJRNOkevu7l41Ojr6wbrXhwHcCuDr3vvVxpiHATBBE1HbSfoi4esAylO92N3dfZtz7helUulBANmJr1cqlS/u2LHjZP3r2Wz2/SJynqreb4w5gFNr20REbSfRBC0ijwF4b/2xWkF+ANixY8fJ6d4/sesKAJTL5YcAHBWRnSJyWbNiJSJaaIkucXjv+0Vk15YtW64ZGxt7OZPJ3KyqSwHMuU2Vqq5W1ZsymcxPvPdfamK4REQLKtEZdKlUekZEdsZx/FdBEBxR1bePj4//h/mcU0RuEZFvxnH8PVVlP0Iialsdt2WNt3rTXPBWb0pC0hcJiYhoCkzQREQpxQRNRJRSSd9J2HKT1YOurifSL1sL4FDSQRDRKZxBUz0mZ6IU4S4OolngLg5KAmfQREQpxQRNRJRSTNBERCk1q10cYRiur5bzzKrqmIhc4Zx7tJWBNatzCjuwEFG7mnEGXU3O+7z3G51zIiK9AB6IoujiBYiPiKhjzTiDNsaM1LqVAIBzbiQMQzXGrAHwuLVWVfVTADYVi8UL8vn8yiAIvgLgIhF5CsB1zrnnpzo+VWeU2udP1SFlqvcVCoVzvPf7RWQVgKjZvzAiooUymzXobH3CBIBSqfRV59z2ukNHu7q6LgWAIAjuADA0Pj6+XETuBjA43fGqXHd39yrv/cbqUkq9YQDbAfR47y9X1e3TvU9Vvywij1UqlbcDWDOL70dElEoN30lYf2debW03juOHBgYGRgFARC4BcGUul4OqAsCJ6Y4D/9AZBcCD1trTOqdks9n3l8vlLaq6yRjzHtR1SJnifesA/N7Q0NBoX1/ftiAIPtPodyQiSoPZJOhyGIbr65Y4pO6iIYBf6mwSlMvls4aHh1+ecJ6pjk/aGeWNDz/VIeXeaoeUl1T1b6Z7n6pqJpMxABAEAXepEFHbmjGBVZcP9oVhuB44/aLhZONV9dvZbPbmrVu3Lo2iqBBF0RPTHZ+Jqq723j9pjPmhqt4203gReSyO41v6+vrOU9VZfQYRURrNmKBLpdKD3vvNxpgRa61WLxpunrguXRPH8Q0A1pw4ceKoiFhjTDjd8Zk02iFFRD4B4MIgCL5R3XFCRNSWOm5/MGtx0FywFgclgWu0REQpxQRNRJRSHVmwP3/74SRCSb1DTx/F2vOXzTyQiKgVJkvYRERptOgvEk6WkE++8EgSoXS8ex59cdH/742omTruD4a7OJKRv/0wEzRRg3iRkIgopZigiYhSquW7OCZbA2YBfSKimS3INjsmZCKixiW2D3piof85FOY/W1V3q+oHADwvItc55w5P1Rggqe9JRDRXC5KgJ6shXfVGoX+cKsx/K4Cve+9XG2MeBrC3+lquu7t71ejo6AerZU6XeO/vAvBMNpu9slKp/LaqDgN4d11jgCu6urrWq+oggN9q+ZckImqyRJc46gv9z6Ew/6WZTOa6nTt3HgdwoPozbWMAIqJ2kuit3vUF9xstzA+gHMexn+T4lI0BiIjaSWpqcajqalW9KZPJ/MR7/6WZxovItwB8Op/Pb8tkMh9S1S8Ui8V31zUG+I/Hjx+/BkBvsVj8jZZ/ASKiJkvNPuhGC/N7728EcEEmk/k7Vf2sql4NzL0xABFR2nTc9jfe6p0M3upN1LjUzKCJiOh0TNBERCnFBE1ElFKp2cXRKpPVAqk2AG1HawEcSjoIIloYnEG3FyZnog7ScVfVuYsjGdzFQdQ4zqCJiFKKCZqIKKXmdZEwDMP11epyWVUdE5ErnHOPNik2IqKONucZdDU57/Peb3TOiYj0AnggiqKLmxgfEVHHmvMM2hgzUiueDwDOuZEwDNUYswbA41MVzp+kUL+KSKiqOwB8FkAOwB947zeXSqUHGy3kb639gTFmw+Dg4HPW2mUAnlqxYsW5/f39lXn+roiIFtR81qCzteRcUyqVvuqc2w4AdYXzl4vI3QAG64bWF+qHqgbe+3+lqp9U1Z947zdXl06AU4X8twPo8d5frqrb686T6+7uXuW931g3fr/3/qrq400ADjI5E1E7atpFQmut1n6AU4XzReS+XC53UlX3A7ioNrZaqP9Y7fnY2NjeUqn0PRF5189//vNvVBN/FjhVyF9EzlPV+40xBzBJIf/68ZVK5T5V/d3qkF7v/T3N+o5ERAtpPgm6HIbh+toT55x4738HQLl6KCiXy2c556T6010bO7EA/549e14HoABw4MCB8dM+5FQh/6PVQv6X1b82WSH/oaGhF0XkFWvtRgBLS6XSjKVLiYjSaM4JurqssK+WpOsvGgJAXeH8pVEUFaIoemIun6Oqq733Txpjfqiqt83ybftV9U4A++bymUREaTDnBF0qlR6srRVba7V60XBzbV26WYXzGy3kDwDGmIMisrxSqdw7l88kIkqDRXnrbRRFF4vINufc+ya+xlu9k8FbvYkatyir2YnI1wBcm3QcRETzsSgTtHPuzKRjICKaL9biICJKqUU5g643WcH+/O2Hkwhl3g49fRRrz18280AionY0WcImIkqjRX9VfbKEfPKFR5IIpeNxFwdRYzruD4bb7JLBbXZEjeNFQiKilGKCJiJKKdPX17c6iqK/jKLotSiKRq21j/T19a1u5CS1dV5r7X9rVmDNupjHi4JE1K5MEAQHROReEVmWzWZXADgQBMHBRk7inKutLf7r5odIRNSZMgCWee8Pl0ql16rHStUfRFH0jIh81Dn3bKFQWKuq31HVdcVi8fFCofBOVX0CwEoAb5QItdaqc04mzlxV1ReLxWC2nVbqztdQR5VCoXCO936/iKwCELXuV0dE1FoGwMeMMQ9ba79lrb21UCisrXt9BMBHAEBVrwDwEoArqs83ANjvnCsD/zCLrv+39iMioYgUgMY6rVQ11FFFVb8sIo9VKpW3A1gz/18REVEyjHPuAIC3i8jnAZRV9cthGEYAEATBGwkawOUArq/+C1W90nu/d6YPiKKooKr/2DlXAhrrtAI03lEFwDoA24eGhkbjON42l18KEVEaZACgOgs+BOCQtbZkjPkxgGK18WrOWnspgJPOuT+11v5hoVD4sKouKRaL09ZnjqLoehH5F865m+oOB+Vy+azh4eGXJ46frENKtaPKvdWOKi+p6t9MN15VNZPJGAAIgoC7VIiobZkoip4Pw/DXAaC3t7cLwHsBPF835kB1pnsQAFR1RFX3ANgz8WSq6j/+8Y+fCQDW2hsBvNs5t3XCmIY6rTTaUUVEHovj+Ja+vr7zqmvkRERtyajqR40xX7DWvpDL5V5V1c+IyFV1Y0ZE5Czv/QMA4L0fAdA9RbeSh8vl8kvVx3eIyMestb6+mWyjnVYa7agiIp8AcGEQBN8Qkd7Z/BKIiNKo42695a3eyeCt3kSN4xotEVFKMUETEaUUEzQRUUp1ZEeV7CUHZ9y/nVJrcWo7JBF1AM6g2wuTM1EH6bir6tzFkQzu4iBqHGfQREQpxQRNRJRSTNBERCmVugTdaAeUum4u7JxCRItK6hL0XNV1dSEiWhRSuw+60Y4pdZ1cJu3AktgXISKao7TPoOfSMWW6DixERG0j1Ql6Lh1TpuvAQkTUTlKdoKfqmFLrlDJZx5RqB5aj1Q4sly1AmERELZHqBD2ZmTqmNNqBhYgordoxQU/bMaXRDixERGnVcVvTWIsjGazFQdS4tptBExF1CiZoIqKUSu2NKs0y2S3g+dsPJxHKvB16+ijWns9dg0S0SLFmBxG1i0V/0WayhHzyhUeSCKUpeKGNqHN03B97O+/i4E4Ios7Ci4RERCnVlAQ92TIC13qJiOaHM2giopRq+Ta7Wp3mic+nqvecz+f/aSaTGQFwjqr+vojcNV2dZ2utquqnAGwqFosXWGt/YIzZMDg4+Jy1dhmAp1asWHFuf39/pdXflYiomZqWoOe4pJHr7u5eNTo6+sFqveclQRDcAeCxXC73X8fGxm6tGzsM4FYAX/ferzbGPAygVoj/aFdX16XVx/u991cB6AewCcBBJmciakdNS9ATW07NJmHX6j0DeNBaW6v3fCmA3oGBgWNbtmz5L3Ec3wycqvNcLpe3qOomY8x7UFfnOY7jhwYGBkar57wvCII/w6kE3eu9t835hkREC2tB16B7e3vfUv98snrPIvLGbDeO46D2eLo6z/XnGRoaelFEXrHWbgSwtFQqsaIdEbWlhbjVuxyG4XpVfdwYc/8sxn9TVW/esmXLcBzH99QOqupqVb0pk8n8xHv/pRnOsV9V7xSRO+YXOhFRclo+g671EzTG/BjAQzONr1QqNwH4zTiO/wLAH6vqSaCxOs/GmIMisrxSqdzblC9BRJSA1N6VVl2T7gXwMefcZM1hpxRF0cUiss05975Jzss7CYmoLaSump21dreqrgfwjwD8tfc+bPQcIvI1ANc2OzYiooWUugTtnOsD0DfPc5zZpHCIiBLDOwmJiFKKCZqIKKVSt8TRbJPdMJO95ODeycY2yVoAh1p4fiLqEJxBNx+TMxE1Rcdt2eI2OyJqF5xBExGlFBM0EVFKMUETEaVUS3dxhGG4vlrnOauqYyJyhXPu0VZ+JhHRYtGyGXQ1Oe/z3m90zomI9AJ4IIqii1v1mUREi0nLZtDGmJFaGysAcM6NhGGoxpg1AB6f2Koqn8+vDILgKwAuEpGnAFznnHt+quOFQuFsVd2tqh8A8LyIXOecOzzV+FZ9TyKiVmnlGnS2lpxrSqXSV51z2+sOvdGqqtrqamh8fHy5iNwNYHC64977u1T1mWw2e5aI/L6qDk83noio3SzYnYT1d/TV2mPVt6oSkUsAXJnL5aCqAHBiuuMALs1kMtft3LnzOIAD1Z/pxhMRtZVWJuhyGIbr65Y4pO6iIYBfankVlMvls4aHh1+ecJ6pjpfjOPaTfO5U44mI2krLljiqnVT2hWG4Hjj9ouFk41X129ls9uatW7cujaKoEEXRE9MdF5FvAfh0Pp8/w1q7MYqiH043noio3bQsQZdKpQe995uNMSPWWq1eNNw8cV26Jo7jGwCsOXHixFERscaYcLrj3vsbAVyQyWT+TlU/q6pXTzeeiKjddFxdB9biIKJ2wTsJiYhSigmaiCilOrJgf/72wy37vENPH8Xa85e17PxERIvWZAmbiCiNFv0Fp8kS8skXHkkilKbgRUKiztFxf+zcxUFE7YIXCYmIUqqpCdpaq1EUXT3xWDM/g4ioU7RiBv0Za+2bW3BeIqKO0vRtdsaYP/be/ycAN9YfD8PwbcaYvQD+par+D1W9tlQqHZlYFzqKomdE5KPOuWcLhcJaVf2Oqq4rFouPFwqFd6rqEwBWAnivqu4QkdUAjonI53bt2rXXWvsDY8yGwcHB56y1ywA8tWLFinP7+/srzf6uRESt1PQZ9K5du4ZE5D1hGP7aaR9kzICq/vdcLrdSRJ4UkS/XvfxGXWgAIwA+AgCqegWAlwBcUX2+AcB+51wZwDCA7QB6vPeXq2qtzvR+7/1V1cebABxkciaidtSKJQ41xtxojLkTp+8S+cD4+PgfDQwMHBsbG9smIutqL1TrQh8DgCAI3kjQAC4HcH31X6jqld77vQCQzWbfLyLnqer9xpgDAJYBQKVSuU9Vf7f6/l7v/T0t+I5ERC3Xkl0cg4ODTwH46yiKrpvss970pjeJqga15/V1oQcHB58DkLPWXgrgpHPuT0Xk9UKh8GERWVIqlb4LAOVy+SEAR0Vkp4hcVneuF0XkFWvtRgBLa+OJiNpNK7fZfUFEPlV7oqp/tWTJkk/n8/kzKpXKZ0Xk0DTvPaCq+wEcrL53RFX3ANhTd77V3vsnjTE/VNXbJrx/v6reCWBfE78PEdGCalmCds79QlW31Z5X6zT/RhAEfy8ia0XkY9O8fUREzvLePwAA3vsRAN2VSuXe2gARuUVEvhnH8fdU9bRZsjHmoIgsrx9PRNRuFuVdaVEUXSwi25xz75v4Gu8kJKJ2sSir2YnI1wBcm3QcRETzsSgTtHPuzKRjICKaL9biICJKKSZoIqKUWpRLHMD0RZqylxzc28KPXgtgui2Ec2atvQZwrTh1y1lr1TnXthc42zl+xp6Mdo49MbOprjfbCnw8V3o/rxPO1c6xp/VcaYudSxxERCm1aKffrENNRO2MyyNERERERERERERE1EodsQhtrb1QVe8XkbMBPKuqNxSLxceTjmu2wjB8m4g8WSwWVyQdSyOstRcB2Kmq7wLwrIhY59zhpOOarTAMf9UYUwLwawD+D4BPOuf+MuGwGmKtvRzA19vpglOhUDhHVf+2/li7xN/b29uVy+XuVNUrReRnqhrOJ9cs2htV6qnqvxeRL1Yqlb2ZTOaGap3qtkjQYRiuN8b8EYC3Jh3LHHwFwM3j4+PfzOVy11afn59kQI0wxuwDsD2Xyx04efLkb4nIfgBt8x/J3t7eLgB/mHQcjYrjeJ2I7C0Wi71Jx9KoXC53C041EnmbiHwIQAnAO+d6vo5I0ADW5HK5a5xzo319fbuDICgkHdBsiYiN4/jyIAj+d9KxNMo5967a461bt+45ceJEWyUL59x7AGDDhg1Lenp63gLgpwmH1JAlS5Z8TlXvE5H/nHQsjTDGrFPVx5KOYy5U9aOqek2pVHoNwAPVnznriAQtIssHBgZGAeDYsWNHe3p62mYWVCwWfxsArLVJhzIvr7322m8C+JOk42hUPp8/IwiCIwDOUNW2mdFt2bLlHXEc/04ul7tgbGysrRI0gHUAzo2iaKeIPB3HcX737t0/Sjqo2RCRd4jIh6Mo+gsAL6nq1aVS6ftzPV+n3ElYvu222+rXsHgTywLq6+v7Fe/9DQA+mXQsjRoaGhotFotv9t5fLSK3Jx3PbMVxfAeAzwwMDIwlHUujnHPnFIvFi1euXPlm730YBMGemd+VGllV/Vl3d/dbReRGESnO52SdkqB/euTIkbcAQE9PTw+A/5dwPB3j+uuvf2sQBANxHN/gnPtF0vHM1ZIlS/5EVXuSjqMB/wbAn9fuqG3HO2v7+/v92Wef/SMAq5KOZbZU9addXV3DO3bsOAngOyIyr2suHbHEAeB/GmM2bd26dffx48d/T0TaZidBOwvD8LJKpfL5OI43DA0N/X3S8TQqiqJnRSR89dVX/1ccxx9Em1xYBk7f9dBuVdWstc+JyNWvvPLKd48cOfKrQRC0pDpkK4jIn7/++uv/1lo7JCLrvPffnfldU+uIBF39vxn3HD9+fIeI/F8AVyUdUycwxjgA/yQIgp/W1tDbKVEYY67x3ruenp5/rqqHVLUv6Zg6gfe+1xhT7Onp+Weq+oT3Pp90TLM1Njb26VwuV1LVL6rq88aYTUnHRERERETUOf4/yPV5gcNdceQAAAAASUVORK5CYII=\",\"boundingBox\":{\"width\":360,\"height\":199,\"baseline\":102}},\"plotRange\":[0,1,0,1],\"requestedImageSize\":[\"Automatic\",\"Automatic\"]}"]], "Output",CellChangeTimes->{3.683372588388466*^9},ExpressionUUID->"e4da8164-4f0b-453c-8a6d-15d571142039"]}, Open]]},Open]],Cell[ CellGroupData[{Cell[ "\","Text",CellChangeTimes->{{3.6821849447840075*^9,3.682184951647694*^9},{3.6821850182913575*^9,3.6821850462121496*^9},{3.6821850885233803*^9,3.68218509051958*^9},{3.6833726608424654*^9,3.683372662777466*^9}}, ExpressionUUID->"90b44ab7-8861-40ca-9529-92ba8b9d7964"],Cell[ CellGroupData[{Cell[ BoxData[ RowBox[{RowBox[{RowBox[{"Column","[",RowBox[{"{",RowBox[{"#",",",RowBox[{"TextStructure","[",RowBox[ {"#",",","\"ConstituentGraph\""}],"]"}]}],"}"}],"]"}],"&"}],"[",RowBox[{"RandomChoice","[",RowBox[ {"TextSentences","[",RowBox[{"ResourceData","[","\"Dracula\"","]"}],"]"}],"]"}],"]"}]], "Input",CellChangeTimes->{{3.683033945828113*^9,3.683034015624926*^9},{3.6830348076341476*^9,3.6830348407195807*^9},3.683035540973732*^9,{3.683035579770043*^9,3.683035601172921*^9},3.683304848896114*^9,{3.683308850480911*^9,3.6833089030201645*^9},3.683372603407466*^9}, ExpressionUUID->"05296c05-effc-4f84-a970-5562ec3eca16"],Cell[ BoxData[TagBox[GridBox[ {{"\"Gone, gone, never to return to us!\""},{RowBox[{"{",GraphicsBox[NamespaceBox[ "NetworkGraphics",DynamicModuleBox[{Set[Typeset`graph,HoldComplete[Graph[{"VBN1","Gone1","VP2",",1",",2","VBN2","gone1",",3",",4","RB1","never1","ADVP1","VP3","TO1","to1","VB1","return1","TO2","to2","PRP1","us1","NP1","PP1","VP5","VP4","S2","VP1",".1"," !1","S1"}, {Null,{{1,2},{3,1},{4,5},{6,7},{8,9},{10,11},{12,10},{13,6},{13,8},{13,12},{14,15},{16,17},{18,19},{20,21},{22,20},{23,18},{23,22},{24,16},{24,23},{25,14},{25,24},{26,25},{27,3},{27,4},{27,13},{27,26},{28,29},{30,27},{30,28}}}, {EdgeStyle->{GrayLevel[0.65]},GraphLayout->{"LayeredEmbedding","RootVertex"->"S1",LayerSizeFunction->Function[ 0.5]},ImageSize->600,VertexLabels->{"us1"->Placed[Framed[Style["us",FontFamily->"Arial", FontSize->Medium],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"PRP1"->Placed[ Framed[Style["Pronoun",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],"TO1"->Placed[Framed[Style["Preposition",GrayLevel[0.55]], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"S1"->Placed[Framed[Style[ Entity["GrammaticalUnit","Sentence"],GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]]],Center],"VP2"->Placed[Framed[Style["Verb Phrase",GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"PP1"->Placed[Framed[Style[ "Prepositional Phrase",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],",3"->Placed[Framed[Style["Punctuation",GrayLevel[0.55]], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VP5"->Placed[Framed[Style[ "Verb Phrase",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"to2"->Placed[ Framed[Style["to",FontFamily->"Arial",FontSize->Medium],Background->Directive[GrayLevel[ 1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]]],Center],"VP1"->Placed[Framed[Style["Verb Phrase",GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"NP1"->Placed[Framed[Style[ "Noun Phrase",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"RB1"->Placed[ Framed[Style["Adverb",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],"TO2"->Placed[Framed[Style["Preposition",GrayLevel[0.55]], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VB1"->Placed[Framed[Style[ "Verb",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VP3"->Placed[ Framed[Style["Verb Phrase",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],",2"->Placed[Framed[Style[",",FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VBN2"->Placed[Framed[Style[ "Verb",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],".1"->Placed[ Framed[Style["Punctuation",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],"to1"->Placed[Framed[Style["to",FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"never1"->Placed[Framed[Style[ "never",FontFamily->"Arial",FontSize->Medium],Background->Directive[GrayLevel[1], Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]]],Center],"ADVP1"->Placed[Framed[Style["Adverb Phrase",GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],",4"->Placed[Framed[Style[ ",",FontFamily->"Arial",FontSize->Medium],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],"gone1"->Placed[Framed[Style["gone",FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],",1"->Placed[Framed[Style[ "Punctuation",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center]," !1"->Placed[ Framed[Style[" !",FontFamily->"Arial",FontSize->Medium],Background->Directive[GrayLevel[ 1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]]],Center],"return1"->Placed[Framed[Style["return",FontFamily->"Arial", FontSize->Medium],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"S2"->Placed[ Framed[Style["Clause",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center],"Gone1"->Placed[Framed[Style["Gone",FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VBN1"->Placed[Framed[Style[ "Verb",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[1]],RoundingRadius->2, FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[0]]],Center],"VP4"->Placed[ Framed[Style["Verb Phrase",GrayLevel[0.55]],Background->Directive[GrayLevel[1],Opacity[ 1]],RoundingRadius->2,FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]]],Center]},VertexSize->{0},VertexStyle->{Directive[GrayLevel[1],Opacity[ 0]]}}]]]},TagBox[GraphicsGroupBox[{{{{{{{GrayLevel[0.65],Opacity[0.7],LineBox[CompressedData[ "\n1:eJxTTMoPSmVmYGCQBWImKIaBmaFHLN+dYHCA8TX2XD4kdvuXPS55ubNyQoEq\nLBh8vTrh7U92MDssdql8tbme3QFizit7mDyMDzMPXR67/l9o6n/Zo9MweZg5\n6DS6PEwfLnlUdVxo9nJB5b/Y45JHdS8XTvPRaXT/Q/QJoIWDANx+dHmIfmE0\n+0Tg6mF81HBHyB9almRye4UY3DyIO8Th6lH5tzDk0xqWhaXqSqKFjxRcPYyP\nms4w5WHmofPRzUfno7sfnY8ePrj4qPGBzkfEDzo/9Vb115gKAXi8b/6a2+8u\nIg6Xh/Fh5qHLo+sHAFQ+flE=\n "]]}}}}}},{{{{{{GrayLevel[ 1],Opacity[0],EdgeForm[{GrayLevel[0],Opacity[0.7]}],{DiskBox[{0.,2.0981106293717855}, 0.],InsetBox[FrameBox[StyleBox["\"Verb\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {0.,2.0981106293717855},BaseStyle->"Graphics"]},{DiskBox[{0.,1.6784885034974284}, 0.],InsetBox[FrameBox[StyleBox["\"Gone\"",StripOnInput->False,FontFamily->"Arial", FontSize->Medium],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {0.,1.6784885034974284},BaseStyle->"Graphics"]},{DiskBox[{0.,2.5177327552461426}, 0.],InsetBox[FrameBox[StyleBox["\"Verb Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {0.,2.5177327552461426},BaseStyle->"Graphics"]},{DiskBox[{0.8392442517487142,2.5177327552461426}, 0.],InsetBox[FrameBox[StyleBox["\"Punctuation\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {0.8392442517487142,2.5177327552461426},BaseStyle->"Graphics"]},{DiskBox[{0.8392442517487142,2.0981106293717855}, 0.],InsetBox[FrameBox[StyleBox["\",\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{0.8392442517487142,2.0981106293717855}, BaseStyle->"Graphics"]},{DiskBox[{1.6784885034974284,2.0981106293717855},0.],InsetBox[ FrameBox[StyleBox["\"Verb\"",StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{1.6784885034974284,2.0981106293717855}, BaseStyle->"Graphics"]},{DiskBox[{1.6784885034974284,1.6784885034974284},0.],InsetBox[ FrameBox[StyleBox["\"gone\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{1.6784885034974284,1.6784885034974284}, BaseStyle->"Graphics"]},{DiskBox[{2.5177327552461426,2.0981106293717855},0.],InsetBox[ FrameBox[StyleBox["\"Punctuation\"",StripOnInput->False,FontColor->GrayLevel[0.55], $CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[0.55], $CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {2.5177327552461426,2.0981106293717855},BaseStyle->"Graphics"]},{DiskBox[{2.5177327552461426,1.6784885034974284}, 0.],InsetBox[FrameBox[StyleBox["\",\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{2.5177327552461426,1.6784885034974284}, BaseStyle->"Graphics"]},{DiskBox[{3.356977006994857,1.6784885034974284},0.],InsetBox[ FrameBox[StyleBox["\"Adverb\"",StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{3.356977006994857,1.6784885034974284}, BaseStyle->"Graphics"]},{DiskBox[{3.356977006994857,1.2588663776230713},0.],InsetBox[ FrameBox[StyleBox["\"never\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{3.356977006994857,1.2588663776230713}, BaseStyle->"Graphics"]},{DiskBox[{3.356977006994857,2.0981106293717855},0.],InsetBox[ FrameBox[StyleBox["\"Adverb Phrase\"",StripOnInput->False,FontColor->GrayLevel[0.55], $CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[0.55], $CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {3.356977006994857,2.0981106293717855},BaseStyle->"Graphics"]},{DiskBox[{2.5177327552461426,2.5177327552461426}, 0.],InsetBox[FrameBox[StyleBox["\"Verb Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {2.5177327552461426,2.5177327552461426},BaseStyle->"Graphics"]},{DiskBox[{4.196221258743571,1.6784885034974284}, 0.],InsetBox[FrameBox[StyleBox["\"Preposition\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {4.196221258743571,1.6784885034974284},BaseStyle->"Graphics"]},{DiskBox[{4.196221258743571,1.2588663776230713}, 0.],InsetBox[FrameBox[StyleBox["\"to\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{4.196221258743571,1.2588663776230713}, BaseStyle->"Graphics"]},{DiskBox[{5.035465510492285,1.2588663776230713},0.],InsetBox[ FrameBox[StyleBox["\"Verb\"",StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{5.035465510492285,1.2588663776230713}, BaseStyle->"Graphics"]},{DiskBox[{5.035465510492285,0.8392442517487142},0.],InsetBox[ FrameBox[StyleBox["\"return\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{5.035465510492285,0.8392442517487142}, BaseStyle->"Graphics"]},{DiskBox[{5.874709762240999,0.8392442517487142},0.],InsetBox[ FrameBox[StyleBox["\"Preposition\"",StripOnInput->False,FontColor->GrayLevel[0.55], $CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[0.55], $CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {5.874709762240999,0.8392442517487142},BaseStyle->"Graphics"]},{DiskBox[{5.874709762240999,0.4196221258743571}, 0.],InsetBox[FrameBox[StyleBox["\"to\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{5.874709762240999,0.4196221258743571}, BaseStyle->"Graphics"]},{DiskBox[{6.713954013989714,0.4196221258743571},0.],InsetBox[ FrameBox[StyleBox["\"Pronoun\"",StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{6.713954013989714,0.4196221258743571}, BaseStyle->"Graphics"]},{DiskBox[{6.713954013989714,0.},0.],InsetBox[FrameBox[StyleBox[ "\"us\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium],Background->Directive[ GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[ 1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{6.713954013989714,0.},BaseStyle->"Graphics"]},{DiskBox[ {6.713954013989714,0.8392442517487142},0.],InsetBox[FrameBox[StyleBox["\"Noun Phrase\"", StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{6.713954013989714,0.8392442517487142}, BaseStyle->"Graphics"]},{DiskBox[{6.294331888115357,1.2588663776230713},0.],InsetBox[ FrameBox[StyleBox["\"Prepositional Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {6.294331888115357,1.2588663776230713},BaseStyle->"Graphics"]},{DiskBox[{5.664898699303821,1.6784885034974284}, 0.],InsetBox[FrameBox[StyleBox["\"Verb Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {5.664898699303821,1.6784885034974284},BaseStyle->"Graphics"]},{DiskBox[{4.9305599790236965,2.0981106293717855}, 0.],InsetBox[FrameBox[StyleBox["\"Verb Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {4.9305599790236965,2.0981106293717855},BaseStyle->"Graphics"]},{DiskBox[{4.9305599790236965,2.5177327552461426}, 0.],InsetBox[FrameBox[StyleBox["\"Clause\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {4.9305599790236965,2.5177327552461426},BaseStyle->"Graphics"]},{DiskBox[{2.4652799895118482,2.9373548811204997}, 0.],InsetBox[FrameBox[StyleBox["\"Verb Phrase\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {2.4652799895118482,2.9373548811204997},BaseStyle->"Graphics"]},{DiskBox[{5.769804230772411,2.9373548811204997}, 0.],InsetBox[FrameBox[StyleBox["\"Punctuation\"",StripOnInput->False,FontColor->GrayLevel[ 0.55],$CellContext`LineColor->GrayLevel[0.55],$CellContext`FrontFaceColor->GrayLevel[ 0.55],$CellContext`BackFaceColor->GrayLevel[0.55],$CellContext`GraphicsColor->GrayLevel[ 0.55]],Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}}, FrameStyle->Directive[GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False], {5.769804230772411,2.9373548811204997},BaseStyle->"Graphics"]},{DiskBox[{5.769804230772411,2.5177327552461426}, 0.],InsetBox[FrameBox[StyleBox["\"!\"",StripOnInput->False,FontFamily->"Arial",FontSize->Medium], Background->Directive[GrayLevel[1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[ GrayLevel[1],Opacity[0]],RoundingRadius->2,StripOnInput->False],{5.769804230772411,2.5177327552461426}, BaseStyle->"Graphics"]},{DiskBox[{4.1175421101421295,3.356977006994857},0.],InsetBox[ FrameBox[StyleBox[InterpretationBox["\"sentence\"",Entity["GrammaticalUnit","Sentence"], BaseStyle->"Entity"],StripOnInput->False,FontColor->GrayLevel[0.55],$CellContext`LineColor->GrayLevel[ 0.55],$CellContext`FrontFaceColor->GrayLevel[0.55],$CellContext`BackFaceColor->GrayLevel[ 0.55],$CellContext`GraphicsColor->GrayLevel[0.55]],Background->Directive[GrayLevel[ 1],Opacity[1]],FrameMargins->{{0,0},{-1,-2}},FrameStyle->Directive[GrayLevel[1],Opacity[ 0]],RoundingRadius->2,StripOnInput->False],{4.1175421101421295,3.356977006994857}, BaseStyle->"Graphics"]}}}}}}}}],MouseAppearanceTag["NetworkGraphics"]],AllowKernelInitialization->False]], DefaultBaseStyle->{"NetworkGraphics",FrontEnd`GraphicsHighlightColor->Hue[0.8,1., 0.6]},FormatType->TraditionalForm,FrameTicks->None,ImageSize->600],"}"}]}},DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns"->{{Left}}},GridBoxItemSize->{"Columns"->{{Automatic}},"Rows"->{{Automatic}}}], "Column"]],"Output",CellChangeTimes->{{3.6833726067244654*^9,3.6833726119384656*^9}}, ExpressionUUID->"0e8d7ab4-0366-4f5d-87c5-9151a2008afa"]},Open]]},Open]]},Open]]}, WindowSize->{775,873},WindowMargins->{{280,Automatic},{Automatic,15}},WindowTitle->"Examples for Dracula", TaggingRules->{"NotebookTemplateVersion"->1.},CellContext->Notebook,ShowCellTags->True, Nothing,Nothing,Nothing,Nothing,StyleDefinitions->FrontEnd`FileName[{"Wolfram"},"CreateDataResourceStyleSheet.nb", CharacterEncoding->"UTF-8"],DockedCells->{},Background->GrayLevel[0.9999],FrontEndVersion->"10.0 for Wolfram Cloud Platform (June 2 2014)"]