OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..10000
FORMULA
MAPLE
seq(2*n-floor(n*sqrt(2)), n=0..80); # Muniru A Asiru, Sep 30 2018
MATHEMATICA
Table[2*n - Floor[n*Sqrt[2]], {n, 0, 100}] (* G. C. Greubel, Sep 29 2018 *)
PROG
(Magma) [2*n-Floor(n*Sqrt(2)): n in [0..70]]; // Vincenzo Librandi, Sep 12 2011
(PARI) vector(100, n, n--; 2*n-floor(n*sqrt(2))) \\ G. C. Greubel, Sep 29 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Sep 09 2011
STATUS
approved