|
%I #11 Jun 13 2015 00:52:16
%S 1,0,4,8,8,56,64,192,576,768,2880,5632,11520,34816,61952,163328,
%T 389120,778240,2088960,4423680,10162176,25067520,53100544,129466368,
%U 296255488,660832256,1595408384,3552837632,8262516736,19317915648,43422842880,102185828352,233711861760
%N Expansion of 1/(8*x^5+8*x^4-8*x^3-4*x^2+1)
%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (0,4,8,-8,-8).
%F G.f.: 1/(8*x^5+8*x^4-8*x^3-4*x^2+1). [_Colin Barker_, Nov 03 2012]
%t 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}]
%K nonn,easy
%O 1,3
%A _Roger L. Bagula_ and _Gary W. Adamson_, Oct 27 2006
%E Edited by _N. J. A. Sloane_, Mar 30 2007
%E New name from _Colin Barker_ and _Joerg Arndt_, Nov 03 2012
|
