login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Expansion of 2*x^4 / (1 - 11*x + 45*x^2 - 80*x^3 + 49*x^4).
0

%I #15 Oct 05 2015 09:16:15

%S 0,0,0,2,22,152,842,4084,18116,75408,299730,1152834,4338280,16126958,

%T 59713888,221713192,829301072,3132108250,11945717358,45938159040,

%U 177695375802,689616061412,2679197337100,10403108215760,40332521702522

%N Expansion of 2*x^4 / (1 - 11*x + 45*x^2 - 80*x^3 + 49*x^4).

%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (11,-45,80,-49).

%t M = {{2, -1, 0, 0}, {-1, 3, -1, 0}, {0, -1, 3, 2}, {0, 0, -1, 3}}; v[1] = {0, 0, 0, 1}; v[n_] := v[n] = M.v[n - 1]; a1 = Table[v[n][[1]], {n, 1, 50}]

%t LinearRecurrence[{11,-45,80,-49},{0,0,0,2},30] (* _Harvey P. Dale_, Oct 05 2015 *)

%K nonn

%O 1,4

%A _Gary W. Adamson_ and _Roger L. Bagula_, Oct 28 2006