RosettaCodeData/Task/Run-length-encoding/Mathematica/run-length-encoding-2.math

2 lines
79 B
Plaintext

RunLengthDecode[input_List]:= ConstantArray @@@ input // Flatten // StringJoin