A089154 Expansion of 2*x*(x+2) / ((x-1)*(x^2+6*x-1)).

4, 30, 190, 1176, 7252, 44694, 275422, 1697232, 10458820, 64450158, 397159774, 2447408808, 15081612628, 92937084582, 572704120126, 3529161805344, 21747674952196, 134015211518526, 825838944063358, 5089048875898680

Offset

1,1

Links

Table of n, a(n) for n=1..20.

Index entries for linear recurrences with constant coefficients, signature (7, -5, -1).

Formula

G.f.: 2*x*(x+2) / ((x-1)*(x^2+6*x-1)). [Colin Barker, Dec 02 2012]

Mathematica

LinearRecurrence[{7, -5, -1}, {4, 30, 190}, 22] (* Hugo Pfoertner, Dec 18 2022 *)

Prog

(PARI) (PARI) \\ Uses the empirical G.f.
a89154(nmax) = {my (v = Vec (serlaplace (2*x*(x+2) / ((x-1)*(x^2+6*x-1)) + O(x^nmax)))); for (k=1, nmax-1, print1(v[k]/k!, ", "))};
a89154(22) \\ Hugo Pfoertner, Dec 18 2022

Crossrefs

Sequence in context: A132849 A115867 A057416 * A113450 A344399 A268218

Adjacent sequences: A089151 A089152 A089153 * A089155 A089156 A089157

Keyword

nonn,easy,less

Author

Roger L. Bagula, Dec 06 2003

Extensions

Edited and new name using g.f., Joerg Arndt, Dec 18 2022

Status

approved