OFFSET
1,1
COMMENTS
Former definition was "Irrational rotation of the square root of 2 as an implicit sequence with an uneven Cantor cartoon." Replaced this with more precise definition from Clark Kimberling. - N. J. A. Sloane, Jan 30 2016
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 7 * floor(n * (sqrt(2) - 1)) + 5 * floor(n * (2 - sqrt(2))) + 5. - Miko Labalan, Dec 14 2015
a(n) = 3*n + 2*floor(n*sqrt(2)). - G. C. Greubel, Mar 27 2018
MATHEMATICA
Table[7 Floor[n (Sqrt[2] - 1)] + 5 Floor[n (2 - Sqrt[2])] + 5, {n, 1000}] (* Miko Labalan, Dec 14 2015 *)
Table[3*n + 2*Floor[n*Sqrt[2]], {n, 1, 100}] (* G. C. Greubel, Mar 27 2018 *)
PROG
(Magma) [3*n+2*Floor(n*Sqrt(2)): n in [1..60]]; // Vincenzo Librandi, Dec 17 2015
(PARI) for(n=1, 100, print1(3*n + 2*floor(n*sqrt(2)), ", ")) \\ G. C. Greubel, Mar 27 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Sep 09 2004
EXTENSIONS
Edited and extended by Robert G. Wilson v, Sep 25 2004
Entry revised by N. J. A. Sloane, Jan 30 2016
STATUS
approved