|
%I #15 Apr 18 2017 07:04:21
%S 1,2,5,14,38,103,280,761,2068,5620,15273,41506,112797,306538,833050,
%T 2263903,6152400,16719809,45437880,123482328,335576513,911965282,
%U 2478363781,6735220246,18303685726,49742235431,135179877032
%N Expansion of ( 1-x ) / ( 1-3*x+x^2-x^3+x^4 ).
%H INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=1059">Encyclopedia of Combinatorial Structures 1059</a>
%H <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (3,-1,1,-1)
%F G.f.: -(-1+x)/(1-3*x-x^3+x^4+x^2)
%F Recurrence: {a(0)=1, a(1)=2, a(2)=5, a(3)=14, a(n)-a(n+1)+a(n+2)-3*a(n+3)+a(n+4)=0}
%F Sum(-1/1099*(-270-11*_alpha+141*_alpha^3-104*_alpha^2)*_alpha^(-1-n), _alpha=RootOf(1-3*_Z-_Z^3+_Z^4+_Z^2))
%p spec := [S,{S=Sequence(Union(Prod(Union(Prod(Z,Z),Sequence(Z)),Z),Z))},unlabeled ]: seq(combstruct[count ](spec,size=n), n=0..20);
%K easy,nonn
%O 0,2
%A encyclopedia(AT)pommard.inria.fr, Jan 25 2000
%E More terms from _James A. Sellers_, Jun 05 2000
|
