A190225 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A190225

Positions of 0 in A190224; complement of A190226.

2, 4, 5, 6, 7, 8, 10, 12, 13, 14, 16, 18, 19, 20, 21, 22, 24, 26, 27, 28, 29, 30, 32, 34, 35, 36, 37, 38, 40, 42, 43, 44, 46, 48, 49, 50, 51, 52, 54, 56, 57, 58, 59, 60, 62, 64, 65, 66, 67, 68, 70, 71, 72, 73, 74, 76, 78, 79, 80, 81, 82, 84, 86, 87, 88, 89, 90, 92, 94, 95, 96, 97, 98, 100, 101, 102, 103, 104, 106, 108, 109, 110, 111, 112, 114

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

OFFSET

1,1

LINKS

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

MATHEMATICA

u = Sin[Pi/3]; v = Cos[Pi/3];

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

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

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

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

PROG