A284366 Positions of 1 in A284364; complement of A284365.

1, 3, 5, 7, 8, 10, 12, 14, 15, 17, 19, 21, 22, 24, 26, 28, 30, 32, 34, 35, 37, 39, 41, 42, 44, 46, 48, 49, 51, 53, 55, 57, 59, 61, 62, 64, 66, 68, 69, 71, 73, 75, 76, 78, 80, 82, 84, 86, 88, 89, 91, 93, 95, 96, 98, 100, 102, 103, 105, 107, 109, 110, 112, 114

Offset

1,2

Comments

Conjecture: -1 < n*s - a(n) < 2 for n >= 1, where s = (-1+sqrt(21))/2.

Links

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

Example

The first 6 letters of the word in A284364 are 101010, in which the positions of 1 are 1,3,5.

Mathematica

s = Nest[Flatten[# /. {0 -> {1}, 1 -> {1, 0, 1, 0, 1, 0}}] &, {0}, 10] (* A284364 *)
Flatten[Position[s, 0]]  (* A284365 *)
Flatten[Position[s, 1]]  (* A284366 *)

Crossrefs

Cf. A284364, A284365.

Sequence in context: A292648 A187330 A059546 * A037086 A327212 A329825

Adjacent sequences: A284363 A284364 A284365 * A284367 A284368 A284369

Keyword

nonn,easy

Author

Clark Kimberling, Mar 26 2017

Status

approved