Return to Answer

replaced http://codegolf.stackexchange.com/ with https://codegolf.stackexchange.com/

edited Apr 13, 2017 at 12:39

Mathematica, LegionMammal978, ≤64 Mathematica, LegionMammal978, ≤64

Print@Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

Print@Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

Print@Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

added 3 characters in body

edited Oct 12, 2015 at 11:07

edited Oct 12, 2015 at 11:07

Nest[CompressPrint@Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

Print@Nest[Compress,ExampleData[{"Text","ToBeOrNotToBe"}],13]

answered Oct 12, 2015 at 7:47

answered Oct 12, 2015 at 7:47

Nest[Compress, ExampleData[{"Text", "ToBeOrNotToBe"}], 13]