%I #19 Mar 17 2024 05:52:51
%S 0,1,1,4,6,18,24,67,85,231,287,771,949,2536,3108,8285,10133,26980,
%T 32966,87726,107140,285035,348037,925799,1130311,3006511,3670473,
%U 9762796,11918536,31700713,38700153,102933300,125660022,334225018,408017728
%N Expansion of -x*(1+x-x^2+x^3+4*x^4) / ( (x^3-2*x^2-x+1)*(x^3+2*x^2-x-1) ).
%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (0,5,0,-6,0,1).
%t CoefficientList[Series[-x(1+x-x^2+x^3+4x^4)/((x^3-2x^2-x+1)(x^3+ 2x^2- x-1)),{x,0,40}],x] (* or *) LinearRecurrence[{0,5,0,-6,0,1},{0,1,1,4,6,18},40] (* _Harvey P. Dale_, Feb 05 2012 *)
%K nonn,easy
%O 0,4
%A _Roger L. Bagula_ and _Gary W. Adamson_, Jun 30 2006