A285465 - OEIS

A285465

Positions of 0 in A285464; complement of A285466.

1, 2, 3, 5, 6, 7, 9, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23, 31, 32, 33, 35, 36, 37, 39, 40, 41, 43, 44, 45, 47, 48, 49, 51, 52, 53, 55, 56, 57, 65, 66, 67, 69, 70, 71, 73, 74, 75, 77, 78, 79, 81, 82, 83, 85, 86, 87, 89, 90, 91, 99, 100, 101, 103, 104

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

OFFSET

1,2

LINKS

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

EXAMPLE

As a word, A285464 = 00010001..., in which 0 is in positions 1,2,3,5,6,...

MATHEMATICA

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

Flatten[Position[s, 0]] (* A285465 *)

Flatten[Position[s, 1]] (* A285466 *)

CROSSREFS