A374859 Obverse convolution (n)**(2^n); see Comments.
1, 4, 36, 640, 21600, 1370880, 163924992, 37150064640, 16065713664000, 13343315521536000, 21404225432753602560, 66631099907380661452800, 404128087449517604339712000, 4791300434691082493755392000000, 111343541043408070030243833839616000
Offset: 0
Keywords
Programs
-
Mathematica
s[n_] := n; t[n_] := 2^n; u[n_] := Product[s[k] + t[n - k], {k, 0, n}] Table[u[n], {n, 0, 20}]
Comments