Voozh

A188302

Positions of 1 in A188300; complement of A188301.

10, 17, 27, 34, 44, 51, 58, 68, 75, 85, 92, 99, 109, 116, 126, 133, 143, 150, 157, 167, 174, 184, 191, 198, 208, 215, 225, 232, 242, 249, 256, 266, 273, 283, 290, 297, 307, 314, 324, 331, 338, 348, 355, 365, 372, 382, 389, 396, 406, 413, 423, 430, 437, 447, 454, 464, 471, 481

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

OFFSET

1,1

COMMENTS

See A188014, A188300.

LINKS

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

MATHEMATICA

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

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

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

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