OFFSET
0,7
COMMENTS
The low limiting ratio is: -1.190866431897927
FORMULA
(Binet variant of the definition):
c = 4/(1 + sqrt(19)); b = 4/(1 - sqrt(19)); a(n) = floor[(c^n - b^n)/(c - b)].
MAPLE
MATHEMATICA
a = 4/(1 + Sqrt[19]); b = 4/(1 - Sqrt[19]);
f[n_] = (a^n - b^n)/(a - b)
Table[Floor[f[n]], {n, 0, 50}]
Module[{c=Sqrt[19], a, b}, a=4/(1+c); b=4/(1-c); Floor[(a^#-b^#)/(a-b)]&/@ Range[0, 50]] (* Harvey P. Dale, Sep 16 2012 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Roger L. Bagula, Nov 28 2010
STATUS
approved