RosettaCodeData/Task/Look-and-say-sequence/Q/look-and-say-sequence.q
2023-07-01 13:44:08 -04:00

2 lines
73 B
Text

las:{{raze string[count@'x],'@'[;0]x:where[differ x]_x}\[x;1#"1"]}
las 8