A107229 a(n) = 2*a(n-2)+5*a(n-3), n>6.

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

Offset: 0

Author

Roger L. Bagula, Jun 08 2005

Keywords

• nonn
• easy

Links

• Index entries for linear recurrences with constant coefficients, signature (0, 2, 5).

Crossrefs

Cf. A007493.

Programs

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 *)

Formula

G.f.: 6*x^4+2*x+(x^2+x-1)/(-1+2*x^2+5*x^3). [Sep 28 2009]

Extensions

Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009