Voozh

A188298

Positions of 0 in A188297; complement of A188299.

1, 2, 4, 5, 7, 8, 11, 12, 14, 15, 18, 19, 21, 22, 24, 25, 28, 29, 31, 32, 35, 36, 38, 39, 41, 42, 45, 46, 48, 49, 52, 53, 55, 56, 59, 60, 62, 63, 65, 66, 69, 70, 72, 73, 76, 77, 79, 80, 82, 83, 86, 87, 89, 90, 93, 94, 96, 97, 100, 101, 103, 104, 106, 107, 110, 111, 113, 114, 117, 118, 120, 121, 123, 124, 127, 128, 130, 131, 134, 135, 137, 138, 140, 141, 144

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

OFFSET

1,2

COMMENTS

See A188014.

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..10000

MATHEMATICA

r=2^(-1/2); k=2;

t=Table[Floor[n*r]-Floor[n*r-k*r]-Floor[k*r], {n, 1, 220}] (* A188297 *)

Flatten[Position[t, 0] ] (* A188298 *)

Flatten[Position[t, 1] ] (* A188299 *)