A285428 Positions of 0 in A285427; complement of A285429.

2, 3, 9, 10, 12, 13, 15, 16, 18, 19, 21, 22, 28, 29, 35, 36, 42, 43, 49, 50, 56, 57, 59, 60, 62, 63, 65, 66, 68, 69, 75, 76, 78, 79, 81, 82, 84, 85, 87, 88, 94, 95, 97, 98, 100, 101, 103, 104, 106, 107, 113, 114, 116, 117, 119, 120, 122, 123, 125, 126, 132

Offset

1,1

Comments

Conjecture: a(n)/n -> (61 - sqrt(3))/26.

Links

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

Example

As a word, A285427 = 100111110..., in which 0 is in positions 2,3,9,10,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {1, 0, 0}}] &, {0}, 10] (* A285427 *)
Flatten[Position[s, 0]]   (* A285428 *)
Flatten[Position[s, 1]]   (* A285429 *)

Crossrefs

Cf. A285427, A285429.

Sequence in context: A133557 A047475 A291610 * A039012 A291924 A357353

Adjacent sequences: A285425 A285426 A285427 * A285429 A285430 A285431

Keyword

nonn,easy

Author

Clark Kimberling, Apr 28 2017

Status

approved