OFFSET
0,9
COMMENTS
A sequence designed to have limiting ratio:1.1360098247570344821
MATHEMATICA
Clear[a, b, a0, f]
a0 = (1 + Sqrt[5])/2;
a = (1 + Sqrt[a0])/2; b = (1 - Sqrt[a0])/2;
f[n_] := Floor[FullSimplify[(a^n - b^n)/(a - b)]]
Table[f[n], {n, 0, 50}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Nov 29 2010
STATUS
approved