A285140 - OEIS

A285140

Positions of 0 in A285139; complement of A285141.

1, 2, 4, 6, 7, 8, 10, 12, 14, 16, 17, 18, 20, 22, 23, 24, 26, 28, 30, 32, 33, 34, 36, 38, 39, 40, 42, 44, 45, 46, 48, 50, 51, 52, 54, 56, 58, 60, 61, 62, 64, 66, 67, 68, 70, 72, 74, 76, 77, 78, 80, 82, 83, 84, 86, 88, 90, 92, 93, 94, 96, 98, 99, 100, 102

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

OFFSET

1,2

COMMENTS

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

LINKS

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

EXAMPLE

As a word, A285139 = 001010..., in which 0 is in positions 1,2,4,6,7,...

MATHEMATICA

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

Flatten[Position[s, 0]]; (* A285140 *)