A260480 Positions of 0 in the infinite palindromic word at A260455.

2, 5, 7, 9, 12, 15, 18, 20, 22, 25, 27, 29, 32, 34, 36, 39, 42, 45, 47, 49, 52, 55, 58, 60, 62, 65, 68, 71, 73, 75, 78, 80, 82, 85, 87, 89, 92, 95, 98, 100, 102, 105, 107, 109, 112, 114, 116, 119, 122, 125, 127, 129, 132, 134, 136, 139, 141, 143, 146, 149

Offset

1,1

Comments

Complement of A260479. See A260390 for a guide to related sequences.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Mathematica

u[1] = {0}; m[1] = {1}; u[n_] := u[n] = Join[u[n - 1], m[n - 1], Reverse[u[n - 1]]];
m[k_] := If[OddQ[k], {1}, {}]
v = u[8]  (* A240455 *)
Flatten[Position[v, 0]]   (* A260479 *)
Flatten[Position[v, 1]]   (* A260480 *)

Crossrefs

Cf. A260390, A260479.

Sequence in context: A080652 A187344 A342741 * A151716 A175072 A115863

Adjacent sequences: A260477 A260478 A260479 * A260481 A260482 A260483

Keyword

nonn,easy

Author

Clark Kimberling, Aug 29 2015

Status

approved