%I #20 Apr 06 2018 11:49:52
%S 1,2,6,15,40,104,273,714,1869,4891,12800,33498,87665,229422,600403,
%T 1571271,4112057,10761362,28162767,73702703,192881913,504777043,
%U 1321014806,3457130514,9047401540,23677287940,61964085679,162161642995,424381287495,1110616998258
%N Expansion of x^7/(1-2*x-2*x^2+x^3+x^8).
%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (2,2,-1,0,0,0,0,-1).
%F G.f.: x^7/(1-2*x-2*x^2+x^3+x^8).
%t Drop[CoefficientList[Series[x^7/(1-2x-2x^2+x^3+x^8),{x,0,40}],x],7] (* or *) LinearRecurrence[{2,2,-1,0,0,0,0,-1},{1,2,6,15,40,104,273,714},30] (* _Harvey P. Dale_, May 05 2014 *)
%K nonn,easy,less
%O 7,2
%A _Roger L. Bagula_, Nov 20 2010