OFFSET
0,4
FORMULA
E.g.f.: g(x + y*x) where g(x) is the e.g.f. for A053763.
EXAMPLE
1,
1, 1,
4, 8, 4,
64, 192, 192, 64,
4096, 16384, 24576, 16384, 4096
MATHEMATICA
nn = 5; g[x_] := Sum[2^(n^2 - n) x^n/n!, {n, 0, nn}]; Map[Select[#, # > 0 &] &, Range[0, nn]! CoefficientList[Series[g[ x + y x], {x, 0, nn}], {x, y}]] // Grid
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Geoffrey Critzer, May 17 2020
STATUS
approved