A284371 Positions of 1 in A284369; complement of A284370.

1, 4, 5, 6, 7, 10, 11, 14, 15, 18, 19, 22, 23, 24, 25, 28, 29, 32, 33, 34, 35, 38, 39, 42, 43, 44, 45, 48, 49, 52, 53, 54, 55, 58, 59, 62, 63, 66, 67, 70, 71, 72, 73, 76, 77, 80, 81, 82, 83, 86, 87, 90, 91, 94, 95, 98, 99, 100, 101, 104, 105, 108, 109, 110

Offset

1,2

Comments

Conjecture: -2 < n*sqrt(3) < 3 for n >= 1.

Links

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

Example

The first 10 letters of the word in A284369 are 1001111001, in which the positions of 1 are 1,4,5,6,7,10.

Mathematica

s = Nest[Flatten[# /. {0 -> {1}, 1 -> {1, 0, 0, 1}}] &, {0}, 9]; (* A284369 *)
Flatten[Position[s, 0]];  (* A284370 *)
Flatten[Position[s, 1]];  (* A284371 *)

Crossrefs

Cf. A284369, A284370.

Sequence in context: A284790 A172999 A354489 * A123438 A039024 A065028

Adjacent sequences: A284368 A284369 A284370 * A284372 A284373 A284374

Keyword

nonn,easy

Author

Clark Kimberling, Mar 26 2017

Status

approved