A074263 Positions of '22' in Kolakoski sequence A000002.

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

Author

Jon Perry, Sep 20 2002

Keywords

• nonn
• easy

Examples

			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.
		

Links

• Nathaniel Johnston, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A074262.

Programs

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 *)

Extensions

Extended and offset changed by Nathaniel Johnston, May 02 2011