(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 275544, 7738] NotebookOptionsPosition[ 266650, 7582] NotebookOutlinePosition[ 266982, 7598] CellTagsIndexPosition[ 266939, 7595] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Wolfram English Character-Level Language Model V1", \ "ResourceExampleTitle", ShowCellBracket->False, CellMargins->{{27, Inherited}, {10, 30}}, CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False, CellChangeTimes->{ 3.732960529895637*^9, {3.733742962843155*^9, 3.733742969479701*^9}}, ShowAutoSpellCheck->False, LineSpacing->{1, 4}, MenuSortingValue->1100, MenuCommandKey->"1", FontFamily->"Source Sans Pro SemiBold", FontSize->32, FontTracking->-0.5, FontColor->RGBColor[{ Rational[31, 85], Rational[146, 255], Rational[11, 85]}]], Cell["Generate text in English", "ResourceExampleSubtitle", ShowCellBracket->False, CellMargins->{{27, Inherited}, {0, 0}}, CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, CellChangeTimes->{{3.733742978991497*^9, 3.7337429822233887`*^9}, { 3.734708276005265*^9, 3.7347082773641233`*^9}}, ShowAutoSpellCheck->False, CounterIncrements->"Subtitle", MenuSortingValue->1550, FontFamily->"Source Sans Pro Light", FontSize->26, FontSlant->Italic, FontColor->RGBColor[{ Rational[1, 3], Rational[1, 3], Rational[1, 3]}]], Cell[CellGroupData[{ Cell["Resource retrieval", "Subsection", CellChangeTimes->{{3.708842126306295*^9, 3.7088421264821463`*^9}, { 3.708842258611059*^9, 3.708842260779097*^9}, {3.70884286955135*^9, 3.708842877663618*^9}}], Cell["Get the pre-trained network:", "Text", CellChangeTimes->{{3.7088421543312607`*^9, 3.70884215627454*^9}, { 3.708842343819515*^9, 3.7088423656508083`*^9}, {3.7099046160687227`*^9, 3.709904619268003*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetModel", "[", "\"\\"", "]"}]], "Input",\ CellChangeTimes->{{3.708842162908451*^9, 3.708842188698863*^9}, { 3.708842352085051*^9, 3.708842352932181*^9}, 3.7088432594315977`*^9, 3.7310715732459908`*^9, 3.731147902661139*^9, {3.732960606003269*^9, 3.732960606145838*^9}, {3.733743009747286*^9, 3.733743010506959*^9}}, CellLabel->"In[71]:="], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetChain", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open = True}, 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 -> {Automatic, 24}], GraphicsBox[{ Thickness[0.014925373134328358`], { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{23., 91.5}, {30., 91.5}}}, CurveClosed -> {0}]}, { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{37., 91.5}, {44., 91.5}}}, CurveClosed -> {0}]}, { FaceForm[{ RGBColor[0.631, 0.8160000000000001, 0.498], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{15.5, 103.5}, {23.5, 103.5}, {23.5, 79.5}, {15.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.40800000000000003`, 0.627, 0.196], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{24., 104.}, {15., 104.}, { 15., 79.}, {24., 79.}}, {{23., 80.}, {16., 80.}, {16., 103.}, {23., 103.}}}]}, { FaceForm[{ RGBColor[0.38, 0.753, 0.89], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{29.5, 103.5}, {37.5, 103.5}, {37.5, 79.5}, {29.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.24300000000000002`, 0.608, 0.71], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{38., 104.}, {29., 104.}, { 29., 79.}, {38., 79.}}, {{37., 80.}, {30., 80.}, {30., 103.}, {37., 103.}}}]}, { FaceForm[{ RGBColor[0.584, 0.51, 0.8390000000000001], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{43.5, 103.5}, {51.5, 103.5}, {51.5, 79.5}, {43.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.4, 0.396, 0.659], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{52., 104.}, {43., 104.}, { 43., 79.}, {52., 79.}}, {{51., 80.}, {44., 80.}, {44., 103.}, {51., 103.}}}]}, { FaceForm[{ RGBColor[0.549, 0.549, 0.549], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{28., 91.5}, {25., 95.}, {25., 88.}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{42., 91.5}, {39., 95.}, {39., 88.}}}]}}, ImageMargins -> 0, ImageSize -> {36, Automatic}, PlotRangePadding -> 0], GridBox[{{ StyleBox[ TemplateBox[{ TemplateBox[{ StyleBox["\"Input\"", GrayLevel[0], StripOnInput -> False], "\" \"", "\"port\""}, "RowDefault"], "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["\"string\"", "SummaryItem"]}, { StyleBox[ TemplateBox[{ TemplateBox[{ StyleBox["\"Output\"", GrayLevel[0], StripOnInput -> False], "\" \"", "\"port\""}, "RowDefault"], "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["\"class\"", "SummaryItem"]}, { StyleBox[ TemplateBox[{"\"Number of layers\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["8", "SummaryItem"]}}, BaselinePosition -> {2, 1}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}]}}, BaselinePosition -> {1, 3}, GridBoxAlignment -> {"Rows" -> {{Top}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> { Offset[0.], { Offset[0.5599999999999999]}, Offset[0.]}, "Rows" -> { Offset[0.], { Offset[0.4]}, Offset[0.]}}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"], ImageSizeCache -> {12., {0., 12.}}], Appearance -> None, ButtonFunction :> (Typeset`open = False), Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> {Automatic, 24}], GraphicsBox[{ Thickness[0.014925373134328358`], { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{23., 91.5}, {30., 91.5}}}, CurveClosed -> {0}]}, { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{37., 91.5}, {44., 91.5}}}, CurveClosed -> {0}]}, { FaceForm[{ RGBColor[0.631, 0.8160000000000001, 0.498], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{15.5, 103.5}, {23.5, 103.5}, {23.5, 79.5}, {15.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.40800000000000003`, 0.627, 0.196], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{24., 104.}, {15., 104.}, { 15., 79.}, {24., 79.}}, {{23., 80.}, {16., 80.}, {16., 103.}, {23., 103.}}}]}, { FaceForm[{ RGBColor[0.38, 0.753, 0.89], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{29.5, 103.5}, {37.5, 103.5}, {37.5, 79.5}, {29.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.24300000000000002`, 0.608, 0.71], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{38., 104.}, {29., 104.}, { 29., 79.}, {38., 79.}}, {{37., 80.}, {30., 80.}, {30., 103.}, {37., 103.}}}]}, { FaceForm[{ RGBColor[0.584, 0.51, 0.8390000000000001], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{43.5, 103.5}, {51.5, 103.5}, {51.5, 79.5}, {43.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.4, 0.396, 0.659], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{52., 104.}, {43., 104.}, { 43., 79.}, {52., 79.}}, {{51., 80.}, {44., 80.}, {44., 103.}, {51., 103.}}}]}, { FaceForm[{ RGBColor[0.549, 0.549, 0.549], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{28., 91.5}, {25., 95.}, {25., 88.}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{42., 91.5}, {39., 95.}, {39., 88.}}}]}}, ImageMargins -> 0, ImageSize -> {36, Automatic}, PlotRangePadding -> 0], GridBox[{{ TagBox[ GridBox[{{"\"\"", "\"Input\"", TagBox[ GridBox[{{"\"string\""}, { TemplateBox[{"\"vector of \"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\" \"", TemplateBox[{"\"indices\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"range\"", "\":\"", "\" \"", TemplateBox[{"1", "\"..\"", "97"}, "RowDefault"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, "RowDefault"]}}, BaselinePosition -> 2, DefaultBaseStyle -> "Column", GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}, { StyleBox[ "\"1\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "EmbeddingLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"matrix\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\"97\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"2\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "DropoutLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"matrix\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\"97\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"3\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "GatedRecurrentLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"matrix\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\"512\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"4\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "GatedRecurrentLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"matrix\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\"512\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"5\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "GatedRecurrentLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"matrix\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", StyleBox["\"n\"", Italic, StripOnInput -> False], "\"512\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"6\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "SequenceLastLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"512\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"7\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "LinearLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"97\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { StyleBox[ "\"8\"", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0.5], $CellContext`FrontFaceColor -> GrayLevel[0.5], $CellContext`BackFaceColor -> GrayLevel[0.5], $CellContext`GraphicsColor -> GrayLevel[0.5], FontColor -> GrayLevel[0.5]], StyleBox[ "SoftmaxLayer", StripOnInput -> False, $CellContext`LineColor -> GrayLevel[0], $CellContext`FrontFaceColor -> GrayLevel[0], $CellContext`BackFaceColor -> GrayLevel[0], $CellContext`GraphicsColor -> GrayLevel[0], FontColor -> GrayLevel[0]], TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{ "\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"97\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}, { "\"\"", "\"Output\"", "\"class\""}}, AutoDelete -> False, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1.1}}}], "Grid"]}}, BaselinePosition -> Automatic, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}]}}, BaselinePosition -> {1, 1}, GridBoxAlignment -> {"Rows" -> {{Top}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> { Offset[0.], { Offset[0.5599999999999999]}, Offset[0.]}, "Rows" -> { Offset[0.], { Offset[0.4]}, Offset[0.]}}]}, Dynamic[Typeset`open], ImageSize -> Automatic], BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}, BaselinePosition -> Baseline]], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("NetChain[<>]"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.734183997261894*^9, 3.7342083486462317`*^9, 3.734448047866724*^9, 3.734692070082407*^9, 3.734693279901085*^9, 3.7516105285999537`*^9, 3.751611236595736*^9, 3.75370725400917*^9, 3.757159123067301*^9, { 3.76150323715267*^9, 3.7615032578130608`*^9}}, CellLabel->"Out[71]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Basic usage", "Subsection", CellChangeTimes->{{3.708842126306295*^9, 3.7088421264821463`*^9}, { 3.708842258611059*^9, 3.708842260779097*^9}, {3.70884286955135*^9, 3.708842895560047*^9}}], Cell["Predict the next character of a given sequence:", "Text", CellChangeTimes->{{3.7337442477386923`*^9, 3.733744267322679*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.7337431796334257`*^9, 3.733743186098196*^9}}, CellLabel->"In[72]:="], Cell[BoxData["\<\"d\"\>"], "Output", CellChangeTimes->{ 3.734184000393106*^9, 3.7342082565072803`*^9, 3.7342613825015306`*^9, 3.734268635440654*^9, 3.734448054454393*^9, 3.73469208101191*^9, 3.7346932801393013`*^9, 3.751610531092926*^9, 3.75161124357657*^9, 3.753707254142309*^9, 3.757159123191403*^9, {3.761503237220777*^9, 3.761503257897635*^9}}, CellLabel->"Out[72]="] }, Open ]], Cell["Get the top 15 probabilities:", "Text", CellChangeTimes->{{3.733744270754757*^9, 3.733744278403069*^9}, { 3.733821386418886*^9, 3.7338213925155478`*^9}, {3.734700142936458*^9, 3.734700143048478*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"topProbs", "=", RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], "[", RowBox[{"\"\\"", ",", RowBox[{"{", RowBox[{"\"\\"", ",", "15"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.733744281862945*^9, 3.733744287051928*^9}, 3.733751306991829*^9, {3.733821395878469*^9, 3.73382140868155*^9}}, CellLabel->"In[73]:="], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"\<\";\"\>", "\[Rule]", "4.067956069775391`*^-6"}], ",", RowBox[{"\<\"\\n\"\>", "\[Rule]", "4.448557774594519`*^-6"}], ",", RowBox[{"\<\"!\"\>", "\[Rule]", "4.630296643881593`*^-6"}], ",", RowBox[{"\<\"i\"\>", "\[Rule]", "4.7074404392333236`*^-6"}], ",", RowBox[{"\<\":\"\>", "\[Rule]", "5.169687938177958`*^-6"}], ",", RowBox[{"\<\".\"\>", "\[Rule]", "5.737962965213228`*^-6"}], ",", RowBox[{"\<\"m\"\>", "\[Rule]", "5.927121492277365`*^-6"}], ",", RowBox[{"\<\"-\"\>", "\[Rule]", "9.686401426733937`*^-6"}], ",", RowBox[{"\<\"'\"\>", "\[Rule]", "0.000010609028322505765`"}], ",", RowBox[{"\<\"k\"\>", "\[Rule]", "0.000015605137377860956`"}], ",", RowBox[{"\<\",\"\>", "\[Rule]", "0.000025379205908393487`"}], ",", RowBox[{"\<\"e\"\>", "\[Rule]", "0.0000937047807383351`"}], ",", RowBox[{"\<\" \"\>", "\[Rule]", "0.00022989038552623242`"}], ",", RowBox[{"\<\"l\"\>", "\[Rule]", "0.00027422484708949924`"}], ",", RowBox[{"\<\"d\"\>", "\[Rule]", "0.9992819428443909`"}]}], "}"}]], "Output",\ CellChangeTimes->{ 3.7341840011929407`*^9, 3.734208260533793*^9, 3.734261383572743*^9, 3.734268636477792*^9, 3.734448055186255*^9, 3.734692081091496*^9, 3.73469328018307*^9, 3.751610533186577*^9, 3.751611244711412*^9, 3.753707254176805*^9, 3.757159123215213*^9, {3.7615032372631903`*^9, 3.761503257953588*^9}}, CellLabel->"Out[73]="] }, Open ]], Cell["Plot the top 15 probabilities:", "Text", CellChangeTimes->{{3.733744270754757*^9, 3.73374429504323*^9}, { 3.733751313940255*^9, 3.7337513167481737`*^9}, {3.7337517433576813`*^9, 3.7337517434120893`*^9}, {3.734700146328223*^9, 3.734700146439886*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BarChart", "[", RowBox[{ RowBox[{"Thread", "@", RowBox[{"Labeled", "[", RowBox[{ RowBox[{"Values", "@", "topProbs"}], ",", RowBox[{ RowBox[{"Keys", "[", "topProbs", "]"}], "/.", RowBox[{"{", RowBox[{ RowBox[{"\"\<\\n\>\"", "\[Rule]", "\"\<\\\\n\>\""}], ",", RowBox[{"\"\<\\t\>\"", "\[Rule]", "\"\<\\\\t\>\""}]}], "}"}]}]}], "]"}]}], ",", RowBox[{"ScalingFunctions", "\[Rule]", "\"\\""}]}], "]"}]], "Input", CellChangeTimes->{{3.733751540831826*^9, 3.7337516237002172`*^9}, { 3.733751666186764*^9, 3.7337517406465473`*^9}}, CellLabel->"In[74]:="], Cell[BoxData[ GraphicsBox[{{ {Opacity[0], PointBox[{{0.27191413237924866`, -13.412369878809871`}, { 15.430851795789184`, -13.412369878809871`}}]}, {{}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{0.569148204210816, -13.412369878809871`}, { 1.430851795789184, -12.412369878809871`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{35.94541934420827, 54.40639894301947}, { 76.19576405810412, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 4.067956069775391*^-6]& , TagBoxNote->"4.067956069775391*^-6"], StyleBox["4.067956069775391`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[4.067956069775391*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{1.569148204210816, -13.412369878809871`}, { 2.430851795789184, -12.322930609913191`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{56.78898988789415, 75.24996948670534}, { 74.90896388935309, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 4.448557774594519*^-6]& , TagBoxNote->"4.448557774594519*^-6"], StyleBox["4.448557774594519`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[4.448557774594519*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{2.569148204210816, -13.412369878809871`}, { 3.430851795789184, -12.282889621965696`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{77.63256043158003, 96.09354003039122}, { 74.33287744898519, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 4.630296643881593*^-6]& , TagBoxNote->"4.630296643881593*^-6"], StyleBox["4.630296643881593`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[4.630296643881593*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{3.569148204210816, -13.412369878809871`}, { 4.430851795789184, -12.266366228808831`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{98.4761309752659, 116.93711057407711`}, { 74.09514848088332, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 4.7074404392333236`*^-6]& , TagBoxNote->"4.7074404392333236*^-6"], StyleBox["4.7074404392333236`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[4.7074404392333236`*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{4.5691482042108165`, -13.412369878809871`}, { 5.430851795789184, -12.172698231385999`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{119.3197015189518, 137.78068111776298`}, { 72.74750782620055, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 5.169687938177958*^-6]& , TagBoxNote->"5.169687938177958*^-6"], StyleBox["5.169687938177958`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[5.169687938177958*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{5.5691482042108165`, -13.412369878809871`}, { 6.430851795789184, -12.06840629472826}, "RoundingRadius" -> 0]}, ImageSizeCache->{{140.16327206263767`, 158.62425166144888`}, { 71.24701611438232, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 5.737962965213228*^-6]& , TagBoxNote->"5.737962965213228*^-6"], StyleBox["5.737962965213228`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[5.737962965213228*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{6.5691482042108165`, -13.412369878809871`}, { 7.430851795789184, -12.035971877262133`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{161.00684260632354`, 179.46782220513475`}, { 70.78036858490657, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 5.927121492277365*^-6]& , TagBoxNote->"5.927121492277365*^-6"], StyleBox["5.927121492277365`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[5.927121492277365*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{7.5691482042108165`, -13.412369878809871`}, { 8.430851795789184, -11.544787570826536`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{181.85041315000944`, 200.31139274882062`}, { 63.71349453499306, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 9.686401426733937*^-6]& , TagBoxNote->"9.686401426733937*^-6"], StyleBox["9.686401426733937`*^-6", {}, StripOnInput -> False]], Annotation[#, Style[9.686401426733937*^-6, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{8.569148204210816, -13.412369878809871`}, { 9.430851795789184, -11.453805190822896`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{202.6939836936953, 221.1549632925065}, { 62.40449298135445, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.000010609028322505765`]& , TagBoxNote->"0.000010609028322505765"], StyleBox["0.000010609028322505765`", {}, StripOnInput -> False]], Annotation[#, Style[0.000010609028322505765`, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{9.569148204210816, -13.412369878809871`}, { 10.430851795789184`, -11.067910378828762`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{223.53755423738116`, 241.9985338361924}, { 56.85246292431279, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.000015605137377860956`]& , TagBoxNote->"0.000015605137377860956"], StyleBox["0.000015605137377860956`", {}, StripOnInput -> False]], Annotation[#, Style[0.000015605137377860956`, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{10.569148204210816`, -13.412369878809871`}, { 11.430851795789184`, -10.581580384252877`}, "RoundingRadius" -> 0]}, ImageSizeCache->{{244.38112478106706`, 262.84210437987826`}, { 49.85542988939534, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.000025379205908393487`]& , TagBoxNote->"0.000025379205908393487"], StyleBox["0.000025379205908393487`", {}, StripOnInput -> False]], Annotation[#, Style[0.000025379205908393487`, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{11.569148204210816`, -13.412369878809871`}, { 12.430851795789184`, -9.27536134826762}, "RoundingRadius" -> 0]}, ImageSizeCache->{{265.22469532475293`, 283.68567492356414`}, { 31.06231030482735, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.0000937047807383351]& , TagBoxNote->"0.0000937047807383351"], StyleBox["0.0000937047807383351`", {}, StripOnInput -> False]], Annotation[#, Style[0.0000937047807383351, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{12.569148204210816`, -13.412369878809871`}, { 13.430851795789184`, -8.377907947312202}, "RoundingRadius" -> 0]}, ImageSizeCache->{{286.0682658684388, 304.52924546725}, { 18.15027287382277, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.00022989038552623242`]& , TagBoxNote->"0.00022989038552623242"], StyleBox["0.00022989038552623242`", {}, StripOnInput -> False]], Annotation[#, Style[0.00022989038552623242`, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{13.569148204210816`, -13.412369878809871`}, { 14.430851795789184`, -8.201562178276662}, "RoundingRadius" -> 0]}, ImageSizeCache->{{306.91183641212467`, 325.3728160109359}, { 15.613112539746211`, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.00027422484708949924`]& , TagBoxNote->"0.00027422484708949924"], StyleBox["0.00027422484708949924`", {}, StripOnInput -> False]], Annotation[#, Style[0.00027422484708949924`, {}], "Tooltip"]& ]}, {RGBColor[0.982864, 0.7431472, 0.3262672], EdgeForm[{Opacity[0.595], Thickness[Small]}], TagBox[ TooltipBox[ TagBox[ TagBox[ DynamicBox[{ FEPrivate`If[ CurrentValue["MouseOver"], EdgeForm[{ GrayLevel[0.5], AbsoluteThickness[1.5], Opacity[0.66]}], {}, {}], RectangleBox[{14.569148204210816`, -13.412369878809871`}, { 15.430851795789184`, -0.000718315082126537}, "RoundingRadius" -> 0]}, ImageSizeCache->{{327.75540695581054`, 346.21638655462175`}, {-102.37585804598385`, 91.0831822987154}}], "DelayedMouseEffectStyle"], StatusArea[#, 0.9992819428443909]& , TagBoxNote->"0.9992819428443909"], StyleBox["0.9992819428443909`", {}, StripOnInput -> False]], Annotation[#, Style[0.9992819428443909, {}], "Tooltip"]& ]}}, {}, {}}, {}, {}, {}, {}, StyleBox[{ {Thickness[Tiny], LineBox[{{0.27191413237924866`, -13.412369878809871`}, { 15.734030549057383`, -13.412369878809871`}}], StyleBox[{}, "GraphicsLabel", StripOnInput->False]}, StyleBox[{ {Thickness[Tiny], LineBox[{{0.569148204210816, -13.412369878809871`}, Offset[{-1.102182119232618*^-15, -6.}, { 0.569148204210816, -13.412369878809871`}]}], LineBox[{{15.430851795789184`, -13.412369878809871`}, Offset[{-1.102182119232618*^-15, -6.}, { 15.430851795789184`, -13.412369878809871`}]}], {{}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, { LineBox[{{1.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 1.430851795789184, -13.412369878809871`}]}], LineBox[{{1.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 1.569148204210816, -13.412369878809871`}]}], LineBox[{{2.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 2.430851795789184, -13.412369878809871`}]}], LineBox[{{2.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 2.569148204210816, -13.412369878809871`}]}], LineBox[{{3.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 3.430851795789184, -13.412369878809871`}]}], LineBox[{{3.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 3.569148204210816, -13.412369878809871`}]}], LineBox[{{4.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 4.430851795789184, -13.412369878809871`}]}], LineBox[{{4.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 4.569148204210816, -13.412369878809871`}]}], LineBox[{{5.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 5.430851795789184, -13.412369878809871`}]}], LineBox[{{5.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 5.569148204210816, -13.412369878809871`}]}], LineBox[{{6.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 6.430851795789184, -13.412369878809871`}]}], LineBox[{{6.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 6.569148204210816, -13.412369878809871`}]}], LineBox[{{7.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 7.430851795789184, -13.412369878809871`}]}], LineBox[{{7.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 7.569148204210816, -13.412369878809871`}]}], LineBox[{{8.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 8.430851795789184, -13.412369878809871`}]}], LineBox[{{8.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 8.569148204210816, -13.412369878809871`}]}], LineBox[{{9.430851795789184, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 9.430851795789184, -13.412369878809871`}]}], LineBox[{{9.569148204210816, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 9.569148204210816, -13.412369878809871`}]}], LineBox[{{10.430851795789184`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 10.430851795789184`, -13.412369878809871`}]}], LineBox[{{10.569148204210816`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 10.569148204210816`, -13.412369878809871`}]}], LineBox[{{11.430851795789184`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 11.430851795789184`, -13.412369878809871`}]}], LineBox[{{11.569148204210816`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 11.569148204210816`, -13.412369878809871`}]}], LineBox[{{12.430851795789184`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 12.430851795789184`, -13.412369878809871`}]}], LineBox[{{12.569148204210816`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 12.569148204210816`, -13.412369878809871`}]}], LineBox[{{13.430851795789184`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 13.430851795789184`, -13.412369878809871`}]}], LineBox[{{13.569148204210816`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 13.569148204210816`, -13.412369878809871`}]}], LineBox[{{14.430851795789184`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 14.430851795789184`, -13.412369878809871`}]}], LineBox[{{14.569148204210816`, -13.412369878809871`}, Offset[{-7.347880794884119*^-16, -4.}, { 14.569148204210816`, -13.412369878809871`}]}]}, {}}}, StyleBox[ {Thickness[Tiny], InsetBox["\<\";\"\>", Offset[{0, -2}, {1., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"\\\\n\"\>", Offset[{0, -2}, {2., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"!\"\>", Offset[{0, -2}, {3., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"i\"\>", Offset[{0, -2}, {4., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\":\"\>", Offset[{0, -2}, {5., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\".\"\>", Offset[{0, -2}, {6., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"m\"\>", Offset[{0, -2}, {7., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"-\"\>", Offset[{0, -2}, {8., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"'\"\>", Offset[{0, -2}, {9., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"k\"\>", Offset[{0, -2}, {10., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\",\"\>", Offset[{0, -2}, {11., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"e\"\>", Offset[{0, -2}, {12., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\" \"\>", Offset[{0, -2}, {13., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"l\"\>", Offset[{0, -2}, {14., -13.412369878809871}], {0, 1}, Automatic, {1, 0}], InsetBox["\<\"d\"\>", Offset[{0, -2}, {15., -13.412369878809871}], {0, 1}, Automatic, {1, 0}]}, "GraphicsLabel", StripOnInput->False]}, "GraphicsTicks", StripOnInput->False]}, "GraphicsAxes", StripOnInput->False, Antialiasing->False]}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{False, True}, AxesLabel->{None, None}, AxesOrigin->{0.27191413237924866`, -13.412369878809871`}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Identity[ Part[#, 1]], Exp[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ Identity[ Part[#, 1]], Exp[ Part[#, 2]]}& )}, DisplayFunction->Identity, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{ Charting`ScaledTicks[{Log, Exp}], Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}}, 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.05]}}, Ticks->FrontEndValueCache[{None, Charting`ScaledTicks[{Log, Exp}]}, {None, {{-11.512925464970229`, FormBox[ TemplateBox[{"10", RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-9.210340371976182, FormBox[ TemplateBox[{"10", RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-6.907755278982137, FormBox["0.001`", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-4.605170185988091, FormBox["0.01`", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-2.3025850929940455`, FormBox["0.1`", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {0., FormBox["1", TraditionalForm], {0.01, 0.}, { AbsoluteThickness[0.1]}}, {-13.815510557964274`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-13.122363377404328`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12.716898269296165`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12.429216196844383`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12.206072645530174`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-12.02375108873622, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-11.86960040890896, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-11.736069016284437`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-11.618285980628055`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-10.819778284410283`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-10.41431317630212, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-10.126631103850338`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-9.903487552536127, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-9.721165995742174, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-9.567015315914915, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-9.433483923290392, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-9.315700887634009, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-8.517193191416238, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-8.111728083308073, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.824046010856292, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.600902459542082, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.418580902748128, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.264430222920869, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.1308988302963465`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-7.013115794639964, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-6.214608098422191, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-5.809142990314028, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-5.521460917862246, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-5.298317366548036, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-5.115995809754082, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-4.961845129926823, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-4.8283137373023015`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-4.710530701645918, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3.912023005428146, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3.506557897319982, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-3.2188758248682006`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.995732273553991, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.8134107167600364`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.659260036932778, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.5257286443082556`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-2.4079456086518722`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1.6094379124341003`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-1.2039728043259361`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.916290731874155, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.6931471805599453, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.5108256237659907, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.35667494393873245`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.2231435513142097, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {-0.10536051565782628`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {0.6931471805599453, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1.0986122886681098`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1.3862943611198906`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1.6094379124341003`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1.791759469228055, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {1.9459101490553132`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.0794415416798357`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.1972245773362196`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.302585092994046, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.70805020110221, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {2.995732273553991, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}, {3.2188758248682006`, FormBox[ TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}, { AbsoluteThickness[0.1]}}}}]]], "Output", CellChangeTimes->{ 3.7341840030865097`*^9, 3.734208262282201*^9, 3.734261385364017*^9, 3.73426863743913*^9, 3.7344480568170757`*^9, 3.7346920813016233`*^9, 3.7346932804211807`*^9, 3.751610539374216*^9, 3.751611247436738*^9, 3.753707254296308*^9, 3.757159123305996*^9, {3.7615032373719683`*^9, 3.761503258069943*^9}}, CellLabel->"Out[74]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Generation", "Subsection", CellChangeTimes->{{3.708842126306295*^9, 3.7088421264821463`*^9}, { 3.708842258611059*^9, 3.708842260779097*^9}, {3.70884286955135*^9, 3.708842895560047*^9}, {3.733744589733697*^9, 3.7337445905574102`*^9}}], Cell[TextData[{ "Generate text efficiently with ", Cell[BoxData[ ButtonBox["NetStateObject", BaseStyle->"Link", ButtonData->"ref/NetStateObject"]], "InlineFormula"], ". A built-in option for temperature sampling is available in Wolfram \ Language 12.0, while it has to be implemented explicitly in earlier \ versions." }], "Text", CellChangeTimes->{{3.734448951217004*^9, 3.734448982644696*^9}, { 3.7346922175973587`*^9, 3.734692230012267*^9}, 3.73469232258497*^9, { 3.73469326283232*^9, 3.734693262832409*^9}, {3.751611034226281*^9, 3.751611034851919*^9}, {3.757158883617807*^9, 3.7571590085311613`*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"generateSample", "[", RowBox[{"start_", ",", "len_", ",", RowBox[{"temp_:", " ", "1"}]}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"net", ",", "score", ",", "sampler", ",", "obj"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"net", "=", RowBox[{ "NetModel", "[", "\"\\"", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"$VersionNumber", "<", "12.0"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"score", "=", RowBox[{"NetTake", "[", RowBox[{"net", ",", "7"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sampler", "=", RowBox[{"NetTake", "[", RowBox[{"net", ",", RowBox[{"-", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"obj", "=", RowBox[{"NetStateObject", "[", "score", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"StringJoin", "@", RowBox[{"NestList", "[", RowBox[{ RowBox[{ RowBox[{"sampler", "[", RowBox[{ RowBox[{ RowBox[{"obj", "[", "#", "]"}], "/", "temp"}], ",", "\"\\""}], "]"}], "&"}], ",", "start", ",", "len"}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"obj", "=", RowBox[{"NetStateObject", "[", "net", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"StringJoin", "@", RowBox[{"NestList", "[", RowBox[{ RowBox[{ RowBox[{"obj", "[", RowBox[{"#", ",", RowBox[{"{", RowBox[{"\"\\"", ",", RowBox[{"\"\\"", "\[Rule]", "temp"}]}], "}"}]}], "]"}], "&"}], ",", "start", ",", "len"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.7571582138850517`*^9, 3.7571583712317543`*^9}, { 3.757159114444622*^9, 3.757159115719022*^9}}, CellLabel->"In[75]:="], Cell["Generate for 100 steps using \[OpenCurlyDoubleQuote]hello\ \[CloseCurlyDoubleQuote] as an initial string:", "Text", CellChangeTimes->{{3.733745195970669*^9, 3.7337452279395313`*^9}, 3.7338215053905287`*^9, {3.733823550354554*^9, 3.7338235750666723`*^9}, { 3.733823734868311*^9, 3.733823735156369*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"generateSample", "[", RowBox[{"\"\\"", ",", "100"}], "]"}]], "Input", CellChangeTimes->{{3.7337446338302917`*^9, 3.733744709382731*^9}, { 3.733745073311556*^9, 3.733745074874688*^9}, {3.733745150672089*^9, 3.733745154739936*^9}, {3.7337453278711863`*^9, 3.733745331612834*^9}, { 3.7337453807523108`*^9, 3.7337453818374567`*^9}, {3.7338235781670313`*^9, 3.733823578283433*^9}, {3.7341831953200827`*^9, 3.734183195441629*^9}, { 3.734448694816085*^9, 3.734448708525169*^9}, {3.734448998827529*^9, 3.73444899895047*^9}}, CellLabel->"In[76]:="], Cell[BoxData["\<\"hello survived a state official who was also a sufficient \ step forwarded by the United Nations, which he \"\>"], "Output", CellChangeTimes->{ 3.7341840344430027`*^9, 3.734208312924964*^9, {3.734208526617282*^9, 3.734208530101673*^9}, 3.734261432818365*^9, {3.734448692298264*^9, 3.734448708969037*^9}, {3.7344489993921337`*^9, 3.7344490062575827`*^9}, 3.734449169315892*^9, {3.7344640611518183`*^9, 3.7344640645072107`*^9}, 3.73469211361865*^9, 3.7346932810471497`*^9, {3.751610602608857*^9, 3.751610619606778*^9}, 3.7516112573023376`*^9, 3.753707254579777*^9, 3.757159123881267*^9, {3.761503237675866*^9, 3.761503258383177*^9}}, CellLabel->"Out[76]="] }, Open ]], Cell["\<\ The third optional argument is a \[OpenCurlyDoubleQuote]temperature\ \[CloseCurlyDoubleQuote] parameter that scales the input to the final \ softmax. A high temperature flattens the distribution from which characters \ are sampled, increasing the probability of extracting less likely characters:\ \ \>", "Text", CellChangeTimes->{{3.733745230754838*^9, 3.733745309196355*^9}, { 3.733745457254161*^9, 3.733745509278199*^9}, {3.733745550598526*^9, 3.7337455694871883`*^9}, {3.733823587731167*^9, 3.733823602176231*^9}, { 3.733823762084058*^9, 3.733823822973381*^9}, {3.7344491934376097`*^9, 3.734449202624714*^9}, {3.734449235981421*^9, 3.734449264781605*^9}, { 3.7344493103522587`*^9, 3.734449321636284*^9}, {3.734700155448777*^9, 3.734700155720303*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"generateSample", "[", RowBox[{"\"\\"", ",", "100", ",", "1.1"}], "]"}]], "Input", CellChangeTimes->{{3.733745312964033*^9, 3.73374532054566*^9}, { 3.733745394489646*^9, 3.7337454308377*^9}, {3.734181280087014*^9, 3.734181285440867*^9}, {3.734449015484724*^9, 3.734449026032735*^9}}, CellLabel->"In[77]:="], Cell[BoxData["\<\"hello showtrack the subprime market, with a soldier with a \ short scruffy slowdown in the seftac cliffs, a\"\>"], "Output", CellChangeTimes->{{3.734449011860592*^9, 3.734449026755135*^9}, 3.734464068478294*^9, 3.7346921141036777`*^9, 3.734693281641801*^9, 3.7516112592308683`*^9, 3.753707254774735*^9, 3.757159124283947*^9, { 3.761503237897629*^9, 3.7615032586190653`*^9}}, CellLabel->"Out[77]="] }, Open ]], Cell["\<\ Decreasing the temperature sharpens the peaks of the sampling distribution, \ further decreasing the probability of extracting less likely characters:\ \>", "Text", CellChangeTimes->{{3.733745230754838*^9, 3.733745309196355*^9}, { 3.733745512733904*^9, 3.733745532213931*^9}, {3.733745574150399*^9, 3.733745592582809*^9}, 3.733823806580809*^9, {3.733823841538211*^9, 3.733823847149623*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"generateSample", "[", RowBox[{"\"\\"", ",", "100", ",", "0.4"}], "]"}]], "Input", CellChangeTimes->{{3.733745312964033*^9, 3.73374532054566*^9}, { 3.733745394489646*^9, 3.7337454308377*^9}, {3.733745594929967*^9, 3.733745618928125*^9}}, CellLabel->"In[78]:="], Cell[BoxData["\<\"hello sent to the station with a strong satisfy and strong \ and steady and shadowy straw horses, and the s\"\>"], "Output", CellChangeTimes->{ 3.7344490286840477`*^9, 3.7344640723011093`*^9, 3.7346921146800957`*^9, 3.7346932821358957`*^9, 3.7516112605565767`*^9, 3.75370725496887*^9, 3.7571591247051287`*^9, {3.761503238135621*^9, 3.761503258852427*^9}}, CellLabel->"Out[78]="] }, Open ]], Cell["\<\ Very high temperature settings are equivalent to random sampling:\ \>", "Text", CellChangeTimes->{{3.7337456378864717`*^9, 3.733745648503108*^9}, { 3.73382362747505*^9, 3.733823643387529*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"generateSample", "[", RowBox[{"\"\\"", ",", "100", ",", "10"}], "]"}]], "Input", CellChangeTimes->{{3.733745654119564*^9, 3.7337456542796803`*^9}}, CellLabel->"In[79]:="], Cell[BoxData["\<\"hello/Psbt'GYon%'eex \ an3:/;0&tK;*oRGIE2OnM?FV/3%*c2n`e(.p(5Ac+-7tjj/'M&mfojU{2:2'R.iBKAjR&E+M~\ L9TIGFj-Y=p\"\>"], "Output", CellChangeTimes->{ 3.73444903114627*^9, 3.7344640743263073`*^9, 3.734692115168077*^9, 3.7346932826990747`*^9, 3.7516112635420227`*^9, 3.753707255161294*^9, 3.7571591251408663`*^9, {3.761503238361228*^9, 3.7615032591312*^9}}, CellLabel->"Out[79]="] }, Open ]], Cell["\<\ Very low temperature settings are equivalent to always picking the character \ with maximum probability. It is typical for sampling to \ \[OpenCurlyDoubleQuote]get stuck in a loop\[CloseCurlyDoubleQuote]:\ \>", "Text", CellChangeTimes->{{3.7337456378864717`*^9, 3.733745648503108*^9}, { 3.73382362747505*^9, 3.7338236901800747`*^9}, {3.73444945222303*^9, 3.7344494733995647`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"generateSample", "[", RowBox[{"\"\\"", ",", "100", ",", "0.01"}], "]"}]], "Input", CellChangeTimes->{{3.7337456599037323`*^9, 3.7337456856192503`*^9}}, CellLabel->"In[80]:="], Cell[BoxData["\<\"hello said the company was a strong state of emergency and \ a state of emergency and a state of emergency \"\>"], "Output", CellChangeTimes->{ 3.734449033516361*^9, 3.734449476724229*^9, 3.73446407549771*^9, 3.7346921157024307`*^9, 3.734693283195661*^9, 3.751611266257333*^9, 3.753707255402183*^9, 3.7571591255558233`*^9, {3.761503238634108*^9, 3.761503259357026*^9}}, CellLabel->"Out[80]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Inspection of predictions", "Subsection", CellChangeTimes->{{3.733825278204344*^9, 3.733825281855133*^9}}], Cell["\<\ Define a function that takes a string and guesses the next character as it \ reads, showing the predictions in a grid. The input string is shown on top, \ while the top 5 predictions are aligned below each character, starting from \ more likely guesses. For each prediction, the intensity of the color is \ proportional to the probability:\ \>", "Text", CellChangeTimes->{{3.733826818205822*^9, 3.73382692959114*^9}, { 3.733827381923162*^9, 3.733827516525551*^9}, {3.734210982687861*^9, 3.7342109902583923`*^9}, 3.734261531732889*^9, {3.7347001626324368`*^9, 3.734700169895769*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"inspectPredictions", "[", "string_", "]"}], ":=", RowBox[{"Block", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "obj", ",", "chars", ",", "pred", ",", "predItems", ",", "charItems"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"obj", "=", RowBox[{"NetStateObject", "[", RowBox[{ "NetModel", "[", "\"\\"", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"chars", "=", RowBox[{"Characters", "[", "string", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pred", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"obj", "[", RowBox[{"#", ",", RowBox[{"{", RowBox[{"\"\\"", ",", "5"}], "}"}]}], "]"}], "&"}], ",", "chars"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"predItems", "=", RowBox[{"Map", "[", RowBox[{ RowBox[{ RowBox[{"Item", "[", RowBox[{ RowBox[{"First", "[", "#", "]"}], ",", RowBox[{"Background", "\[Rule]", RowBox[{"Opacity", "[", RowBox[{ RowBox[{"Last", "[", "#", "]"}], ",", RowBox[{"Darker", "[", "Green", "]"}]}], "]"}]}]}], "]"}], "&"}], ",", "pred", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"predItems", "=", RowBox[{"Prepend", "[", RowBox[{ RowBox[{"Most", "[", "predItems", "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"Item", "[", RowBox[{"\"\<\>\"", ",", RowBox[{"Background", "\[Rule]", "Gray"}]}], "]"}], ",", "5"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"charItems", "=", RowBox[{ RowBox[{ RowBox[{"Item", "[", RowBox[{"#", ",", RowBox[{"Background", "\[Rule]", "LightBlue"}]}], "]"}], "&"}], "/@", "chars"}]}], ";", "\[IndentingNewLine]", RowBox[{"Grid", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Prepend", "[", RowBox[{ RowBox[{"Transpose", "[", "predItems", "]"}], ",", "charItems"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Spacings", "\[Rule]", RowBox[{"{", RowBox[{"0.6", ",", "0.2"}], "}"}]}], ",", RowBox[{"Dividers", "\[Rule]", "All"}], ",", RowBox[{"FrameStyle", "\[Rule]", "Gray"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->CompressedData[" 1:eJxTTMoPSmViYGAQA2IQHTN/9ZMtF187bkmKegGieX5MYNwKpMWf+rKC6JAZ ywpB9NzrRdUgeonD9BYQ/enCgnYQPYGVrwdEa0h8nASie9j/zgDROROXzALR zDkuYgWXXju+mj9fEURnqXNqgminpdomIFqz/a85iH65fYsTWN3+XfEgeoLt GzC9YPmlVBD9yfEamJYv03rfCaQfKL3+AKKfnVr2A0Rve1bG2QWk74qViYBo rfU/tUD0gaky+iA6KkEJTIc9YUgC0RpBd4pAdN09s0YQrbvYvQlEd9+7/7oH SG/QVnsLoo2a9L6BaI2G7T9AtPdkrr8get/18wy9QLoiZ10miL66sbQYREtd di4H0bnFAdUgGgBDW8pp "], CellLabel->"In[81]:="], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"inspectPredictions", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.7344495379865913`*^9, 3.734449548733993*^9}}, CellLabel->"In[82]:="], Cell[BoxData[ TagBox[GridBox[{ { ItemBox["\<\"I\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"w\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"b\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"f\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\",\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"w\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"w\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"f\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.03296720236539841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.021216200664639473`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.04446232691407204, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0008795942994765937, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00023600606073159724`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.002445763209834695, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.043788641691207886`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.03274938464164734, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.003101514419540763, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00670910207554698, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.059379734098911285`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.07468421757221222, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.04310798645019531, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.00019066588720306754`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.009747613221406937, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.07908137887716293, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.002573553007096052, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.00020878769282717258`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.07073991000652313, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.010380621999502182`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.0031270079780369997`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.0000322926789522171, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.012585119344294071`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.015047154389321804`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.004948390647768974, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.05826319009065628, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.011140570044517517`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0009272857569158077, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.05342412367463112, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0020704532507807016`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00011226662172703072`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.003995003644376993, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.054556459188461304`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.022321011871099472`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.006419425364583731, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.008169647306203842, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.07573188096284866, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.046251438558101654`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.008345809765160084, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.011840726248919964`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00020402533118613064`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.010901959612965584`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.06574255228042603, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.003993585240095854, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.00025922097847796977`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.054933030158281326`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.004034747835248709, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.00830270629376173, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.00007238319813041016, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.04723171517252922, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.0444718599319458, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.023393798619508743`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.04456795006990433, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.007976451888680458, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0003326860605739057, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.021168548613786697`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0777241438627243, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.04723707213997841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.01593104563653469, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.021886510774493217`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.06912597268819809, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.11483433097600937`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.06307926774024963, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.0002685908693820238, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.015270525589585304`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.08141074329614639, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.003439816413447261, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.00042068774928338826`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.08083435893058777, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.012286543846130371`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0031680709216743708`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.00018650549463927746`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0230699572712183, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\";\"\>", Background->Opacity[0.01670142635703087, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.006616505794227123, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.10436978191137314`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.12552998960018158`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.027041124179959297`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.05368480086326599, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.011046846397221088`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0001531023735878989, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0074945478700101376`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.08145154267549515, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.04163597151637077, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.021925317123532295`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.038771748542785645`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.07584348320960999, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.08304744958877563, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.013547206297516823`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"k\"\>", Background->Opacity[0.11803752183914185`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.00023501004034187645`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.014368836767971516`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.07047713547945023, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.004755144938826561, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0009182016365230083, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.07130534946918488, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.0044863102957606316`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.009799637831747532, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.00042751056025736034`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.05201417952775955, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.11587252467870712`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.028766468167304993`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.11469998210668564`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.03570028021931648, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0014135321835055947`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.026562703773379326`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.10075533390045166`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.07562701404094696, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.018346456810832024`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0492846816778183, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.07249481230974197, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.1292368620634079, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.09178855270147324, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0015161085175350308`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.03612901270389557, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.08712933212518692, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.007950116880238056, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.015873629599809647`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.085364431142807, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.015357140451669693`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.004187608137726784, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.0006317829247564077, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.14189918339252472`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.04461859166622162, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.04759681224822998, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.1073252335190773, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.17597398161888123`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.03970465064048767, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.11900775134563446`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.11001811176538467`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0006843013688921928, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.02807183563709259, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.08958406001329422, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.06464912742376328, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.027407195419073105`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.04825185239315033, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.07882684469223022, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.19454467296600342`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.029770972207188606`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.1583365499973297, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.015709739178419113`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.06388334184885025, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0726250559091568, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.005917602218687534, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.014252185821533203`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.13689106702804565`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.004525120370090008, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.01192324049770832, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.003140013199299574, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.14820288121700287`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.16682587563991547`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.14211218059062958`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.1680322289466858, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.04191240295767784, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0030544146429747343`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.03749086707830429, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.10525929927825928`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.16693547368049622`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.02160479500889778, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.08981320261955261, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.09969073534011841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.14275887608528137`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.19591286778450012`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0017269252566620708`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.04699581488966942, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.09925083070993423, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.011130495928227901`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.0653456449508667, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.23181630671024323`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.02793620340526104, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.007443323265761137, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.001535956747829914, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.21119257807731628`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.4215286374092102, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\\"\"\>", Background->Opacity[0.0478731170296669, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.13959775865077972`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.24603281915187836`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.15306054055690765`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.12943819165229797`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.17334048449993134`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0009211970027536154, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.05726217105984688, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.12167581170797348`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.23097755014896393`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.09921274334192276, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.1652047038078308, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.108402319252491, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.2453259527683258, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.06003151461482048, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.2587457597255707, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0987209677696228, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.06543197482824326, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.08453047275543213, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.014951038174331188`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.08098658919334412, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.2836364805698395, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.007214259821921587, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.025576185435056686`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.0055988747626543045`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.15518707036972046`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.4376872479915619, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7513684630393982, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.4401262700557709, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.9133551120758057, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.9944962859153748, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9085025191307068, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.24489209055900574`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.6294313669204712, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.938366174697876, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8281546831130981, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.16279847919940948`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.4216165244579315, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.5045453310012817, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.9958498477935791, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8843509554862976, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.23504917323589325`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.9679726958274841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9177504181861877, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.24430568516254425`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.9226248264312744, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.9717789888381958, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.9975554943084717, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.5851525068283081, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.4754475951194763, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8927527070045471, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.22015661001205444`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.43513792753219604`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7785044312477112, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.4832051694393158, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.7029153108596802, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.9979013204574585, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.899487316608429, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.16895590722560883`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.5980050563812256, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.8402529358863831, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7295488119125366, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.17550653219223022`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.3853340446949005, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.880469024181366, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.43894755840301514`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.884338915348053, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8291409611701965, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.30635133385658264`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.9575300812721252, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9028406739234924, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.28976744413375854`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.9739534854888916, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.9244098663330078, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.9905941486358643, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.5612043142318726, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]} }, AutoDelete->False, FrameStyle->GrayLevel[0.5], GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0.6}}, "Rows" -> {{0.2}}}], "Grid"]], "Output", CellChangeTimes->{ 3.734449549136166*^9, 3.734692424297307*^9, 3.7346932834055347`*^9, 3.751611270940827*^9, 3.7537072555756607`*^9, 3.757159125678372*^9, { 3.7615032387872334`*^9, 3.761503259491843*^9}}, CellLabel->"Out[82]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"inspectPredictions", "@", RowBox[{"StringTake", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", RowBox[{"{", RowBox[{"840", ",", "905"}], "}"}]}], "]"}]}]], "Input", CellLabel->"In[83]:="], Cell[BoxData[ TagBox[GridBox[{ { ItemBox["\<\"F\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"W\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"l\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"f\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"w\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"k\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"u\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"p\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"f\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"d\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"y\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"'\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\",\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"c\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"c\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"d\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"l\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"f\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\",\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"y\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"w\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"d\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.08629569411277771, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.09689323604106903, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.037083517760038376`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0007939459173940122, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.00001059813530446263, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.020911403000354767`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"D\"\>", Background->Opacity[0.0553491972386837, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.0508388876914978, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.028213240206241608`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.017489757388830185`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.041853927075862885`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05803726986050606, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.018249886110424995`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"k\"\>", Background->Opacity[0.003871239023283124, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0006463229074142873, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.004859444219619036, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.06020643934607506, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0002507712924852967, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\";\"\>", Background->Opacity[0.008125366643071175, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.07905575633049011, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.009360633790493011, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.00009312330075772479, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.0001309092913288623, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"?\"\>", Background->Opacity[0.00009672000305727124, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.031144283711910248`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.0029954281635582447`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0003604420053306967, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.000574212521314621, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.07266335189342499, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.10019603371620178`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.05201920494437218, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.049180176109075546`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.0002920679980888963, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0008124998421408236, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.06186022236943245, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.058488260954618454`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.09463851898908615, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.11358692497015, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.034962937235832214`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.0007333899848163128, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05969899520277977, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0826856717467308, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.025525512173771858`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.00722412159666419, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.008282778784632683, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.002588478149846196, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.00021002476569265127`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.007234911434352398, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.00024013585061766207`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.0009212131844833493, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0647769495844841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.001043045544065535, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.0001962899841601029, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.010597736574709415`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.00001281600179936504, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[8.716475349501707*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.0000790420817793347, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.0014874787302687764`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.0005612400709651411, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05933162197470665, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.006520611699670553, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.02298400178551674, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.0007809603121131659, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0017361757345497608`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.0002704100916162133, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.08853376656770706, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.12497084587812424`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.049510255455970764`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.000922714767511934, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00001599201095814351, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.02429168112576008, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"S\"\>", Background->Opacity[0.058555033057928085`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.05178427696228027, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.059064023196697235`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.02172354981303215, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.043183665722608566`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.06244901940226555, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.0380551852285862, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.005608541425317526, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0008462374098598957, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.013479199260473251`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.061460454016923904`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0005784968379884958, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.01950126141309738, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.10158397257328033`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.010156996548175812`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0007109818398021162, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0001647416065679863, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0002719448821153492, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.04318351298570633, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.008934206329286098, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0011042754631489515`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.000827781215775758, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.08871100842952728, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.11273080855607986`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.11503954976797104`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0892028883099556, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.0006632565055042505, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.004631341900676489, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.06651129573583603, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.07649871706962585, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.11701598018407822`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.1404276341199875, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.10977895557880402`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.0012748334556818008`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.08779896795749664, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.09918326139450073, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.04843004420399666, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.04624171927571297, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.04635898396372795, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.003145624650642276, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0011978275142610073`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.008026805706322193, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.00036517929402180016`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0024067654740065336`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.06933876127004623, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.003987009637057781, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.00030275838798843324`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.028909355401992798`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.000016655576473567635`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[9.998617315432057*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.00010707271576393396`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.004542859736829996, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.002141052158549428, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.07409504055976868, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.02738136611878872, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.025922667235136032`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.0011045322753489017`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.0032202342990785837`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0002838460495695472, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.1302577704191208, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.1356571614742279, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.13767245411872864`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.0011769375996664166`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.00002033971577475313, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.09817596524953842, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"C\"\>", Background->Opacity[0.06670379638671875, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.16562435030937195`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.06631405651569366, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.022344835102558136`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.08603376895189285, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"C\"\>", Background->Opacity[0.07135820388793945, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0870693251490593, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.09326421469449997, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"k\"\>", Background->Opacity[0.0013504663947969675`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.014201289042830467`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.0733259990811348, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0011055435752496123`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.021622437983751297`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.17916083335876465`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.022907836362719536`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.0030303290113806725`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00034967184183187783`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.0013229598989710212`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.0910915732383728, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.009788081049919128, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.0014156262623146176`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.002644578693434596, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.10617560148239136`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.2002374231815338, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.13982851803302765`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.1203448623418808, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.0089851850643754, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.005884208716452122, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.06912387907505035, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.07656119018793106, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.12390601634979248`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.14223262667655945`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.11417818814516068`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\\"\"\>", Background->Opacity[0.00773273129016161, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.11040050536394119`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.18285790085792542`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.10256864875555038`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0683429166674614, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.11868748068809509`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00880914181470871, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0025746729224920273`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.06946505606174469, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0011325320228934288`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.019409717991948128`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.11445730179548264`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.012499446980655193`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.0008782153017818928, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.08676161617040634, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.000024342682081623934`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00001989236261579208, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.0001080288493540138, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.03374771028757095, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\\"\"\>", Background->Opacity[0.004682459402829409, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.08169659972190857, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.05568831041455269, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.04702591523528099, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"k\"\>", Background->Opacity[0.007063174154609442, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.006622442975640297, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0006004255264997482, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.19604645669460297`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.14010654389858246`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.27803492546081543`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.0013539779465645552`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.00011039656237699091`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.20947620272636414`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"B\"\>", Background->Opacity[0.08576446026563644, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.31643879413604736`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.12371480464935303`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.02788423001766205, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.08979979902505875, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.08810553699731827, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.10687752813100815`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.1265709400177002, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0031829271465539932`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.045276105403900146`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.10662604868412018`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.011955013498663902`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.10870376229286194`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.18775606155395508`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.4084186255931854, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.0037610759027302265`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0022524993401020765`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.08060642331838608, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.17455647885799408`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.45129483938217163`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.11860091239213943`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.09248607605695724, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.12606163322925568`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.2127438485622406, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.2830287218093872, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.2672989070415497, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.027696385979652405`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.09216432273387909, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.11961226165294647`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.3266422152519226, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.15915796160697937`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.19140367209911346`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.17876072227954865`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.10024923086166382`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.15927234292030334`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.2047661393880844, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.33223435282707214`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.35680001974105835`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.3504665195941925, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.009626060724258423, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.01874997280538082, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.2833694517612457, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.013997131958603859`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.1576155722141266, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.11786015331745148`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.3560464084148407, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.1261812299489975, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.30271807312965393`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.000035156037483830005`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.00003045861558348406, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00011345039820298553`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.17279872298240662`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.2856515944004059, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.13776925206184387`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.4396613538265228, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.08339514583349228, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.00852987915277481, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.12248827517032623`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0023141857236623764`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.2819947600364685, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.1793036162853241, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.443013995885849, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.9938461184501648, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.9997993111610413, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.6034712791442871, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.10449958592653275`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.3588540256023407, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.6102478504180908, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.8409214019775391, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.6583947539329529, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.10894699394702911`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.7378242611885071, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.7672089338302612, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.990616500377655, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9127975106239319, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.4775914251804352, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.9853461980819702, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8190509080886841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.2667778432369232, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.5436985492706299, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.9923916459083557, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.9967814683914185, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9174172282218933, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.34635335206985474`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.5265916585922241, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.8771581649780273, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9032163023948669, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.13444092869758606`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.3041839897632599, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.3254932761192322, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.33848121762275696`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.9610186815261841, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8952047824859619, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.14052003622055054`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.45571061968803406`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.2644974887371063, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.31574469804763794`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.4546186029911041, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8898711800575256, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.24634164571762085`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.2102162092924118, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.45628103613853455`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.5166851878166199, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.44792017340660095`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.9659692049026489, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.9764359593391418, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.6086651682853699, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.9836320877075195, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.818352222442627, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.40562233328819275`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.6259592771530151, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.8720373511314392, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.5671894550323486, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.9998934268951416, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.9999080896377563, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.9995077848434448, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7854142785072327, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7068725228309631, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.31259265542030334`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.46765661239624023`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.7732944488525391, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.9796572327613831, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.861842691898346, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.9960344433784485, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]} }, AutoDelete->False, FrameStyle->GrayLevel[0.5], GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0.6}}, "Rows" -> {{0.2}}}], "Grid"]], "Output", CellChangeTimes->{ 3.734267847763747*^9, {3.7342678896868258`*^9, 3.7342679114342127`*^9}, { 3.734268582279661*^9, 3.7342685991557302`*^9}, {3.734268768309*^9, 3.734268829125677*^9}, 3.7342688596897507`*^9, 3.7342688950199738`*^9, 3.7344490432495213`*^9, {3.7346924260053587`*^9, 3.734692433540201*^9}, 3.7346932837984324`*^9, 3.7516112760420017`*^9, 3.753707255912836*^9, 3.757159129833847*^9, {3.761503239005423*^9, 3.761503259696804*^9}}, CellLabel->"Out[83]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"inspectPredictions", "@", RowBox[{"StringTake", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", RowBox[{"{", RowBox[{"6652", ",", "6714"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.733826533670343*^9, 3.733826561091978*^9}, { 3.733827161563119*^9, 3.733827315011304*^9}, {3.733827361935884*^9, 3.733827370518701*^9}, {3.734262725758452*^9, 3.734262780957843*^9}}, CellLabel->"In[84]:="], Cell[BoxData[ TagBox[GridBox[{ { ItemBox["\<\"A\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"l\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"u\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"g\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"I\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"d\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"p\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"s\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"d\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"m\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"t\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"h\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"b\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"e\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"g\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"b\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"o\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"r\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"i\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"n\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\" \"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False], ItemBox["\<\"a\"\>", Background->RGBColor[0.87, 0.94, 1], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.06357072293758392, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.06692222505807877, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.03234592825174332, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.0016170659800991416`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.0018272349843755364`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.0011032366892322898`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[3.3854550451906107`*^-7, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0006590516422875226, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"I\"\>", Background->Opacity[0.06253817677497864, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.009648594073951244, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.09339404106140137, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.010873042047023773`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\")\"\>", Background->Opacity[0.0017198637360706925`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05743233114480972, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.0007980288937687874, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0016637512017041445`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.001984416041523218, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.05031145364046097, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.039454951882362366`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.009041638113558292, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.03592797368764877, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.09179625660181046, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.00209326040931046, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.00020352320279926062`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.0002047511952696368, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"?\"\>", Background->Opacity[0.004648951813578606, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.006477324757725, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.000058906680351356044`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0006570439436472952, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.05616149306297302, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.024001993238925934`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.010882033966481686`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0008962400024756789, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.00026764743961393833`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.00003477720747468993, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.00019554936443455517`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.000011534041732375044`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\")\"\>", Background->Opacity[0.004165915306657553, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.059447433799505234`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.008042753674089909, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.003173667471855879, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.00003714122431119904, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"?\"\>", Background->Opacity[0.003233523340895772, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"I\"\>", Background->Opacity[0.06985355913639069, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.014058990404009819`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.008847352117300034, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.016684819012880325`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.04477808251976967, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.0929723009467125, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.058583714067935944`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0005989342462271452, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[6.641607797064353*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.002966201864182949, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.07513947039842606, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.050720762461423874`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.026444407179951668`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.022787194699048996`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.007662592455744743, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0724342092871666, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.0042618620209395885`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.009237140417098999, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.031904540956020355`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.08064267784357071, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.08283328264951706, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.04776827245950699, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0036963436286896467`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.00221176422201097, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.0015694755129516125`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[1.5574668168483186`*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0010727632325142622`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.07361886650323868, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.011262655258178711`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.09536112844944, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.019713861867785454`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"-\"\>", Background->Opacity[0.0044196234084665775`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.07422889024019241, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.0012125809444114566`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.0029712116811424494`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.0023445640690624714`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.05284838378429413, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.05874286964535713, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"v\"\>", Background->Opacity[0.01968797668814659, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.1796882003545761, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.09619797766208649, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0024116728454828262`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0009949097875505686, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0016986787086352706`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.005530694965273142, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.006978109944611788, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.00012065675400663167`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.002273544669151306, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.06684981286525726, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.032835882157087326`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.02536914125084877, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.0020734488498419523`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.00037372976657934487`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.000048213427362497896`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0003013676032423973, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.000015484025425394066`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.007027036044746637, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.07835231721401215, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.014638293534517288`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.017039412632584572`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00005117552063893527, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\".\"\>", Background->Opacity[0.0063357874751091, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.08928750455379486, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.02587166242301464, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.017920339480042458`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.03650198504328728, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.06439661979675293, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.10618175566196442`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.09399689733982086, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0006615323945879936, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.00003592994835344143, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.01290983334183693, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.08420810103416443, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.11397183686494827`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.029816409572958946`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.026530185714364052`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.04487431049346924, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.12438119947910309`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.006198560353368521, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.012881177477538586`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.03780355677008629, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.10962478071451187`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.11579124629497528`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.048390936106443405`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.003895837813615799, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0035632920917123556`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.0018709930591285229`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[2.5364656721649226`*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.013857873156666756`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.07522968202829361, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.015681900084018707`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.12131538987159729`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.022637518122792244`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.01426204014569521, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.10956434160470963`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.008831121027469635, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.07251421362161636, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.017182545736432076`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05456800386309624, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.2007337063550949, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.02234858088195324, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.18710149824619293`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.12515892088413239`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.0025235097855329514`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.00597691023722291, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.0017906237626448274`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.028030885383486748`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.006997996475547552, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.0001271369110327214, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.010695111937820911`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.07546177506446838, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.09974237531423569, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.030710600316524506`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.003235805546864867, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0008221165044233203, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.00010864359501283616`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.00037639099173247814`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.00008561083814129233, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.03601857274770737, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.08949412405490875, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.022222179919481277`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.03836318477988243, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.000057024688430828974`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.0576067753136158, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.09179415553808212, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.026743469759821892`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.02873554639518261, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.12456285208463669`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.10928688943386078`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.1245412677526474, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.1156538873910904, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.002241668989881873, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.00015602228813804686`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.016339989379048347`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.11424494534730911`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.17351602017879486`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.1074758768081665, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.027706623077392578`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.04647696763277054, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.14240479469299316`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.02706247940659523, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.05430879816412926, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.04077572003006935, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.11974427103996277`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.12080502510070801`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.06504736095666885, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.005022421479225159, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.007320777978748083, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0047758170403540134`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[2.9066193292237585`*^-6, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.019414519891142845`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.10718430578708649`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.019462907686829567`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.12881679832935333`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.0405387319624424, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.026185518130660057`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.15636998414993286`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.07269386947154999, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.10042516142129898`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.024009523913264275`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.16005423665046692`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.2768822908401489, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"f\"\>", Background->Opacity[0.15804480016231537`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.23999027907848358`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.3019128739833832, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.003256247378885746, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.025330539792776108`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.002008626703172922, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.10078860819339752`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.33192697167396545`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.008632371202111244, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.04911734536290169, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.16130922734737396`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.23231881856918335`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.05948235094547272, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.0037840502336621284`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.004805253818631172, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.00019221639377065003`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.0008567040204070508, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.0015375681687146425`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.04554711654782295, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.11384984105825424`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.028618432581424713`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.0837344229221344, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.0062615335918962955`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\",\"\>", Background->Opacity[0.07383915781974792, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.09601907432079315, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.0511755496263504, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.04826454445719719, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"y\"\>", Background->Opacity[0.2579459249973297, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.11176253110170364`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.20138691365718842`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.16057442128658295`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.004521460738033056, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"'\"\>", Background->Opacity[0.0007874621078372002, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"\\n\"\>", Background->Opacity[0.05749154090881348, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.11991507560014725`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.20929867029190063`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.21925871074199677`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.3175358176231384, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.17272111773490906`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.1495523750782013, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.07236936688423157, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.05552908033132553, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.10748136788606644`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]}, { ItemBox["\<\"\"\>", Background->GrayLevel[0.5], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.12031639367341995`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"l\"\>", Background->Opacity[0.31029337644577026`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.724906325340271, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.9816531538963318, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"u\"\>", Background->Opacity[0.977382242679596, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.9874323606491089, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.9999904632568359, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9630308151245117, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.23964008688926697`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9169889092445374, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.14417995512485504`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"m\"\>", Background->Opacity[0.852996289730072, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9491629004478455, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.18181493878364563`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.9163186550140381, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.819084107875824, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9484769701957703, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.20983268320560455`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.38021570444107056`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.7672843933105469, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"c\"\>", Background->Opacity[0.2512640655040741, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.31540659070014954`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.9866136908531189, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.967359185218811, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"d\"\>", Background->Opacity[0.9937485456466675, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8492308259010315, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.6331098675727844, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.9909160733222961, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9349077939987183, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"b\"\>", Background->Opacity[0.1721259355545044, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.5974574685096741, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"k\"\>", Background->Opacity[0.8617671728134155, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.9892032742500305, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.9931284189224243, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"a\"\>", Background->Opacity[0.9995115995407104, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.9980277419090271, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.9983239769935608, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8986919522285461, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.2881443500518799, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.9173917174339294, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.8555944561958313, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.9934334754943848, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8514139652252197, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.10377781093120575`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"h\"\>", Background->Opacity[0.8594555854797363, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.8948339223861694, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.5423182249069214, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"p\"\>", Background->Opacity[0.1179412305355072, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"o\"\>", Background->Opacity[0.3166714012622833, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"s\"\>", Background->Opacity[0.3754690885543823, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.9900494813919067, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"g\"\>", Background->Opacity[0.9989732503890991, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.9062687158584595, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"w\"\>", Background->Opacity[0.15656588971614838`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"e\"\>", Background->Opacity[0.365853875875473, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"r\"\>", Background->Opacity[0.507810115814209, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.596621036529541, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.7124708890914917, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"i\"\>", Background->Opacity[0.21962220966815948`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"n\"\>", Background->Opacity[0.884975254535675, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\" \"\>", Background->Opacity[0.8382590413093567, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False], ItemBox["\<\"t\"\>", Background->Opacity[0.34564363956451416`, RGBColor[0, Rational[2, 3], 0]], StripOnInput->False]} }, AutoDelete->False, FrameStyle->GrayLevel[0.5], GridBoxDividers->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0.6}}, "Rows" -> {{0.2}}}], "Grid"]], "Output", CellChangeTimes->{{3.734208881297839*^9, 3.734208900409498*^9}, 3.734208931801488*^9, 3.7342090484950733`*^9, 3.734262089116197*^9, 3.734262147238291*^9, {3.734262666999103*^9, 3.734262681013929*^9}, { 3.7342627262140627`*^9, 3.73426278173811*^9}, 3.73426784931218*^9, 3.734268601456367*^9, 3.7342688961889153`*^9, 3.734449047791546*^9, { 3.73469242755684*^9, 3.734692440991873*^9}, 3.7346932841553373`*^9, 3.751611284287715*^9, 3.753707256198283*^9, 3.7571591338442183`*^9, { 3.7615032392270937`*^9, 3.761503259908814*^9}}, CellLabel->"Out[84]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Word completion", "Subsection", CellChangeTimes->{{3.7337457042173443`*^9, 3.733745710007781*^9}}], Cell["\<\ Define a function to complete a partial word by sampling with the model. Keep \ generating until a non-letter character is found:\ \>", "Text", CellChangeTimes->{{3.7337457113194113`*^9, 3.7337457558722973`*^9}, { 3.7338244851455107`*^9, 3.733824511937665*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"autocomplete", "[", "word_", "]"}], ":=", RowBox[{"Block", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"obj", "=", RowBox[{"NetStateObject", "[", RowBox[{ "NetModel", "[", "\"\\"", "]"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"StringJoin", "@", RowBox[{"Most", "@", RowBox[{"NestWhileList", "[", RowBox[{"obj", ",", "word", ",", RowBox[{ RowBox[{"StringMatchQ", "[", RowBox[{"#", ",", RowBox[{"LetterCharacter", "|", "word"}]}], "]"}], "&"}]}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.7337457840019283`*^9, 3.7337458978501368`*^9}, { 3.7338240539618483`*^9, 3.733824080392118*^9}, {3.733824579925948*^9, 3.733824602982216*^9}, {3.734262257586626*^9, 3.734262272435075*^9}, 3.734267932981378*^9}, CellLabel->"In[85]:="], Cell["Autocomplete a list of words:", "Text", CellChangeTimes->{{3.733745956849698*^9, 3.73374596156199*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"autocomplete", "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]], "Input", CellChangeTimes->{{3.733745843868388*^9, 3.733745848113237*^9}, { 3.733745911213727*^9, 3.733745934726055*^9}, {3.7337459651185513`*^9, 3.733745967609557*^9}, {3.733746136635503*^9, 3.7337461787727203`*^9}, { 3.7338240838752747`*^9, 3.733824091253756*^9}, {3.73382459952726*^9, 3.733824614886198*^9}}, CellLabel->"In[86]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"absolute\"\>", ",", "\<\"incredible\"\>", ",", "\<\"attached\"\>", ",", "\<\"perspicuous\"\>", ",", "\<\"arbitrarily\"\>", ",", "\<\"durability\"\>", ",", "\<\"magnetic\"\>", ",", "\<\"acclimation\"\>"}], "}"}]], "Output", CellChangeTimes->{ 3.734209352964797*^9, 3.73426227598599*^9, 3.73426793509729*^9, 3.734268611322657*^9, 3.734449051106924*^9, 3.7346924499353237`*^9, 3.734693284513385*^9, 3.751611292250354*^9, 3.753707256423127*^9, 3.7571591340411177`*^9, {3.761503239435194*^9, 3.761503260094997*^9}}, CellLabel->"Out[86]="] }, Open ]], Cell["Create \[OpenCurlyDoubleQuote]fantasy\[CloseCurlyDoubleQuote] words:", \ "Text", CellChangeTimes->{{3.733745956849698*^9, 3.73374596156199*^9}, { 3.734262179401218*^9, 3.734262185822194*^9}, {3.734262368019546*^9, 3.734262371763989*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"autocomplete", "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]], "Input", CellChangeTimes->{{3.734262190695562*^9, 3.734262245694126*^9}, { 3.734262281879178*^9, 3.734262355984201*^9}, {3.7342679229124393`*^9, 3.734267923282783*^9}, {3.73426800987578*^9, 3.734268295720015*^9}, { 3.734268366956614*^9, 3.734268462208788*^9}, {3.734268494685905*^9, 3.734268516627438*^9}}, CellLabel->"In[87]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"foobility\"\>", ",", "\<\"cromution\"\>", ",", "\<\"embiguine\"\>", ",", "\<\"mestiphalized\"\>", ",", "\<\"bazing\"\>", ",", "\<\"promipety\"\>", ",", "\<\"qweeter\"\>", ",", "\<\"tatorial\"\>", ",", "\<\"salhood\"\>"}], "}"}]], "Output", CellChangeTimes->{{3.7342682338329782`*^9, 3.734268296520043*^9}, { 3.734268367760651*^9, 3.734268462826304*^9}, {3.73426849647337*^9, 3.7342685173180637`*^9}, 3.734268612233101*^9, 3.734449052256443*^9, 3.734692450167736*^9, 3.7346932847395277`*^9, 3.751611294582233*^9, 3.753707256550193*^9, 3.757159134175744*^9, {3.7615032396048594`*^9, 3.761503260226557*^9}}, CellLabel->"Out[87]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Net information", "Subsection", CellChangeTimes->{{3.7259790342745*^9, 3.7259790377150373`*^9}}], Cell["Inspect the sizes of all arrays in the net:", "Text", CellChangeTimes->{{3.725979178627933*^9, 3.7259791789799137`*^9}, { 3.7259792303321257`*^9, 3.725979245908435*^9}, 3.731064940869965*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetInformation", "[", RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.7259788404124393`*^9, 3.725978914346767*^9}, { 3.725979106142807*^9, 3.725979226389083*^9}, {3.72804423543222*^9, 3.7280442516408577`*^9}, 3.728117765478215*^9, {3.730020998048235*^9, 3.730020999658333*^9}, {3.730021379253743*^9, 3.730021410947983*^9}, 3.731149288568117*^9, 3.733144698856247*^9, 3.733743079638439*^9}, CellLabel->"In[88]:="], Cell[BoxData[ RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"1", ",", "\<\"Weights\"\>"}], "}"}], "\[Rule]", "9409"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"InputGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"InputGateInputWeights\"\>"}], "}"}], "\[Rule]", "49664"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"InputGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"MemoryGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"MemoryGateInputWeights\"\>"}], "}"}], "\[Rule]", "49664"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"MemoryGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"ResetGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"ResetGateInputWeights\"\>"}], "}"}], "\[Rule]", "49664"}], ",", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "\<\"ResetGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"InputGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"InputGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"InputGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"MemoryGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"MemoryGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"MemoryGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"ResetGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"ResetGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "\<\"ResetGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"InputGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"InputGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"InputGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"MemoryGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"MemoryGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"MemoryGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"ResetGateBiases\"\>"}], "}"}], "\[Rule]", "512"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"ResetGateInputWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "\<\"ResetGateStateWeights\"\>"}], "}"}], "\[Rule]", "262144"}], ",", RowBox[{ RowBox[{"{", RowBox[{"7", ",", "\<\"Biases\"\>"}], "}"}], "\[Rule]", "97"}], ",", RowBox[{ RowBox[{"{", RowBox[{"7", ",", "\<\"Weights\"\>"}], "}"}], "\[Rule]", "49664"}]}], "\[RightAssociation]"}]], "Output", CellChangeTimes->{ 3.7342685278347197`*^9, 3.734268613849895*^9, 3.734692489534552*^9, 3.734693284779408*^9, 3.75161130594912*^9, 3.7537072565603333`*^9, 3.757159134205164*^9, {3.7615032396179333`*^9, 3.761503260237877*^9}}, CellLabel->"Out[88]="] }, Open ]], Cell["Obtain the total number of parameters:", "Text", CellChangeTimes->{{3.725979366532411*^9, 3.725979381541073*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetInformation", "[", RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.725979344677472*^9, 3.7259793615177526`*^9}, { 3.728044267184713*^9, 3.728044277546625*^9}, 3.7281177655054693`*^9, { 3.7300210026682453`*^9, 3.7300210049877043`*^9}, 3.7300214012047567`*^9, 3.731149292495186*^9, 3.733144782494796*^9, 3.733743082479162*^9}, CellLabel->"In[89]:="], Cell[BoxData["4144930"], "Output", CellChangeTimes->{ 3.734268529351754*^9, 3.734268615758065*^9, 3.7346924895967703`*^9, 3.734693284819647*^9, 3.751611307387595*^9, 3.753707256586768*^9, 3.757159134226749*^9, {3.761503239649033*^9, 3.7615032602708893`*^9}}, CellLabel->"Out[89]="] }, Open ]], Cell["Obtain the layer type counts:", "Text", CellChangeTimes->{{3.725979260148272*^9, 3.725979271188596*^9}, 3.725979320962792*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetInformation", "[", RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.7259788404124393`*^9, 3.725978914346767*^9}, { 3.725979106142807*^9, 3.725979226389083*^9}, {3.725979272976316*^9, 3.725979275437305*^9}, {3.728044270472636*^9, 3.728044290049171*^9}, 3.7281177655092163`*^9, {3.730021006383233*^9, 3.730021008283589*^9}, 3.730021403009437*^9, 3.7311492943191423`*^9, 3.7331447931071587`*^9, 3.7337430843733587`*^9}, CellLabel->"In[90]:="], Cell[BoxData[ RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"EmbeddingLayer", "\[Rule]", "1"}], ",", RowBox[{"DropoutLayer", "\[Rule]", "1"}], ",", RowBox[{"GatedRecurrentLayer", "\[Rule]", "3"}], ",", RowBox[{"SequenceLastLayer", "\[Rule]", "1"}], ",", RowBox[{"LinearLayer", "\[Rule]", "1"}], ",", RowBox[{"SoftmaxLayer", "\[Rule]", "1"}]}], "\[RightAssociation]"}]], "Output", CellChangeTimes->{ 3.734268530481872*^9, 3.734268616806376*^9, 3.73469248964744*^9, 3.734693284858691*^9, 3.7516113083690243`*^9, 3.753707256595695*^9, 3.7571591342333803`*^9, {3.761503239679041*^9, 3.76150326030299*^9}}, CellLabel->"Out[90]="] }, Open ]], Cell["Display the summary graphic:", "Text", CellChangeTimes->{{3.726915136428933*^9, 3.726915145334137*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetInformation", "[", RowBox[{ RowBox[{ "NetModel", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{{3.726915091854125*^9, 3.726915105397193*^9}, { 3.726915148220851*^9, 3.7269151561171083`*^9}, {3.7269219125666513`*^9, 3.726921917137031*^9}, 3.7270984890233917`*^9, {3.7280445380007477`*^9, 3.728044546680677*^9}, {3.728044940898171*^9, 3.728044961781652*^9}, 3.7281177655130243`*^9, {3.7300210112584553`*^9, 3.7300210132691793`*^9}, 3.730021404554714*^9, 3.731149352183951*^9, {3.731149523402163*^9, 3.731149523887965*^9}, 3.733144802549282*^9, 3.7337430868216343`*^9}, CellLabel->"In[91]:="], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.7], LineBox[{{-9., 5.51091059616309*^-16}, {-8., 4.898587196589413*^-16}}], LineBox[{{-8., 4.898587196589413*^-16}, {-7., 4.286263797015736*^-16}}], LineBox[{{-7., 4.286263797015736*^-16}, {-6., 3.6739403974420594`*^-16}}], LineBox[{{-6., 3.6739403974420594`*^-16}, {-5., 3.061616997868383*^-16}}], LineBox[{{-5., 3.061616997868383*^-16}, {-4., 2.4492935982947064`*^-16}}], LineBox[{{-4., 2.4492935982947064`*^-16}, {-3., 1.8369701987210297`*^-16}}], LineBox[{{-3., 1.8369701987210297`*^-16}, {-2., 1.2246467991473532`*^-16}}], LineBox[{{-2., 1.2246467991473532`*^-16}, {-1., 6.123233995736766*^-17}}], LineBox[{{-1., 6.123233995736766*^-17}, {0., 0.}}]}, {InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-8.4, 5.143516556418883*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-7.4, 4.531193156845207*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-6.4, 3.9188697572715305*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-5.4, 3.3065463576978537*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736762*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-4.4, 2.694222958124177*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-3.4, 2.0818995585505003*^-16}, {-0.25, 0}, Offset[8], {1., -6.123233995736767*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], \ {-2.4000000000000004, 1.4695761589768238*^-16}, {-0.25, 0}, Offset[8], { 1., -6.123233995736765*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-1.4, 8.572527594031473*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}], InsetBox[ GraphicsBox[ {GrayLevel[0.7], PolygonBox[{{-1., 0.3333333333333333}, {0., 0.}, {-1., -0.3333333333333333}, {-0.6666666666666666, 0.}, {-1., 0.3333333333333333}}]}], {-0.4, 2.4492935982947065*^-17}, {-0.25, 0}, Offset[8], {1., -6.123233995736766*^-17}]}, {EdgeForm[AbsoluteThickness[1]], StyleBox[{ {GrayLevel[0.85], EdgeForm[GrayLevel[0.5]], DiskBox[{-9., 5.51091059616309*^-16}, Offset[{2., 2.}, {0., 0.}]]}, { {EdgeForm[GrayLevel[0.7]], FaceForm[RGBColor[ 0.7999999999999999, 0.7999999999999999, 0.7999999999999999]], RectangleBox[Offset[{-10, -10}, {-8., 4.898587196589413*^-16}], Offset[{10, 10}, {-8., 4.898587196589413*^-16}]]}, InsetBox["\<\"E\"\>", Offset[{0, -1}, {-8., 4.898587196589413*^-16}]]}, { {EdgeForm[GrayLevel[0.85]], FaceForm[RGBColor[0.9, 0.9, 0.9]], RectangleBox[Offset[{-10, -10}, {-7., 4.286263797015736*^-16}], Offset[{10, 10}, {-7., 4.286263797015736*^-16}]]}, InsetBox["\<\"D\"\>", Offset[{0, -1}, {-7., 4.286263797015736*^-16}]]}, { {EdgeForm[GrayLevel[0.7]], FaceForm[RGBColor[ 0.7999999999999999, 0.7999999999999999, 0.7999999999999999]], RectangleBox[Offset[{-10, -10}, {-6., 3.6739403974420594*^-16}], Offset[{10, 10}, {-6., 3.6739403974420594*^-16}]]}, InsetBox["\<\"GR\"\>", Offset[{0, -1}, {-6., 3.6739403974420594*^-16}]]}, { {EdgeForm[GrayLevel[0.7]], FaceForm[RGBColor[ 0.7999999999999999, 0.7999999999999999, 0.7999999999999999]], RectangleBox[Offset[{-10, -10}, {-5., 3.061616997868383*^-16}], Offset[{10, 10}, {-5., 3.061616997868383*^-16}]]}, InsetBox["\<\"GR\"\>", Offset[{0, -1}, {-5., 3.061616997868383*^-16}]]}, { {EdgeForm[GrayLevel[0.7]], FaceForm[RGBColor[ 0.7999999999999999, 0.7999999999999999, 0.7999999999999999]], RectangleBox[Offset[{-10, -10}, {-4., 2.4492935982947064*^-16}], Offset[{10, 10}, {-4., 2.4492935982947064*^-16}]]}, InsetBox["\<\"GR\"\>", Offset[{0, -1}, {-4., 2.4492935982947064*^-16}]]}, { {EdgeForm[GrayLevel[0.85]], FaceForm[RGBColor[0.9, 0.9, 0.9]], RectangleBox[Offset[{-10, -10}, {-3., 1.8369701987210297*^-16}], Offset[{10, 10}, {-3., 1.8369701987210297*^-16}]]}, InsetBox["\<\"SL\"\>", Offset[{0, -1}, {-3., 1.8369701987210297*^-16}]]}, { {EdgeForm[GrayLevel[0.7]], FaceForm[RGBColor[ 0.7999999999999999, 0.7999999999999999, 0.7999999999999999]], RectangleBox[Offset[{-10, -10}, {-2., 1.2246467991473532*^-16}], Offset[{10, 10}, {-2., 1.2246467991473532*^-16}]]}, InsetBox[ GraphicsBox[ GraphicsComplexBox[{{0.1, 0}, {-0.3, 1}, {0.5, 1}, {1.3, 1}, { 0.9, 0}}, { {Opacity[0.2], LineBox[{{1, 2}, {1, 3}, {1, 4}, {5, 2}, {5, 3}, {5, 4}}]}, {RGBColor[0.33, 0.33, 0.33], AbsolutePointSize[3.5], PointBox[{1, 5, 2, 3, 4}]}}], ImageSize->18], {-2., 1.2246467991473532*^-16}]}, { {EdgeForm[GrayLevel[0.85]], FaceForm[RGBColor[0.9, 0.9, 0.9]], RectangleBox[Offset[{-10, -10}, {-1., 6.123233995736766*^-17}], Offset[{10, 10}, {-1., 6.123233995736766*^-17}]]}, InsetBox["\<\"S\"\>", Offset[{0, -1}, {-1., 6.123233995736766*^-17}]]}, {GrayLevel[0.85], EdgeForm[GrayLevel[0.5]], DiskBox[{0., 0.}, Offset[{2., 2.}, {0., 0.}]]}}, FontSize->10]}, { StyleBox[{ InsetBox["\<\"Input\"\>", Offset[{0, -7}, {-9., 5.51091059616309*^-16}], {0, 1.}, Automatic, {1, 0}], InsetBox["\<\"1\"\>", Offset[{0, -13}, {-8., 4.898587196589413*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"2\"\>", Offset[{0, -13}, {-7., 4.286263797015736*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"3\"\>", Offset[{0, -13}, {-6., 3.6739403974420594*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"4\"\>", Offset[{0, -13}, {-5., 3.061616997868383*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"5\"\>", Offset[{0, -13}, {-4., 2.4492935982947064*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"6\"\>", Offset[{0, -13}, {-3., 1.8369701987210297*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"7\"\>", Offset[{0, -13}, {-2., 1.2246467991473532*^-16}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"8\"\>", Offset[{0, -13}, {-1., 6.123233995736766*^-17}], {0, 1.}, Automatic, { 1, 0}], InsetBox["\<\"Output\"\>", Offset[{0, -7}, {0., 0.}], {0, 1.}, Automatic, {1, 0}]}, StripOnInput->False, FontColor->GrayLevel[0.5]], StyleBox[{InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False]}, "RowWithSeparators"], Offset[{3.367778697655222*^-16, 5.5}, {-8.4, 5.143516556418883*^-16}], \ {0., -0.17}, Automatic, {1., -6.123233995736767*^-17}], InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False],"\"97\""}, "RowWithSeparators"], Offset[{3.367778697655222*^-16, 5.5}, {-7.4, 4.531193156845207*^-16}], {0., -0.17}, Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False],"\"97\""}, "RowWithSeparators"], Offset[{3.367778697655222*^-16, 5.5}, \ {-6.4, 3.9188697572715305*^-16}], {0., -0.17}, Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False],"\"512\""}, "RowWithSeparators"], Offset[{3.3677786976552195*^-16, 5.5}, \ {-5.4, 3.3065463576978537*^-16}], {0., -0.17}, Automatic, { 1., -6.123233995736762*^-17}], InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False],"\"512\""}, "RowWithSeparators"], Offset[{3.367778697655222*^-16, 5.5}, {-4.4, 2.694222958124177*^-16}], \ {0., -0.17}, Automatic, {1., -6.123233995736767*^-17}], InsetBox[ TemplateBox[{ "\[Cross]","\"\[Cross]\"",StyleBox[ "\"n\"", Italic, StripOnInput -> False],"\"512\""}, "RowWithSeparators"], Offset[{3.367778697655222*^-16, 5.5}, \ {-3.4, 2.0818995585505003*^-16}], {0., -0.17}, Automatic, { 1., -6.123233995736767*^-17}], InsetBox[ TemplateBox[{"\[Cross]","\"\[Cross]\"","\"512\""}, "RowWithSeparators"], Offset[{3.3677786976552205*^-16, 5.5}, \ {-2.4000000000000004, 1.4695761589768238*^-16}], {0., -0.17}, Automatic, { 1., -6.123233995736765*^-17}], InsetBox[ TemplateBox[{"\[Cross]","\"\[Cross]\"","\"97\""}, "RowWithSeparators"], Offset[{3.3677786976552215*^-16, 5.5}, \ {-1.4, 8.572527594031473*^-17}], {0., -0.17}, Automatic, { 1., -6.123233995736766*^-17}], InsetBox[ TemplateBox[{"\[Cross]","\"\[Cross]\"","\"97\""}, "RowWithSeparators"], Offset[{3.3677786976552215*^-16, 5.5}, \ {-0.4, 2.4492935982947065*^-17}], {0., -0.17}, Automatic, { 1., -6.123233995736766*^-17}]}, StripOnInput->False, FontSize->8, FontWeight->"Thin", FontColor->GrayLevel[0.7]]}}, AspectRatio->Full, BaseStyle->{TooltipBoxOptions -> {TooltipDelay -> 0.08}}, ImageMargins->{{0, 0}, {0, 0}}, ImagePadding->{{24., 26.5}, {26.999999999999996`, 14.}}, ImageSize->{545.5, 41.00000000000003}, PlotRangePadding->0]], "Output", CellChangeTimes->{ 3.73426853159831*^9, 3.734268618049089*^9, 3.7346924897005367`*^9, 3.7346932849248962`*^9, 3.751611309625538*^9, 3.75370725665177*^9, 3.7571591342916307`*^9, {3.761503239734879*^9, 3.761503260358869*^9}}, CellLabel->"Out[91]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Export to MXNet", "Subsection", CellChangeTimes->{{3.71249779222954*^9, 3.712497796036222*^9}}], Cell[TextData[{ Cell[BoxData[ ButtonBox["Export", BaseStyle->"Link", ButtonData->"ref/Export"]], "InlineFormula"], " the net into a format that can be opened in MXNet:" }], "Text", CellChangeTimes->{{3.7124979354007673`*^9, 3.712498017180984*^9}, { 3.7125008536150703`*^9, 3.712500913877118*^9}, 3.724504249810828*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"jsonPath", "=", RowBox[{"Export", "[", RowBox[{ RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{"$TemporaryDirectory", ",", "\"\\""}], "}"}], "]"}], ",", RowBox[{ "NetModel", "[", "\"\\"", "]"}], ",", "\"\\""}], "]"}]}]], "Input", CellChangeTimes->{{3.712497804547408*^9, 3.7124978062523518`*^9}, 3.7124978813352957`*^9, 3.7124979274512243`*^9, {3.712500736003728*^9, 3.712500741227447*^9}, {3.712517817323049*^9, 3.712517822641644*^9}, 3.712518392132308*^9, 3.71251885325218*^9, 3.7125193212755136`*^9, 3.71441558270444*^9, 3.715100886771647*^9, 3.731071915155683*^9, 3.731148915804571*^9, {3.7331448255062933`*^9, 3.733144825652969*^9}, 3.733743090630828*^9}, CellLabel->"In[92]:="], Cell[BoxData["\<\"/private/var/folders/pz/94mxs33x2l512z6wtjbthvy0000_ck/T/\ net.json\"\>"], "Output", CellChangeTimes->{ 3.734268619653082*^9, 3.734692500180911*^9, 3.734693285018693*^9, 3.7516113108547077`*^9, 3.7537072567582617`*^9, 3.7571591343485126`*^9, { 3.761503239837949*^9, 3.761503260454297*^9}}, CellLabel->"Out[92]="] }, Open ]], Cell[TextData[{ Cell[BoxData[ ButtonBox["Export", BaseStyle->"Link", ButtonData->"ref/Export"]], "InlineFormula"], " also creates a ", StyleBox["net.params ", FontSlant->"Italic"], "file containing parameters:" }], "Text", CellChangeTimes->{{3.712498352865843*^9, 3.7124983680333*^9}, { 3.712498400088369*^9, 3.7124984462306232`*^9}, 3.712500220300655*^9, { 3.712500929302848*^9, 3.7125009383725147`*^9}, 3.724504252928473*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"paramPath", "=", RowBox[{"FileNameJoin", "[", RowBox[{"{", RowBox[{ RowBox[{"DirectoryName", "[", "jsonPath", "]"}], ",", "\"\\""}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.712500660462982*^9, 3.712500681981132*^9}, 3.712500728518118*^9, {3.712512883443756*^9, 3.712512885727779*^9}}, CellLabel->"In[93]:="], Cell[BoxData["\<\"/private/var/folders/pz/94mxs33x2l512z6wtjbthvy0000_ck/T/\ net.params\"\>"], "Output", CellChangeTimes->{ 3.734268621374199*^9, 3.734692500262868*^9, 3.734693285043668*^9, 3.751611312354327*^9, 3.753707256768401*^9, 3.757159134373609*^9, { 3.761503239848844*^9, 3.761503260479059*^9}}, CellLabel->"Out[93]="] }, Open ]], Cell["Get the size of the parameter file:", "Text", CellChangeTimes->{{3.71250070272404*^9, 3.712500721171669*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FileByteCount", "[", "paramPath", "]"}]], "Input", CellChangeTimes->{{3.7125006947136593`*^9, 3.712500729588118*^9}}, CellLabel->"In[94]:="], Cell[BoxData["16598562"], "Output", CellChangeTimes->{ 3.734268622692369*^9, 3.734692500302944*^9, 3.7346932850669394`*^9, 3.751611313873081*^9, 3.753707256794035*^9, 3.757159134395667*^9, { 3.761503239875534*^9, 3.761503260487995*^9}}, CellLabel->"Out[94]="] }, Open ]], Cell["\<\ The size is similar to the byte count of the resource object:\ \>", "Text", CellChangeTimes->{{3.7125008051623487`*^9, 3.7125008208722563`*^9}, { 3.715446470274835*^9, 3.7154464731613283`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ "ResourceObject", "[", "\"\\"", "]"}], "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{{3.712500783338814*^9, 3.71250079815307*^9}, { 3.712517847817915*^9, 3.712517871916678*^9}, 3.712518396147983*^9, 3.7125188634979963`*^9, 3.7125193246437063`*^9, 3.714415586440475*^9, 3.715100891195592*^9, {3.731071926431922*^9, 3.731071929725191*^9}, 3.731156063023637*^9, 3.7331448354178333`*^9, {3.733743096610997*^9, 3.733743097326322*^9}, 3.733746961768806*^9, {3.734692505860071*^9, 3.734692506945673*^9}}, CellLabel->"In[95]:="], Cell[BoxData["16634696"], "Output", CellChangeTimes->{ 3.7342686243612957`*^9, {3.734692500344118*^9, 3.7346925088162823`*^9}, 3.734693285089301*^9, 3.751611315077323*^9, 3.753707256821033*^9, 3.757159134416915*^9, {3.761503239903912*^9, 3.761503260513505*^9}}, CellLabel->"Out[95]="] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, OutputSizeLimit->50000, FrontEndVersion->"11.3 for Linux x86 (64-bit) (March 6, 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 577, 18, 70, "ResourceExampleTitle",ExpressionUUID->"d89ab160-37d7-4913-a194-d299231e0bc4", CellGroupingRules->{"TitleGrouping", 0}, PageBreakBelow->False], Cell[1160, 42, 556, 16, 70, "ResourceExampleSubtitle",ExpressionUUID->"15c11627-40cd-497e-96cc-b2f82ce620e0", CellGroupingRules->{"TitleGrouping", 10}, PageBreakBelow->False, CounterIncrements->"Subtitle"], Cell[CellGroupData[{ Cell[1741, 62, 205, 3, 70, "Subsection",ExpressionUUID->"09cee3d3-f03f-4520-9ede-f75bef8838b5"], Cell[1949, 67, 213, 3, 70, "Text",ExpressionUUID->"0ead88fc-e151-47ee-970a-ed026029ae11"], Cell[CellGroupData[{ Cell[2187, 74, 432, 8, 70, "Input",ExpressionUUID->"76b17435-c6c4-4e98-99ad-8b651969794c"], Cell[2622, 84, 23528, 462, 70, "Output",ExpressionUUID->"4a59fb8c-21cd-40c6-a0a9-32c0e8dd7fe9"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[26199, 552, 198, 3, 70, "Subsection",ExpressionUUID->"d9765b30-b3bb-46d3-b1cf-6eec69303851"], Cell[26400, 557, 131, 1, 70, "Text",ExpressionUUID->"a913e2a3-82e8-400c-ad71-77dfb3ebd75a"], Cell[CellGroupData[{ Cell[26556, 562, 264, 7, 70, "Input",ExpressionUUID->"61dfcbe9-2441-480b-a080-3a5d1d3865ea"], Cell[26823, 571, 391, 7, 70, "Output",ExpressionUUID->"7f76fc9f-a25a-4d0b-bec7-db457dc39a99"] }, Open ]], Cell[27229, 581, 211, 3, 70, "Text",ExpressionUUID->"737c9667-a1c5-495a-b3b8-53fbe72c3c55"], Cell[CellGroupData[{ Cell[27465, 588, 466, 12, 70, "Input",ExpressionUUID->"20a7022f-65e2-4df1-820a-39e356b6e842"], Cell[27934, 602, 1452, 25, 70, "Output",ExpressionUUID->"62954d25-5b75-4500-bcbb-748a797e10ef"] }, Open ]], Cell[29401, 630, 261, 3, 70, "Text",ExpressionUUID->"d4517d21-494c-43ba-ad07-45bb8ea1342c"], Cell[CellGroupData[{ Cell[29687, 637, 662, 17, 70, "Input",ExpressionUUID->"4892d1b9-7640-4ac7-bedd-5515359625df"], Cell[30352, 656, 34577, 770, 70, "Output",ExpressionUUID->"a374597d-00e9-41bd-84f5-5df0a1e1db99"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[64978, 1432, 245, 3, 70, "Subsection",ExpressionUUID->"a93611a0-9e46-4003-9dc8-c61ec5b0ef8c"], Cell[65226, 1437, 627, 13, 70, "Text",ExpressionUUID->"bef381e3-cf32-4526-b1e5-9bf57d52908f"], Cell[65856, 1452, 2231, 58, 70, "Input",ExpressionUUID->"a8689fd9-cb72-4120-ab3c-4775d3bf1c21"], Cell[68090, 1512, 315, 4, 70, "Text",ExpressionUUID->"e9239039-20b3-4be1-95be-d4c9bbd58214"], Cell[CellGroupData[{ Cell[68430, 1520, 591, 10, 70, "Input",ExpressionUUID->"4e057514-1bf9-4d65-a44f-a8252e0ec7f9"], Cell[69024, 1532, 700, 10, 70, "Output",ExpressionUUID->"3ef447cf-f5b5-4855-8a53-1f04deb48f08"] }, Open ]], Cell[69739, 1545, 780, 13, 70, "Text",ExpressionUUID->"f2efa596-86c2-4909-8aa0-997e72ffe79b"], Cell[CellGroupData[{ Cell[70544, 1562, 347, 6, 70, "Input",ExpressionUUID->"18c25c89-d58b-46c7-b2ed-7bf05db53554"], Cell[70894, 1570, 428, 6, 70, "Output",ExpressionUUID->"cdd13f0b-f04a-4246-a60d-8137cbb0cbe7"] }, Open ]], Cell[71337, 1579, 412, 7, 70, "Text",ExpressionUUID->"fe9b34e3-fe91-40f2-8bf0-b89640cfaffa"], Cell[CellGroupData[{ Cell[71774, 1590, 301, 6, 70, "Input",ExpressionUUID->"962b963e-a9ba-4e6e-b787-a8a5fd15d8e1"], Cell[72078, 1598, 408, 6, 70, "Output",ExpressionUUID->"1f7a1405-36bb-46d3-8c68-c899f26f728a"] }, Open ]], Cell[72501, 1607, 205, 4, 70, "Text",ExpressionUUID->"cbad0bf2-f620-4c61-9cfe-7872fc89829d"], Cell[CellGroupData[{ Cell[72731, 1615, 207, 4, 70, "Input",ExpressionUUID->"3da00b03-e9a0-4ef1-a3ec-30f4b5368f41"], Cell[72941, 1621, 404, 7, 70, "Output",ExpressionUUID->"833c02b0-20fc-450e-8af0-53b0a170aa49"] }, Open ]], Cell[73360, 1631, 396, 7, 70, "Text",ExpressionUUID->"87606766-f72a-4a6b-a752-565b5afcd0e2"], Cell[CellGroupData[{ Cell[73781, 1642, 211, 4, 70, "Input",ExpressionUUID->"33a83de3-b9ae-4150-8639-46086d67d954"], Cell[73995, 1648, 426, 7, 70, "Output",ExpressionUUID->"e889e7e6-3909-4269-883f-60dab4143c42"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[74470, 1661, 113, 1, 70, "Subsection",ExpressionUUID->"3c20fe52-d2a1-493f-bf49-0b0ba990dd2b"], Cell[74586, 1664, 604, 10, 70, "Text",ExpressionUUID->"822109f4-dc9c-4872-8df1-7f799adf828b"], Cell[75193, 1676, 3127, 80, 70, "Input",ExpressionUUID->"c48dad39-c218-49ab-b8ae-65c70ec59342"], Cell[CellGroupData[{ Cell[78345, 1760, 227, 5, 70, "Input",ExpressionUUID->"66e8c364-5373-41e9-aff8-bb8c46592a19"], Cell[78575, 1767, 44727, 1437, 70, "Output",ExpressionUUID->"ac58f2c7-7e5a-4629-9655-d149c428a3dc"] }, Open ]], Cell[CellGroupData[{ Cell[123339, 3209, 269, 7, 70, "Input",ExpressionUUID->"db34dac5-73db-400d-96ab-b2a55cedb64e"], Cell[123611, 3218, 58082, 1860, 70, "Output",ExpressionUUID->"6de9525e-19f7-4493-9643-0521e4d8e7bc"] }, Open ]], Cell[CellGroupData[{ Cell[181730, 5083, 478, 10, 70, "Input",ExpressionUUID->"8619439b-8e41-445c-88dd-22c22307e01d"], Cell[182211, 5095, 55572, 1777, 70, "Output",ExpressionUUID->"0ab702af-c75e-4d38-9041-b232537e5877"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[237832, 6878, 105, 1, 70, "Subsection",ExpressionUUID->"6c3a94b5-4a7d-4d5c-82a4-12183a826ca0"], Cell[237940, 6881, 274, 5, 70, "Text",ExpressionUUID->"6dcf5d0e-ff90-4fc8-9417-4976b10f394a"], Cell[238217, 6888, 1013, 25, 70, "Input",ExpressionUUID->"24fd0d38-18ef-411b-a95b-13718230a82e"], Cell[239233, 6915, 110, 1, 70, "Text",ExpressionUUID->"e307552b-b7aa-4242-8639-4bee0d3e920e"], Cell[CellGroupData[{ Cell[239368, 6920, 629, 12, 70, "Input",ExpressionUUID->"b9c0a2d2-da03-4e37-b974-7dd91eb33003"], Cell[240000, 6934, 605, 11, 70, "Output",ExpressionUUID->"60c73542-3850-4472-8332-b125b0074aac"] }, Open ]], Cell[240620, 6948, 249, 4, 70, "Text",ExpressionUUID->"eb520f18-ca52-436c-afd2-ac3fb4127c10"], Cell[CellGroupData[{ Cell[240894, 6956, 634, 13, 70, "Input",ExpressionUUID->"c454cfca-44bd-4dcc-8633-b5933ba983b8"], Cell[241531, 6971, 704, 12, 70, "Output",ExpressionUUID->"5f1bc02d-016e-41f4-bb6f-8b8226fb66d0"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[242284, 6989, 103, 1, 70, "Subsection",ExpressionUUID->"f164528a-c742-41dc-9aeb-3f2ad24c9bf9"], Cell[242390, 6992, 202, 2, 70, "Text",ExpressionUUID->"816055c9-be7e-4437-a891-b6ec1f9ef10b"], Cell[CellGroupData[{ Cell[242617, 6998, 602, 12, 70, "Input",ExpressionUUID->"36775efe-a205-4569-a452-7733bc40ab47"], Cell[243222, 7012, 4075, 125, 70, "Output",ExpressionUUID->"afbcc3a5-e39a-4332-938f-782c022aab28"] }, Open ]], Cell[247312, 7140, 120, 1, 70, "Text",ExpressionUUID->"cca8f790-40bd-45ca-bab8-0e43215cf67e"], Cell[CellGroupData[{ Cell[247457, 7145, 539, 11, 70, "Input",ExpressionUUID->"f0c7c67e-5b3d-478a-a96a-5198ecd37ae7"], Cell[247999, 7158, 293, 5, 70, "Output",ExpressionUUID->"c568750a-80e0-451f-b295-cd6da58e2a44"] }, Open ]], Cell[248307, 7166, 137, 2, 70, "Text",ExpressionUUID->"86622fba-7008-4a7b-a22d-f618c142b693"], Cell[CellGroupData[{ Cell[248469, 7172, 631, 13, 70, "Input",ExpressionUUID->"a48b15d9-4f22-4bb6-a295-88c1fe85b9d5"], Cell[249103, 7187, 667, 14, 70, "Output",ExpressionUUID->"b5ef9445-f760-42fe-92e6-73e9b28e8763"] }, Open ]], Cell[249785, 7204, 110, 1, 70, "Text",ExpressionUUID->"fcb12beb-516f-42b2-9a75-012d770e5e69"], Cell[CellGroupData[{ Cell[249920, 7209, 758, 14, 70, "Input",ExpressionUUID->"35024690-faed-4542-8d37-3014aa4eb95c"], Cell[250681, 7225, 11214, 219, 70, "Output",ExpressionUUID->"e8800533-ff78-4b3b-87ea-367851ececaa"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[261944, 7450, 102, 1, 70, "Subsection",ExpressionUUID->"fc1af6e7-0a66-4df8-9ee0-d43f68068edb"], Cell[262049, 7453, 332, 8, 70, "Text",ExpressionUUID->"514b5038-bc3f-405b-8de2-f865f5761252"], Cell[CellGroupData[{ Cell[262406, 7465, 856, 19, 70, "Input",ExpressionUUID->"77dfc969-57d3-492c-9c47-42cd276c8472"], Cell[263265, 7486, 341, 6, 70, "Output",ExpressionUUID->"8595a13a-5c0f-4e82-8442-3d7c0f795bac"] }, Open ]], Cell[263621, 7495, 448, 12, 70, "Text",ExpressionUUID->"2b2ffb9e-d43f-42c8-a2f4-84f68ed8aac9"], Cell[CellGroupData[{ Cell[264094, 7511, 380, 9, 70, "Input",ExpressionUUID->"84b74b7d-1941-46fd-8bd4-052a89ec8cce"], Cell[264477, 7522, 337, 6, 70, "Output",ExpressionUUID->"1827c61c-2138-4957-b8a6-4453d50f9f27"] }, Open ]], Cell[264829, 7531, 116, 1, 70, "Text",ExpressionUUID->"98ccd1d6-ed83-413e-8297-0ca04e42dbf0"], Cell[CellGroupData[{ Cell[264970, 7536, 166, 3, 70, "Input",ExpressionUUID->"e8927f6b-2ba1-44f3-a1e3-35213adb3a18"], Cell[265139, 7541, 270, 5, 70, "Output",ExpressionUUID->"dd1a665a-a224-4a98-a72b-583c3ebf4917"] }, Open ]], Cell[265424, 7549, 206, 4, 70, "Text",ExpressionUUID->"887a2187-abe8-4499-98a5-29c253c8e64a"], Cell[CellGroupData[{ Cell[265655, 7557, 656, 13, 70, "Input",ExpressionUUID->"9f301820-e80f-4160-885d-5d68c9bcd116"], Cell[266314, 7572, 296, 5, 70, "Output",ExpressionUUID->"56622986-f049-4b6d-9b76-7c5ed0244a78"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)