login
E.g.f. ( 1-x-sqrt(1-2*x+x^2-4*x^3) )/(2*x^2).
0

%I #15 Jan 30 2020 21:29:14

%S 0,1,2,6,48,480,5040,65520,1048320,18869760,377395200,8462361600,

%T 209802700800,5666588928000,165900288153600,5242466541312000,

%U 177718177308672000,6430828699975680000,247490157968621568000

%N E.g.f. ( 1-x-sqrt(1-2*x+x^2-4*x^3) )/(2*x^2).

%H INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=699">Encyclopedia of Combinatorial Structures 699</a>

%F D-finite with recurrence: a(1)=1; a(3)=6; a(2)=2; a(4)=48; (-56*n^2-26*n^3-12-46*n-4*n^4)*a(n) +(n^3+7*n^2+16*n+12)*a(n+1) +(-13*n-2*n^2-21)*a(n+2) +(n+5)*a(n+3) =0.

%p spec := [S,{B=Prod(C,C),S=Union(B,Z,C),C=Prod(S,Z)},labeled]: seq(combstruct[count](spec,size=n), n=0..20);

%K easy,nonn

%O 0,3

%A encyclopedia(AT)pommard.inria.fr, Jan 25 2000