A260395 Positions of 0 in the infinite palindromic word at A260394.

1, 4, 7, 9, 12, 15, 17, 20, 23, 25, 28, 31, 32, 33, 36, 39, 41, 44, 47, 49, 52, 55, 57, 60, 63, 65, 68, 71, 73, 76, 79, 81, 84, 87, 89, 92, 95, 96, 97, 100, 103, 105, 108, 111, 113, 116, 119, 121, 124, 127, 129, 132, 135, 137, 140, 143, 145, 148, 151, 153

Offset

1,2

Comments

Complement of A260396, the positions of 1. See A260390 for a guide to related sequences.

Links

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

Mathematica

u[1] = {0, 1, 1}; m[1] = {u[1][[1]]};
u[n_] := u[n] = Join[u[n - 1], m[n - 1], Reverse[u[n - 1]]];
m[k_] := {u[k][[k]]}; v = u[6]  (* A260394 *)
Table[Length[u[n]], {n, 1, 20}] (* A000225 *)
Flatten[Position[u[8], 0]] (* A260395 *)
Flatten[Position[u[8], 1]] (* A260396 *)

Crossrefs

Cf. A260390, A260394, A260396.

Sequence in context: A310951 A310952 A007066 * A047537 A247985 A190438

Adjacent sequences: A260392 A260393 A260394 * A260396 A260397 A260398

Keyword

nonn,easy

Author

Clark Kimberling, Aug 13 2015

Status

approved