login
A074300
Position of first repeat of the opening sequence of length n occurring after the first repeat of the opening sequence of length n-1 in the Kolakoski sequence (A000002).
2
4, 5, 7, 10, 25, 37, 55, 82, 137, 164, 205, 307, 460, 542, 1057, 1319, 1583, 1736, 1976, 2370, 2921, 3717, 4380, 4503, 4965, 5572, 6308, 6752, 7446, 10389, 10659, 12782, 15585, 15991, 19884, 20154, 23374, 23985, 24638, 26638, 27802, 30495, 35981, 45747, 53975
OFFSET
1,1
LINKS
EXAMPLE
a(3)=7 because A000002 begins 1,2,2 and this first repeats at position 7.
MAPLE
lim:=1000: s:=[1, 2, 2]: for n from 3 to lim do for i from 1 to s[n] do s:=[op(s), 1+((n-1)mod 2)]: od: od: k:=1: for n from 1 to 1400 do inseq:=true: for m from 1 to k do if(not s[n+m]=s[m])then inseq:=false:break: fi: od: if(inseq)then printf("%d, ", n+1): k:=k+1:fi: od: # Nathaniel Johnston, May 02 2011
PROG
(C) See Links section.
CROSSREFS
Sequence in context: A022936 A057708 A032686 * A344157 A047375 A358805
KEYWORD
nonn
AUTHOR
Jon Perry, Sep 21 2002
EXTENSIONS
Extended and edited by John W. Layman, Sep 28 2002
STATUS
approved