A285084 Positions of 0 in A285083; complement of A285085.

2, 3, 6, 9, 13, 14, 18, 20, 21, 24, 28, 29, 32, 35, 39, 41, 42, 45, 49, 50, 53, 56, 60, 62, 63, 66, 70, 71, 74, 78, 79, 82, 85, 89, 90, 94, 96, 97, 100, 104, 105, 108, 112, 113, 116, 119, 123, 125, 126, 129, 132, 136, 137, 141, 143, 144, 147, 151, 152, 155

Offset

1,1

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, A285083 = 1001101101110..., in which 0 is in positions 2,3,6,9,13,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 1, 1}}] &, {0}, 13]; (* A285083 *)
Flatten[Position[s, 0]];  (* A285084 *)
Flatten[Position[s, 1]];  (* A285085 *)

Crossrefs

Cf. A285080, A285083, A285085.

Sequence in context: A123316 A303365 A096845 * A248187 A190772 A130673

Adjacent sequences: A285081 A285082 A285083 * A285085 A285086 A285087

Keyword

nonn,easy

Author

Clark Kimberling, Apr 19 2017

Status

approved