A190158 - OEIS

A190158

Positions of 2 in A189463.

3, 4, 8, 12, 16, 20, 21, 25, 29, 33, 37, 38, 41, 42, 46, 50, 54, 55, 58, 59, 63, 67, 71, 72, 75, 76, 80, 84, 88, 92, 93, 97, 101, 105, 109, 110, 113, 114, 118, 122, 126, 127, 130, 131, 135, 139, 143, 144, 147, 148, 152, 156, 160, 164, 165, 169, 173, 177, 181, 182, 185, 186, 190, 194, 198, 199, 202, 203, 207, 211, 215, 216, 219, 220

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

OFFSET

1,1

COMMENTS

See A189463.

LINKS

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

MATHEMATICA

r = 5^(1/2);

f[n_] := Floor[3 n*r] - 3*Floor[n*r];

t = Table[f[n], {n, 1, 220}] (* A189463 *)

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