A285081 Positions of 0 in A285080; complement of A285082.

1, 5, 7, 8, 11, 15, 16, 19, 23, 24, 27, 30, 34, 36, 37, 40, 43, 47, 48, 52, 54, 55, 58, 62, 63, 66, 69, 73, 75, 76, 79, 83, 84, 87, 91, 92, 95, 98, 102, 103, 107, 109, 110, 113, 117, 118, 121, 124, 128, 130, 131, 134, 138, 139, 142, 146, 147, 150, 153, 157

Offset

1,2

Comments

Conjecture: 0 < n*r - a(n) < r for n>=1, where r = (3+sqrt(5))/2.

Links

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

Example

As a word, A285080 = 01110..., in which 0 is in positions 1,5,7,8,11,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 1, 1}}] &, {0}, 14]; (* A285080 *)
Flatten[Position[s, 0]];  (* A285081 *)
Flatten[Position[s, 1]];  (* A285082 *)

Crossrefs

Cf. A285080, A285082, A285083, A285084.

Sequence in context: A191929 A082728 A359629 * A154370 A045251 A099497

Adjacent sequences: A285078 A285079 A285080 * A285082 A285083 A285084

Keyword

nonn,easy

Author

Clark Kimberling, Apr 19 2017

Status

approved