OFFSET
1,2
COMMENTS
See A190079.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = n + [n*cos(Pi/5)] + [n*(cos(Pi/5))^2].
MATHEMATICA
PROG
(PARI) for(n=1, 100, print1(n + floor(n*cos(Pi/5)) + floor(n*(cos(Pi/5))^2), ", ")) \\ G. C. Greubel, Feb 15 2018
(Magma) R:= RealField(); [n + Floor(n*Cos(Pi(R)/5)) + Floor(n*(Cos(Pi(R)/5))^2): n in [1..100]]; // G. C. Greubel, Feb 15 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, May 04 2011
STATUS
approved