A123959 Expansion of 1/(8*x^5+8*x^4-8*x^3-4*x^2+1)

1, 0, 4, 8, 8, 56, 64, 192, 576, 768, 2880, 5632, 11520, 34816, 61952, 163328, 389120, 778240, 2088960, 4423680, 10162176, 25067520, 53100544, 129466368, 296255488, 660832256, 1595408384, 3552837632, 8262516736, 19317915648, 43422842880, 102185828352, 233711861760

Offset

1,3

Links

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

Index entries for linear recurrences with constant coefficients, signature (0,4,8,-8,-8).

Formula

G.f.: 1/(8*x^5+8*x^4-8*x^3-4*x^2+1). [Colin Barker, Nov 03 2012]

Mathematica

M = {{0, 1, 0, 0, 0}, {0, 0, 1, 0, 0}, {0, 0, 0, 1, 0}, {0, 0, 0, 0, 1}, {-8, -8, 8, 4, 0}}; v[1] = {0, 0, 0, 0, 1}; v[n_] := v[n] = M.v[n - 1]; a1 = Table[v[n][[1]], {n, 1, 50}]

Crossrefs

Sequence in context: A195752 A095806 A096872 * A279518 A340721 A096412

Adjacent sequences: A123956 A123957 A123958 * A123960 A123961 A123962

Keyword

nonn,easy

Author

Roger L. Bagula and Gary W. Adamson, Oct 27 2006

Extensions

Edited by N. J. A. Sloane, Mar 30 2007

New name from Colin Barker and Joerg Arndt, Nov 03 2012

Status

approved