OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
MATHEMATICA
With[{c = Sqrt[2]}, Table[3*n - Floor[c*n], {n, 0, 50}]] (* G. C. Greubel, Oct 31 2017 *)
PROG
(Magma) [3*n-Floor(n*(Sqrt(2))): n in [0..70]]; // Vincenzo Librandi, Sep 12 2011
(PARI) a(n) = 3*n - sqrtint(2*n^2) \\ G. C. Greubel, Oct 31 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Sep 10 2011
STATUS
approved
