OFFSET
1,1
COMMENTS
See A189527.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
MATHEMATICA
PROG
(PARI) for(n=1, 100, print1(n + floor(n/(sqrt(3) - sqrt(2))) + floor(n*(sqrt(3)+sqrt(2))/(sqrt(3)-sqrt(2))), ", ")) \\ G. C. Greubel, Apr 20 2018
(Magma) [n + Floor(n/(Sqrt(3)-Sqrt(2))) + Floor(n*(Sqrt(3) +Sqrt(2))/( Sqrt(3) -Sqrt(2))): n in [1..100]]; // G. C. Greubel, Apr 20 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Apr 23 2011
STATUS
approved