A285466 - OEIS

A285466

Positions of 1 in A285464; complement of A285465.

4, 8, 12, 16, 20, 24, 25, 26, 27, 28, 29, 30, 34, 38, 42, 46, 50, 54, 58, 59, 60, 61, 62, 63, 64, 68, 72, 76, 80, 84, 88, 92, 93, 94, 95, 96, 97, 98, 102, 106, 110, 114, 118, 122, 126, 127, 128, 129, 130, 131, 132, 136, 140, 144, 148, 152, 156, 160, 161, 162

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

OFFSET

1,1

LINKS

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

EXAMPLE

As a word, A285464 = 00010001..., in which 1 is in positions 4,8,12,16,...

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