%I #11 Dec 28 2017 03:40:24

%S 3,6,8,9,11,12,13,16,19,21,22,24,25,26,29,32,34,35,37,38,39,42,45,48,

%T 50,51,52,55,58,61,63,64,65,68,71,74,75,76,77,78,84,87,88,89,90,91,97,

%U 100,101,102,103,104,105,110,113,114,115,116,117,118,123,126,127,129,130,131,136,137,139,140,142,143,144,149,150,152,153,155,156

%N Positions of 0 in A190233; complement of A190235.

%H G. C. Greubel, <a href="/A190234/b190234.txt">Table of n, a(n) for n = 1..5500</a>

%t u = Sin[Pi/8]; v = Cos[Pi/8];

%t f[n_] := Floor[n*u + n*v] - Floor[n*u] - Floor[n*v]

%t t = Table[f[n], {n, 1, 120}] (* A190233 *)

%t Flatten[Position[t, 0]] (* A190234 *)

%t Flatten[Position[t, 1]] (* A190235 *)

%Y Cf. A190233, A190235.

%K nonn

%O 1,1

%A _Clark Kimberling_, May 06 2011