[go: up one dir, main page]

login
A052652
E.g.f. x^4/(1-2x).
0
0, 0, 0, 0, 24, 240, 2880, 40320, 645120, 11612160, 232243200, 5109350400, 122624409600, 3188234649600, 89270570188800, 2678117105664000, 85699747381248000, 2913791410962432000, 104896490794647552000
OFFSET
0,5
FORMULA
E.g.f.: -x^4/(-1+2*x)
Recurrence: {a(1)=0, a(0)=0, a(2)=0, a(3)=0, (-2*n-2)*a(n)+a(n+1)=0, a(4)=24}
2^(n-4)*n!, n>3.
MAPLE
spec := [S, {S=Prod(Z, Z, Z, Z, Sequence(Union(Z, Z)))}, labeled]: seq(combstruct[count](spec, size=n), n=0..20);
MATHEMATICA
With[{nn=20}, CoefficientList[Series[x^4/(1-2x), {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Mar 30 2017 *)
CROSSREFS
Sequence in context: A357242 A000536 A151720 * A052732 A267060 A086603
KEYWORD
easy,nonn
AUTHOR
encyclopedia(AT)pommard.inria.fr, Jan 25 2000
STATUS
approved