OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..5000
FORMULA
a(n) = n*A130233(n).
a(n) = n*floor(arcsinh(sqrt(5)*n/2)/log(phi)).
G.f.: (1/(1-x))*Sum_{k>=1} (Fib(k) + x/(1-x))*x^Fib(k).
MATHEMATICA
Table[n*Floor[Log[GoldenRatio, 3/2 +n*Sqrt[5]]], {n, 0, 70}] (* G. C. Greubel, Mar 18 2023 *)
PROG
(Magma) [n*Floor(Log(3/2 +n*Sqrt(5))/Log((1+Sqrt(5))/2)): n in [0..70]]; // G. C. Greubel, Mar 18 2023
(SageMath) [n*int(log(3/2 +n*sqrt(5), golden_ratio)) for n in range(71)] # G. C. Greubel, Mar 18 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Hieronymus Fischer, May 17 2007
STATUS
approved