A285374 Positions of 0 in A285373; complement of A285375.

4, 8, 12, 14, 18, 22, 26, 28, 32, 36, 40, 42, 46, 48, 52, 56, 60, 62, 66, 70, 74, 76, 80, 84, 88, 90, 94, 96, 100, 104, 108, 110, 114, 118, 122, 124, 128, 132, 136, 138, 142, 144, 148, 152, 156, 158, 162, 164, 168, 172, 176, 178, 182, 186, 190, 192, 196, 200

Offset

1,1

Comments

Conjecture: -4 < n*sqrt(2) - a(n) < 1 for n>=1.

Links

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

Example

As a word, A285373 = 11101110..., in which 0 is in positions 4,8,12,14,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {1, 1, 1, 0}}] &, {0}, 10] (* A285373 *)
Flatten[Position[s, 0]]  (* A285374 *)
Flatten[Position[s, 1]]  (* A285375 *)

Crossrefs

Cf. A284373, A285375, A285376, A285377.

Sequence in context: A311079 A257221 A092453 * A132457 A311080 A316360

Adjacent sequences: A285371 A285372 A285373 * A285375 A285376 A285377

Keyword

nonn,easy

Author

Clark Kimberling, Apr 26 2017

Status

approved