A287369 - OEIS

A287369

Positions of 0 in A287368.

7, 16, 21, 26, 29, 32, 41, 50, 59, 64, 69, 72, 75, 84, 89, 94, 97, 100, 109, 114, 119, 122, 125, 134, 137, 140, 149, 152, 155, 164, 173, 182, 187, 192, 195, 198, 207, 216, 225, 230, 235, 238, 241, 250, 259, 268, 273, 278, 281, 284, 293, 298, 303, 306, 309

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

OFFSET

1,1

LINKS

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

MATHEMATICA

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

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

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

Flatten[Position[s, 2]] (* A287371 *)

CROSSREFS

Cf. A287368, A287370, A287371.