A327310 a(n) = floor(3*n*r) - 3*floor(n*r), where r = sqrt(8).
0, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1, 0, 0, 2, 2, 1, 1
Offset: 0
Links
- Clark Kimberling, Table of n, a(n) for n = 0..10000
Crossrefs
Programs
-
Mathematica
r = Sqrt[8]; z = 300; t = Table[Floor[3 n*r] - 3 Floor[n*r], {n, 0, z}]
Formula
a(n) = floor(3*n*r) - 3*floor(n*r), where r = sqrt(8).