A285278 Positions of 0 in A285277; complement of A285279.

2, 3, 7, 11, 15, 20, 21, 26, 28, 29, 33, 37, 42, 43, 47, 51, 56, 57, 61, 65, 69, 74, 76, 77, 81, 85, 90, 91, 95, 99, 104, 105, 109, 113, 117, 122, 124, 125, 129, 133, 138, 139, 143, 147, 152, 153, 157, 161, 165, 170, 172, 173, 177, 181, 186, 187, 191, 195

Offset

1,1

Comments

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

Links

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

Example

As a word, A285277 = 10011101110111..., in which 0 is in positions 2,3,7,11,15,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 1, 1, 1}}] &, {0}, 9]; (* A285277 *)
Flatten[Position[s, 0]];  (* A285278 *)
Flatten[Position[s, 1]];  (* A285279 *)

Crossrefs

Cf. A285275, A285277, A285279.

Sequence in context: A188529 A369692 A174060 * A092353 A189374 A180516

Adjacent sequences: A285275 A285276 A285277 * A285279 A285280 A285281

Keyword

nonn,easy

Author

Clark Kimberling, Apr 25 2017

Status

approved