A285662 Positions of 0 in A285661; complement of A285663.

3, 4, 7, 8, 15, 16, 19, 20, 27, 28, 31, 32, 35, 36, 39, 40, 43, 44, 47, 48, 55, 56, 59, 60, 67, 68, 71, 72, 75, 76, 79, 80, 83, 84, 87, 88, 95, 96, 99, 100, 107, 108, 111, 112, 119, 120, 123, 124, 131, 132, 135, 136, 143, 144, 147, 148, 155, 156, 159, 160

Offset

1,1

Comments

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

Links

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

Example

As a word, A285661 = 110011001..., in which 0 is in positions 3,4,7,8,15,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {1, 1, 0, 0}}] &, {0}, 9]  (* A285661 *)
Flatten[Position[s, 0]]  (* A285662 *)
Flatten[Position[s, 1]]  (* A285663 *)

Crossrefs

Cf. A285661, A285663.

Sequence in context: A117471 A217135 A323247 * A112062 A037013 A050069

Adjacent sequences: A285659 A285660 A285661 * A285663 A285664 A285665

Keyword

nonn,easy

Author

Clark Kimberling, May 02 2017

Status

approved