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