Run-length encoding: Difference between revisions

Content added Content deleted
Line 3,511: Line 3,511:


<lang Mathematica>rle = RunLengthEncode[mystring]
<lang Mathematica>rle = RunLengthEncode[mystring]

{{"W", 12}, {"B", 1}, {"W", 12}, {"B", 3}, {"W", 24}, {"B", 1}, {"W", 14}}</lang>
{{"W", 12}, {"B", 1}, {"W", 12}, {"B", 3}, {"W", 24}, {"B", 1}, {"W", 14}}</lang>


Line 3,516: Line 3,517:


<lang Mathematica>mystring == RunLengthDecode[rle]
<lang Mathematica>mystring == RunLengthDecode[rle]

True</lang>
True</lang>