A285077 Positions of 0 in A285076; complement of A285078.

2, 3, 5, 7, 8, 10, 12, 13, 15, 17, 19, 20, 22, 24, 25, 27, 29, 31, 32, 34, 36, 37, 39, 41, 42, 44, 46, 48, 49, 51, 53, 54, 56, 58, 60, 61, 63, 65, 66, 68, 70, 71, 73, 75, 77, 78, 80, 82, 83, 85, 87, 89, 90, 92, 94, 95, 97, 99, 101, 102, 104, 106, 107, 109

Offset

1,1

Comments

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

This conjecture can be proved in the same way as the conjecture on A285074. - Michel Dekking, May 30 2017

Appears to differ from A285074 only at a(1). - R. J. Mathar, Apr 24 2017

This is correct, and follows from the fact that A285073 and A285076 are equal except for the first two terms which are respectively 0,1 and 1,0. (See Comments for A285073.) - Michel Dekking, May 30 2017

Links

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

Example

As a word, A285076 = 100101001010..., in which 0 is in positions 2,3,5,7,8,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 1, 0}}] &, {0}, 13]; (* A285076 *)
Flatten[Position[s, 0]];  (* A285077 *)
Flatten[Position[s, 1]];  (* A285078 *)

Crossrefs

Cf. A285074, A285076, A285078.

Sequence in context: A285977 A186344 A186317 * A143826 A001912 A186221

Adjacent sequences: A285074 A285075 A285076 * A285078 A285079 A285080

Keyword

nonn,easy

Author

Clark Kimberling, Apr 19 2017

Status

approved