RosettaCodeData/Task/Run-length-encoding/Mathematica/run-length-encoding-4.math
2023-07-01 13:44:08 -04:00

3 lines
108 B
Text

rle = RunLengthEncode[mystring]
{{"W", 12}, {"B", 1}, {"W", 12}, {"B", 3}, {"W", 24}, {"B", 1}, {"W", 14}}