login
A054351
Successive generations of the Kolakoski sequence A000002.
11
1, 12, 1221, 1221121, 12211212212, 122112122122112112, 1221121221221121122121121221, 1221121221221121122121121221121121221221121, 12211212212211211221211212211211212212211212212112112212211212212
OFFSET
0,2
PROG
(Python)
from itertools import accumulate, groupby, repeat
def K(n, _):
c, s = "12", ""
for i, k in enumerate(str(n)): s += c[i%2]*int(k)
return int(s + c[(i+1)%2])
def aupton(nn): return list(accumulate(repeat(1, nn+1), K))
print(aupton(8)) # Michael S. Branicky, Jan 12 2021
CROSSREFS
Word lengths give A054352.
Sequence in context: A317955 A033564 A301474 * A080814 A340834 A078294
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, May 07 2000
EXTENSIONS
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 05 2003
STATUS
approved