login
A107477
a(n)= 7*a(n-1) +5*a(n-2) -35*a(n-3) +7*a(n-4) +5*a(n-5) -a(n-6), n>10.
0
1, 1, 2, 3, 5, 8, 118, 1011, 7339, 52332, 368505, 2591989, 18211138, 127942244, 898765639, 6313614979, 44351223914, 311553904337, 2188569785219, 15374026372032, 107997774755178, 758650932498691, 5329287885039911
OFFSET
0,3
FORMULA
G.f.: (1-6*x-10*x^2+16*x^5+124*x^6+290*x^7-96*x^8-44*x^9+10*x^10+19*x^3+2*x^4) / (1-7*x-5*x^2+35*x^3-7*x^4-5*x^5+x^6).
MATHEMATICA
m=5 M = {{0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1}, {-1, m, (m + 2), -m*(m + 2), m, (m + 2)}} v[0] = {0, 1, 1, 2, 3, 5} v[n_] := M.v[n - 1] a = Table[Abs[v[n][[1]]], {n, 1, 50}]
Join[{1, 1, 2, 3, 5}, LinearRecurrence[{7, 5, -35, 7, 5, -1}, {8, 118, 1011, 7339, 52332, 368505}, 20]] (* Harvey P. Dale, Mar 30 2012 *)
CROSSREFS
Sequence in context: A279073 A279074 A120495 * A271525 A357101 A232562
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, May 27 2005
EXTENSIONS
Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009
STATUS
approved