A284534 Positions of 0 in A284533; complement of A284535.

1, 3, 6, 8, 11, 13, 15, 17, 20, 22, 25, 27, 30, 32, 35, 37, 39, 41, 44, 46, 49, 51, 53, 55, 58, 60, 63, 65, 68, 70, 73, 75, 77, 79, 82, 84, 87, 89, 91, 93, 96, 98, 101, 103, 105, 107, 110, 112, 115, 117, 119, 121, 124, 126, 129, 131, 134, 136, 139, 141, 143

Offset

1,2

Comments

Conjecture: a(n)/n -> (3 + sqrt(3))/2.

Links

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

Mathematica

s = Nest[Flatten[# /. {0 -> {1}, 1 -> {0, 1, 0, 1}}] &, {0}, 6] (* A284533 *)
Flatten[Position[s, 0]]  (* A284534 *)
Flatten[Position[s, 1]]  (* A284535 *)

Crossrefs

Cf. A284533, A284535, A284589.

Sequence in context: A140482 A212451 A244223 * A118011 A189679 A286666

Adjacent sequences: A284531 A284532 A284533 * A284535 A284536 A284537

Keyword

nonn,easy

Author

Clark Kimberling, Apr 07 2017

Status

approved