A286692 - OEIS

A286692

Positions of 0 in A286691; complement of A286693.

1, 3, 4, 6, 9, 10, 12, 13, 15, 18, 19, 21, 22, 24, 25, 27, 30, 31, 33, 34, 36, 39, 40, 42, 43, 45, 46, 48, 51, 52, 54, 55, 57, 60, 61, 63, 64, 66, 69, 70, 72, 73, 75, 76, 78, 81, 82, 84, 85, 87, 90, 91, 93, 94, 96, 97, 99, 102, 103, 105, 106, 108, 111, 112

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

a(n) - a(n-1) is in {1,2,3} for n>=2, and a(n)/n -> 4 - sqrt(8).

LINKS

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

EXAMPLE

As a word, A286691 = 0100101100100101100100100101100100..., in which 0 is in positions 1,3,4,6,9,...

MATHEMATICA

s = Nest[Flatten[# /. {0 -> {0, 0, 1}, 1 -> {0}}] &, {0}, 6] (* A171588 *)

w = StringJoin[Map[ToString, s]]