OFFSET
0,4
FORMULA
E.g.f.: exp(y*x)*A(x) where A(x) is the e.g.f. for A173403.
EXAMPLE
1,
1, 1,
13, 2, 1,
469, 39, 3, 1,
63577, 1876, 78, 4, 1,
33231721, 317885, 4690, 130, 5, 1,
68519123173, 199390326, 953655, 9380, 195, 6, 1
MATHEMATICA
nn=6; s=Sum[Sum[(-1)^k Binomial[n, k] 2^(n-k)^2, {k, 0, n}] x^n/n!, {n, 0, nn}]; Range[0, nn]! CoefficientList[Series[Exp[ y x] s, {x, 0, nn}], {x, y}] //Grid
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Geoffrey Critzer, Oct 02 2012
STATUS
approved