login
A074263
Positions of '22' in Kolakoski sequence A000002.
6
2, 8, 11, 18, 26, 35, 38, 44, 53, 56, 62, 65, 74, 80, 83, 89, 92, 99, 107, 110, 119, 126, 135, 138, 144, 150, 153, 162, 165, 171, 180, 188, 197, 203, 206, 212, 215, 224, 231, 234, 242, 249, 258, 261, 269, 278, 281, 287, 296, 299, 305, 308, 314, 317, 324, 332
OFFSET
1,1
LINKS
EXAMPLE
Kolakoski sequence begins 1,2,2,1,1,2,1,2,2,1,2,2,1,1,... so the sequence includes 2, 8, and 11.
MATHEMATICA
a2 = {1, 2, 2}; Do[ a2 = Join[a2, {1 + Mod[n - 1, 2]}], {n, 3, 300}, {i, 1, a2[[n]]}]; Split[a2] /. {2, 2} -> {0, 2} // Flatten // Position[#, 0] & // Flatten (* Jean-François Alcover, Jun 18 2013 *)
CROSSREFS
Cf. A074262.
Sequence in context: A220269 A143189 A056550 * A295070 A009420 A189328
KEYWORD
nonn,easy
AUTHOR
Jon Perry, Sep 20 2002
EXTENSIONS
Extended and offset changed by Nathaniel Johnston, May 02 2011
STATUS
approved