OFFSET
0,4
LINKS
Index entries for linear recurrences with constant coefficients, signature (1,4,0,-4).
FORMULA
Limit a(n)/a(n-1) = 2.3829757679...
G.f.: x*(1-3*x^2)/((x-1)*(4*x^3+4*x^2-1)).
MATHEMATICA
m = 4 a[0] = 0; a[1] = 1; a[2] = 1; a[3] = 2; a[n_] := a[n] = a[n - 1] + m*a[n - 2] - m*a[n - 4] digits = 50 aa = Table[a[n], {n, 0, digits}]
LinearRecurrence[{1, 4, 0, -4}, {0, 1, 1, 2}, 40] (* Harvey P. Dale, Oct 29 2018 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, May 24 2005
EXTENSIONS
Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009
STATUS
approved