(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 28730, 695] NotebookOptionsPosition[ 27473, 660] NotebookOutlinePosition[ 27992, 682] CellTagsIndexPosition[ 27949, 679] WindowTitle->Examples for The Last of the Mohicans WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection"], Cell["Retrieve the text and show the fiftieth paragraph:", "Text", CellChangeTimes->{{3.696186645510051*^9, 3.6961866545240507`*^9}, { 3.696187841532233*^9, 3.696187852829363*^9}, {3.886172716453701*^9, 3.8861727409116907`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"TextCases", "[", RowBox[{ RowBox[{"ResourceData", "[", "\"\\"", "]"}], ",", " ", "\"\\""}], "]"}], "[", RowBox[{"[", "50", "]"}], "]"}]], "Input", CellChangeTimes->{{3.6804518239459944`*^9, 3.680451854651065*^9}, { 3.728044330615068*^9, 3.728044371269763*^9}, 3.886172710772666*^9}, CellLabel->"In[1]:="], Cell[BoxData["\<\"The conjecture of Major Heyward was true. When they reached \ the spot\\nwhere the Indian stood, pointing into the thicket that fringed the\ \\nmilitary road; a narrow and blind path, which might, with some \ little\\ninconvenience, receive one person at a time, became visible.\"\>"], \ "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.728044314742043*^9, { 3.728044347295308*^9, 3.7280443731008673`*^9}, 3.8861727443673487`*^9}, CellLabel->"Out[1]="] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Visualization", "Subsection"], Cell["Generate a word cloud:", "Text", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.728044377817402*^9, 3.728044380134906*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"WordCloud", "[", RowBox[{"DeleteStopwords", "[", RowBox[{"ResourceData", "[", "\"\\"", "]"}], "]"}], "]"}]], "Input", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, {3.728044381478791*^9, 3.728044392866295*^9}, 3.886172746686316*^9}, CellLabel->"In[2]:="], Cell[BoxData[ GraphicsBox[{InsetBox[ StyleBox["\<\"Heyward\"\>", StripOnInput->False, FontSize->Scaled[0.1705362277170788], FontColor->RGBColor[0.560181, 0.691569, 0.194885]], {0, 0}, Center, Automatic], InsetBox[ StyleBox["\<\"scout\"\>", StripOnInput->False, FontSize->Scaled[0.18617021276595744`], FontColor->RGBColor[0.368417, 0.506779, 0.709798]], {-0.5, 38.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Duncan\"\>", StripOnInput->False, FontSize->Scaled[0.15005031627372054`], FontColor->RGBColor[0.528488, 0.470624, 0.701351]], {-0.5, -49.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Hawkeye\"\>", StripOnInput->False, FontSize->Scaled[0.09829643473260494], FontColor->RGBColor[0.571589, 0.586483, 0.]], {-9.5, 72.5}, Center, Automatic], InsetBox[ StyleBox["\<\"said\"\>", StripOnInput->False, FontSize->Scaled[0.17323174238067854`], FontColor->RGBColor[0.880722, 0.611041, 0.142051]], {2.5, -96.5}, Center, Automatic], InsetBox[ StyleBox["\<\"man\"\>", StripOnInput->False, FontSize->Scaled[0.15328493387004025`], FontColor->RGBColor[0.922526, 0.385626, 0.209179]], {-0.5, 109.5}, Center, Automatic], InsetBox[ StyleBox["\<\"young\"\>", StripOnInput->False, FontSize->Scaled[0.097757331799885], FontColor->RGBColor[0.40082222609352647`, 0.5220066643438841, 0.85]], {-101.5, -79.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Uncas\"\>", StripOnInput->False, FontSize->Scaled[0.11932144910868314`], FontColor->RGBColor[0.363898, 0.618501, 0.782349]], {-24.5, -131.5}, Center, Automatic], InsetBox[ StyleBox["\<\"eyes\"\>", StripOnInput->False, FontSize->Scaled[0.11446952271420356`], FontColor->RGBColor[0.647624, 0.37816, 0.614037]], {96.5, -80.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Magua\"\>", StripOnInput->False, FontSize->Scaled[0.08967078780908569], FontColor->RGBColor[0.736782672705901, 0.358, 0.5030266573755369]], {109.5, 73.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Like\"\>", StripOnInput->False, FontSize->Scaled[0.13441633122484187`], FontColor->RGBColor[0.772079, 0.431554, 0.102387]], {91.5, 104.5}, Center, Automatic], InsetBox[ StyleBox["\<\"little\"\>", StripOnInput->False, FontSize->Scaled[0.11662593444508339`], FontColor->RGBColor[1, 0.75, 0]], {-0.5, 138.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Indian\"\>", StripOnInput->False, FontSize->Scaled[0.09829643473260494], FontColor->RGBColor[0.915, 0.3325, 0.2125]], {-100.5, 99.5}, Center, Automatic], InsetBox[ StyleBox["\<\"place\"\>", StripOnInput->False, FontSize->Scaled[0.08643617021276595], FontColor->RGBColor[0.28026441037696703`, 0.715, 0.4292089322474965]], {-116.5, 35.5}, Center, Automatic], InsetBox[ StyleBox["\<\"moment\"\>", StripOnInput->False, FontSize->Scaled[0.07619321449108683], FontColor->RGBColor[0.8996399512215667, 0.7463488834690629, 0.]], {84.5, -128.5}, Center, Automatic], InsetBox[ StyleBox["\<\"long\"\>", StripOnInput->False, FontSize->Scaled[0.08320155261644623], FontColor->RGBColor[ 0.838355547812947, 0.44746667828057946`, 0.0208888695323676]], {108.5, 37.5}, Center, Automatic], InsetBox[ StyleBox["\<\"returned\"\>", StripOnInput->False, FontSize->Scaled[0.06864577343300747], FontColor->RGBColor[ 0.6753413537738198, 0.3589675436319385, 0.5991466155654507]], {-88.5, 130.5}, Center, Automatic], InsetBox[ StyleBox["\<\"men\"\>", StripOnInput->False, FontSize->Scaled[0.09182719953996549], FontColor->RGBColor[ 0.9728288904374106, 0.621644452187053, 0.07336199581899142]], {-119.5, -32.5}, Center, Automatic], InsetBox[ StyleBox["\<\"time\"\>", StripOnInput->False, FontSize->Scaled[0.07942783208740654], FontColor->RGBColor[ 0.5833680111493557, 0.4126186601628758, 0.8290799721266107]], {115.5, -38.5}, Center, Automatic], InsetBox[ StyleBox["\<\"hand\"\>", StripOnInput->False, FontSize->Scaled[0.07457590569292696], FontColor->RGBColor[ 0.28240003484173815`, 0.6090799721266095, 0.7538800418100857]], {-108.5, 60.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Huron\"\>", StripOnInput->False, FontSize->Scaled[0.06541115583668775], FontColor->RGBColor[ 0.8857244243136628, 0.3764133635295058, 0.1393110607841571]], {-120.5, -56.5}, Center, Automatic], InsetBox[ StyleBox["\<\"appeared\"\>", StripOnInput->False, FontSize->Scaled[0.04169062679700977], FontColor->RGBColor[ 0.9492067688690977, 0.5394711792460651, 0.10728609198218791`]], {120.5, -56.5}, Center, Automatic], InsetBox[ StyleBox["\<\"manner\"\>", StripOnInput->False, FontSize->Scaled[0.055707303047728585`], FontColor->RGBColor[0.7748409210981391, 0.358, 0.4444755060028629]], {76.5, 133.5}, Center, Automatic], InsetBox[ StyleBox["\<\"head\"\>", StripOnInput->False, FontSize->Scaled[0.06972397929844738], FontColor->RGBColor[ 0.9324333565611593, 0.5282889043741062, 0.0921900209050434]], {-107.5, -107.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Cora\"\>", StripOnInput->False, FontSize->Scaled[0.07457590569292696], FontColor->RGBColor[ 0.8439466852489265, 0.3467106629502147, 0.3309221912517893]], {-107.5, -130.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Hurons\"\>", StripOnInput->False, FontSize->Scaled[0.05516820011500862], FontColor->RGBColor[ 0.16397784358994957`, 0.7038177251280403, 0.6117734123079395]], {65.5, -149.5}, Center, Automatic], InsetBox[ StyleBox["\<\"savage\"\>", StripOnInput->False, FontSize->Scaled[0.04654255319148936], FontColor->RGBColor[ 0.9784200278733908, 0.649600139366954, 0.058265924741844846`]], {-0.5, -155.5}, Center, Automatic], InsetBox[ StyleBox["\<\"great\"\>", StripOnInput->False, FontSize->Scaled[0.05247268545140885], FontColor->RGBColor[0.37977756485605163`, 0.715, 0.3025558265468435]], {139.5, 0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Delawares\"\>", StripOnInput->False, FontSize->Scaled[0.04384703852788959], FontColor->RGBColor[0.7513196300394465, 0.358, 0.48066210763162087`]], {54.5, 154.5}, Center, Automatic], InsetBox[ StyleBox["\<\"continued\"\>", StripOnInput->False, FontSize->Scaled[0.04222972972972973], FontColor->RGBColor[0.8493197142977551, 0.7407577460330839, 0.]], {122.5, -108.5}, Center, Automatic], InsetBox[ StyleBox["\<\"woods\"\>", StripOnInput->False, FontSize->Scaled[0.05301178838412881], FontColor->RGBColor[0.7132613816472081, 0.358, 0.5392132590042952]], {-77.5, 145.5}, Center, Automatic], InsetBox[ StyleBox["\<\"words\"\>", StripOnInput->False, FontSize->Scaled[0.054089994249568715`], FontColor->RGBColor[ 0.35558897405758294`, 0.5505288207539337, 0.8417067688690995]], {-96.5, -155.5}, Center, Automatic], InsetBox[ StyleBox["\<\"found\"\>", StripOnInput->False, FontSize->Scaled[0.05462909718228867], FontColor->RGBColor[ 0.6184987019729621, 0.39212575718243875`, 0.7412532450675947]], {137.5, 123.5}, Center, Automatic], InsetBox[ StyleBox["\<\"enemy\"\>", StripOnInput->False, FontSize->Scaled[0.042768832662449685`], FontColor->RGBColor[ 0.8342400905885153, 0.4628267270590103, 0.0038160815296638794`]], {-140.5, 0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"companions\"\>", StripOnInput->False, FontSize->Scaled[0.029830362277170785`], FontColor->RGBColor[0.7989994773739094, 0.735166608597101, 0.]], {13.5, -29.5}, Center, Automatic], InsetBox[ StyleBox["\<\"voice\"\>", StripOnInput->False, FontSize->Scaled[0.05516820011500862], FontColor->RGBColor[ 0.8613800418100862, 0.48092002787339083`, 0.02824203762907758]], {117.5, 149.5}, Center, Automatic], InsetBox[ StyleBox["\<\"David\"\>", StripOnInput->False, FontSize->Scaled[0.054089994249568715`], FontColor->RGBColor[ 0.8878600487784333, 0.33792799024431336`, 0.2577332520359445]], {123.5, -150.5}, Center, Automatic], InsetBox[ StyleBox["\<\"party\"\>", StripOnInput->False, FontSize->Scaled[0.04384703852788959], FontColor->RGBColor[0.2187618985811806, 0.715, 0.5074848563512248]], {135.5, -18.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Alice\"\>", StripOnInput->False, FontSize->Scaled[0.055707303047728585`], FontColor->RGBColor[ 0.9874666782805795, 0.6948333914028977, 0.033839968642435214`]], {-127.5, 149.5}, Center, Automatic], InsetBox[ StyleBox["\<\"seen\"\>", StripOnInput->False, FontSize->Scaled[0.0589419206440483], FontColor->RGBColor[0.47401116530937026`, 0.47809330081437784`, 0.85]], {-149.5, -13.5}, Center, Automatic], InsetBox[ StyleBox["\<\"warriors\"\>", StripOnInput->False, FontSize->Scaled[0.04169062679700977], FontColor->RGBColor[0.47929071933511125`, 0.715, 0.1759027208462221]], {-10.5, 163.5}, Center, Automatic], InsetBox[ StyleBox["\<\"know\"\>", StripOnInput->False, FontSize->Scaled[0.05247268545140885], FontColor->RGBColor[ 0.8564488486273256, 0.42032672705901153`, 0.06612212156831418]], {48.5, -165.5}, Center, Automatic], InsetBox[ StyleBox["\<\"countenance\"\>", StripOnInput->False, FontSize->Scaled[0.03144767107533065], FontColor->RGBColor[ 0.6670481226429111, 0.3638052617916352, 0.6198796933927223]], {-27.5, -169.5}, Center, Automatic], InsetBox[ StyleBox["\<\"passed\"\>", StripOnInput->False, FontSize->Scaled[0.0379169062679701], FontColor->RGBColor[ 0.19193353076984873`, 0.681453175384121, 0.6453202369238185]], {-60.5, 162.5}, Center, Automatic], InsetBox[ StyleBox["\<\"chief\"\>", StripOnInput->False, FontSize->Scaled[0.054089994249568715`], FontColor->RGBColor[0.7678998606330495, 0.7317110956258943, 0.]], {-102.5, 167.5}, Center, Automatic], InsetBox[ StyleBox["\<\"just\"\>", StripOnInput->False, FontSize->Scaled[0.04869896492236918], FontColor->RGBColor[0.9810598048862722, 0.7553955338762525, 0.]], {154.5, 17.5}, Center, Automatic], InsetBox[ StyleBox["\<\"father\"\>", StripOnInput->False, FontSize->Scaled[0.04708165612420931], FontColor->RGBColor[0.6361597700445392, 0.7170733077827265, 0.]], {63.5, 167.5}, Center, Automatic], InsetBox[ StyleBox["\<\"warrior\"\>", StripOnInput->False, FontSize->Scaled[0.04222972972972973], FontColor->RGBColor[ 0.8607200975568693, 0.34335598048862614`, 0.30296650407188447`]], {149.5, 51.5}, Center, Automatic], InsetBox[ StyleBox["\<\"heard\"\>", StripOnInput->False, FontSize->Scaled[0.04762075905692927], FontColor->RGBColor[ 0.6536293927965667, 0.37163285420200276`, 0.6534265180085832]], {101.5, -168.5}, Center, Automatic], InsetBox[ StyleBox["\<\"white\"\>", StripOnInput->False, FontSize->Scaled[0.04815986198964922], FontColor->RGBColor[ 0.9052934053395919, 0.510195603559728, 0.06776406480563275]], {110.5, 167.5}, Center, Automatic], InsetBox[ StyleBox["\<\"soon\"\>", StripOnInput->False, FontSize->Scaled[0.04869896492236918], FontColor->RGBColor[ 0.23716678280579248`, 0.645266573755366, 0.699600139366951]], {-104.5, 75.5}, Center, Automatic], InsetBox[ StyleBox["\<\"light\"\>", StripOnInput->False, FontSize->Scaled[0.042768832662449685`], FontColor->RGBColor[ 0.596786740995709, 0.404791067752503, 0.7955331475107271]], {154.5, 33.5}, Center, Automatic], InsetBox[ StyleBox["\<\"language\"\>", StripOnInput->False, FontSize->Scaled[0.029291259344450836`], FontColor->RGBColor[ 0.9603267270590103, 0.5591336352950514, 0.10711783694067224`]], {-104.5, -169.5}, Center, Automatic], InsetBox[ StyleBox["\<\"turned\"\>", StripOnInput->False, FontSize->Scaled[0.04115152386428982], FontColor->RGBColor[0.5019668524892619, 0.46131988850644284`, 0.85]], {-146.5, -151.5}, Center, Automatic], InsetBox[ StyleBox["\<\"people\"\>", StripOnInput->False, FontSize->Scaled[0.03306497987349051], FontColor->RGBColor[0.31827505306025683`, 0.715, 0.3808317506505822]], {-157.5, 51.5}, Center, Automatic], InsetBox[ StyleBox["\<\"eye\"\>", StripOnInput->False, FontSize->Scaled[0.04654255319148936], FontColor->RGBColor[0.428777913273419, 0.5052332520359486, 0.85]], {159.5, -35.5}, Center, Automatic], InsetBox[ StyleBox["\<\"water\"\>", StripOnInput->False, FontSize->Scaled[0.04222972972972973], FontColor->RGBColor[ 0.3103557220216354, 0.5867154223826917, 0.7874268664259625]], {155.5, 88.5}, Center, Automatic], InsetBox[ StyleBox["\<\"air\"\>", StripOnInput->False, FontSize->Scaled[0.06541115583668775], FontColor->RGBColor[0.5407932311309059, 0.715, 0.09762679674248334]], {-153.5, 68.5}, Center, Automatic], InsetBox[ StyleBox["\<\"exclaimed\"\>", StripOnInput->False, FontSize->Scaled[0.030369465209890742`], FontColor->RGBColor[0.7658565873730018, 0.358, 0.4582975578876895]], {-150.5, 165.5}, Center, Automatic], InsetBox[ StyleBox["\<\"enemies\"\>", StripOnInput->False, FontSize->Scaled[0.03414318573893042], FontColor->RGBColor[ 0.969373377466199, 0.6043668873309952, 0.08269188084126262]], {147.5, -164.5}, Center, Automatic], InsetBox[ StyleBox["\<\"look\"\>", StripOnInput->False, FontSize->Scaled[0.04708165612420931], FontColor->RGBColor[ 0.9038177251280404, 0.3492734123079395, 0.18454431282010084`]], {153.5, -73.5}, Center, Automatic], InsetBox[ StyleBox["\<\"rifle\"\>", StripOnInput->False, FontSize->Scaled[0.0519335825186889], FontColor->RGBColor[0.5472001045252132, 0.43417993728487203`, 0.85]], {-152.5, -112.5}, Center, Automatic], InsetBox[ StyleBox["\<\"instant\"\>", StripOnInput->False, FontSize->Scaled[0.036299597469810235`], FontColor->RGBColor[ 0.9046334610863751, 0.334573307782725, 0.22977756485604156`]], {154.5, 160.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Delaware\"\>", StripOnInput->False, FontSize->Scaled[0.029830362277170785`], FontColor->RGBColor[ 0.8774935098648088, 0.34000129802703827`, 0.2750108168919853]], {-150.5, -166.5}, Center, Automatic], InsetBox[ StyleBox["\<\"short\"\>", StripOnInput->False, FontSize->Scaled[0.0379169062679701], FontColor->RGBColor[ 0.8781534541180211, 0.4921023027453475, 0.04333810870621905]], {153.5, -89.5}, Center, Automatic], InsetBox[ StyleBox["\<\"come\"\>", StripOnInput->False, FontSize->Scaled[0.0379169062679701], FontColor->RGBColor[ 0.7896667828057927, 0.3575666434388414, 0.4213886953236787]], {61.5, -29.5}, Center, Automatic], InsetBox[ StyleBox["\<\"friend\"\>", StripOnInput->False, FontSize->Scaled[0.03737780333525014], FontColor->RGBColor[ 0.6319174318193065, 0.38429816477207124`, 0.7077064204517338]], {154.5, 102.5}, Center, Automatic], InsetBox[ StyleBox["\<\"left\"\>", StripOnInput->False, FontSize->Scaled[0.04869896492236918], FontColor->RGBColor[ 0.8168067340273636, 0.3521386531945273, 0.3761554432877274]], {-151.5, 121.5}, Center, Automatic], InsetBox[ StyleBox["\<\"shall\"\>", StripOnInput->False, FontSize->Scaled[0.04115152386428982], FontColor->RGBColor[ 0.8745421494417032, 0.39318677583744527`, 0.11135537360425793`]], {153.5, -124.5}, Center, Automatic], InsetBox[ StyleBox["\<\"followed\"\>", StripOnInput->False, FontSize->Scaled[0.02767395054629097], FontColor->RGBColor[0.529922539669161, 0.44454647619850335`, 0.85]], {-12.5, -77.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Indians\"\>", StripOnInput->False, FontSize->Scaled[0.03144767107533065], FontColor->RGBColor[ 0.8926354502560807, 0.366046824615879, 0.15658862564020168`]], {-155.5, -128.5}, Center, Automatic], InsetBox[ StyleBox["\<\"make\"\>", StripOnInput->False, FontSize->Scaled[0.036838700402530185`], FontColor->RGBColor[0.7175796237092107, 0.7261199581899123, 0.]], {158.5, 140.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Munro\"\>", StripOnInput->False, FontSize->Scaled[0.03306497987349051], FontColor->RGBColor[0.7277983389807635, 0.358, 0.5168487092603637]], {16.5, 175.5}, Center, Automatic], InsetBox[ StyleBox["\<\"sounds\"\>", StripOnInput->False, FontSize->Scaled[0.030908568142610695`], FontColor->RGBColor[0.4567336004533182, 0.4884598397280091, 0.85]], {-46.5, -156.5}, Center, Automatic], InsetBox[ StyleBox["\<\"let\"\>", StripOnInput->False, FontSize->Scaled[0.05301178838412881], FontColor->RGBColor[ 0.9637822400302223, 0.5764112001511111, 0.0977879519184]], {-164.5, 14.5}, Center, Automatic], InsetBox[ StyleBox["\<\"dark\"\>", StripOnInput->False, FontSize->Scaled[0.038995112133410004`], FontColor->RGBColor[ 0.9930578157165594, 0.7227890785827968, 0.01874389756528967]], {-166.5, -31.5}, Center, Automatic], InsetBox[ StyleBox["\<\"nature\"\>", StripOnInput->False, FontSize->Scaled[0.030369465209890742`], FontColor->RGBColor[0.15725938678540247`, 0.715, 0.5857607804549424]], {-26.5, 174.5}, Center, Automatic], InsetBox[ StyleBox["\<\"better\"\>", StripOnInput->False, FontSize->Scaled[0.03144767107533065], FontColor->RGBColor[ 0.26512246998569167`, 0.6229020240114467, 0.73314696398283]], {-169.5, -45.5}, Center, Automatic], InsetBox[ StyleBox["\<\"stood\"\>", StripOnInput->False, FontSize->Scaled[0.032525876940770554`], FontColor->RGBColor[ 0.8335801463353031, 0.3487839707329394, 0.3481997561078282]], {171.5, -14.5}, Center, Automatic], InsetBox[ StyleBox["\<\"children\"\>", StripOnInput->False, FontSize->Scaled[0.026595744680851064`], FontColor->RGBColor[0.6672593867853922, 0.7205288207539324, 0.]], {19.5, -180.5}, Center, Automatic], InsetBox[ StyleBox["\<\"open\"\>", StripOnInput->False, FontSize->Scaled[0.02875215641173088], FontColor->RGBColor[0.4177882075393331, 0.715, 0.25417864494993975`]], {68.5, -110.5}, Center, Automatic], InsetBox[ StyleBox["\<\"good\"\>", StripOnInput->False, FontSize->Scaled[0.02875215641173088], FontColor->RGBColor[0.7042770479220728, 0.358, 0.5530353108891188]], {-166.5, 31.5}, Center, Automatic], InsetBox[ StyleBox["\<\"friends\"\>", StripOnInput->False, FontSize->Scaled[0.02713484761357102], FontColor->RGBColor[ 0.2198892179497479, 0.6590886256402017, 0.6788670615396974]], {169.5, -53.5}, Center, Automatic], InsetBox[ StyleBox["\<\"low\"\>", StripOnInput->False, FontSize->Scaled[0.04169062679700977], FontColor->RGBColor[0.6897400905885174, 0.358, 0.5753998606330502]], {-166.5, -60.5}, Center, Automatic], InsetBox[ StyleBox["\<\"way\"\>", StripOnInput->False, FontSize->Scaled[0.03306497987349051], FontColor->RGBColor[ 0.845266573755366, 0.437100139366951, 0.03816643438841502]], {-128.5, 14.5}, Center, Automatic], InsetBox[ StyleBox["\<\"forest\"\>", StripOnInput->False, FontSize->Scaled[0.029830362277170785`], FontColor->RGBColor[ 0.3383114092015346, 0.5643508726387724, 0.8209736910418415]], {169.5, 65.5}, Center, Automatic], InsetBox[ StyleBox["\<\"blood\"\>", StripOnInput->False, FontSize->Scaled[0.03144767107533065], FontColor->RGBColor[ 0.922066817647527, 0.5213778784316846, 0.08286013588277422]], {-60.5, 172.5}, Center, Automatic], InsetBox[ StyleBox["\<\"say\"\>", StripOnInput->False, FontSize->Scaled[0.036299597469810235`], FontColor->RGBColor[0.38354466123747527`, 0.5323732032575149, 0.85]], {-162.5, -73.5}, Center, Automatic], InsetBox[ StyleBox["\<\"path\"\>", StripOnInput->False, FontSize->Scaled[0.02767395054629097], FontColor->RGBColor[ 0.8064401951137368, 0.3542119609772526, 0.39343300814377197`]], {175.5, 0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"deep\"\>", StripOnInput->False, FontSize->Scaled[0.026595744680851064`], FontColor->RGBColor[ 0.9107287510704583, 0.33890687339431275`, 0.20182187767614543`]], {-160.5, 86.5}, Center, Automatic], InsetBox[ StyleBox["\<\"name\"\>", StripOnInput->False, FontSize->Scaled[0.02767395054629097], FontColor->RGBColor[ 0.9986489531525362, 0.7507447657626809, 0.0036478264881522893`]], {-66.5, 112.5}, Center, Automatic], InsetBox[ StyleBox["\<\"knew\"\>", StripOnInput->False, FontSize->Scaled[0.028213053479010926`], FontColor->RGBColor[ 0.8633598745697435, 0.40996018814538476`, 0.08339968642435877]], {-161.5, -88.5}, Center, Automatic], InsetBox[ StyleBox["\<\"arms\"\>", StripOnInput->False, FontSize->Scaled[0.030369465209890742`], FontColor->RGBColor[ 0.9840111653093676, 0.677555826546838, 0.04316985366470745]], {51.5, -180.5}, Center, Automatic], InsetBox[ StyleBox["\<\"form\"\>", StripOnInput->False, FontSize->Scaled[0.03144767107533065], FontColor->RGBColor[0.5788038738141875, 0.715, 0.049249615145579635`]], {-160.5, 98.5}, Center, Automatic], InsetBox[ StyleBox["\<\"feet\"\>", StripOnInput->False, FontSize->Scaled[0.032525876940770554`], FontColor->RGBColor[0.9307395679624266, 0.7498043964402695, 0.]], {-69.5, -180.5}, Center, Automatic], InsetBox[ StyleBox["\<\"far\"\>", StripOnInput->False, FontSize->Scaled[0.032525876940770554`], FontColor->RGBColor[ 0.5750747800184488, 0.4174563783225715, 0.8498130499538777]], {-175.5, 0.5}, Center, Automatic], InsetBox[ StyleBox["\<\"'Tis\"\>", StripOnInput->False, FontSize->Scaled[0.030369465209890742`], FontColor->RGBColor[ 0.6102054708420535, 0.39696347534213544`, 0.7619863228948663]], {-177.5, 69.5}, Center, Automatic], InsetBox[ StyleBox["\<\"sun\"\>", StripOnInput->False, FontSize->Scaled[0.030369465209890742`], FontColor->RGBColor[ 0.8510135028964549, 0.47400900193096995`, 0.018912152606809424`]], {30.5, -77.5}, Center, Automatic], InsetBox[ StyleBox["\<\"arm\"\>", StripOnInput->False, FontSize->Scaled[0.026595744680851064`], FontColor->RGBColor[ 0.6453361616656581, 0.37647057236169945`, 0.6741595958358548]], {91.5, 17.5}, Center, Automatic], InsetBox[ StyleBox["\<\"Le\"\>", StripOnInput->False, FontSize->Scaled[0.02713484761357102], FontColor->RGBColor[ 0.8949268664259606, 0.5032845776173072, 0.05843417978336459]], {-25.5, 29.5}, Center, Automatic]}, DefaultBaseStyle->{"Graphics", FontFamily -> "Source Sans Pro"}, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultPlotStyle" -> Automatic}, PlotRange->{{-188., 188.}, {-188., 182.}}]], "Output", CellChangeTimes->{{3.696377005707614*^9, 3.69637702247129*^9}, { 3.696377225845625*^9, 3.696377236186659*^9}, 3.696377278504891*^9, { 3.696377319054945*^9, 3.6963773247475147`*^9}, 3.6963774601870575`*^9, { 3.696377490692107*^9, 3.696377510279066*^9}, 3.728044413550624*^9, 3.88617275622365*^9}, CellLabel->"Out[2]="] }, Open ]] }, Open ]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"Examples for The Last of the Mohicans", Visible->True, DockedCells->{}, TaggingRules->{"NotebookTemplateVersion" -> 1.}, CellContext->Notebook, ShowCellTags->True, FrontEndVersion->"13.2 for Mac OS X x86 (64-bit) (November 18, 2022)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[631, 23, 36, 0, 70, "Subsection",ExpressionUUID->"d00b241b-1c66-4791-8e00-d00d6a5a1d30"], Cell[670, 25, 234, 3, 70, "Text",ExpressionUUID->"c7efc051-44e8-4f20-a37c-a4cda2b66df3"], Cell[CellGroupData[{ Cell[929, 32, 399, 9, 70, "Input",ExpressionUUID->"fb16f0d5-c2d2-44c5-9e57-7f635542b1c4"], Cell[1331, 43, 699, 10, 70, "Output",ExpressionUUID->"ddc0146d-d953-4971-9439-07467f93b7c2"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[2079, 59, 35, 0, 70, "Subsection",ExpressionUUID->"29ccac31-9f75-41e0-9e2d-acb47c5b336b"], Cell[2117, 61, 351, 5, 70, "Text",ExpressionUUID->"685cd3ed-61a2-4529-92bd-2d805823cc3c"], Cell[CellGroupData[{ Cell[2493, 70, 537, 10, 70, "Input",ExpressionUUID->"ce403b1d-b115-4397-b6ce-fddd5f539cfd"], Cell[3033, 82, 24412, 574, 70, "Output",ExpressionUUID->"f0a373d3-784e-4b88-9367-f366e7f55d8d"] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)