OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..5000
FORMULA
MATHEMATICA
PROG
(Magma)
A130233:= func< n | Floor(Log(3/2 + n*Sqrt(5))/Log((1+Sqrt(5))/2)) >;
[A130240(n): n in [0..70]]; // G. C. Greubel, Mar 18 2023
(SageMath)
def A130233(n): return int(log(3/2 +n*sqrt(5), golden_ratio))
[A130240(n) for n in range(71)] # G. C. Greubel, Mar 18 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Hieronymus Fischer, May 17 2007
STATUS
approved