|
|
A107229
|
|
a(n) = 2*a(n-2)+5*a(n-3), n>6.
|
|
0
|
|
|
1, 1, 1, 3, 3, 11, 9, 7, 73, 59, 181, 483, 657, 1871, 3729, 7027, 16813, 32699, 68761, 149463, 301017, 642731, 1349349, 2790547, 5912353, 12327839, 25777441, 54217443, 113194077, 237322091, 497475369, 1040614567, 2181561193
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
G.f.: 6*x^4+2*x+(x^2+x-1)/(-1+2*x^2+5*x^3). [Sep 28 2009]
|
|
MATHEMATICA
|
F[1] = 1; F[2] = 1; F[3] = 1; F[n__] := F[n] = 2*F[n - 2] - 5*F[n - 3] b = Table[Abs[F[n]], {n, 1, 50}]
LinearRecurrence[{0, 2, 5}, {1, 1, 1, 3, 3, 11, 9, 7}, 40] (* Harvey P. Dale, Jun 10 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009
|
|
STATUS
|
approved
|
|
|
|