A374875 Obverse convolution (n!)**A000045; see Comments.
1, 2, 8, 108, 6048, 2016000, 4704480000, 90747697360320, 16354583259191654400, 30715766088740592418944000, 663127739407725552738699264000000, 179787972724005939376371515117626982400000, 664012371757346621597356008815791014131773440000000
Offset: 0
Keywords
Programs
-
Mathematica
s[n_] := n!; t[n_] := Fibonacci[n]; u[n_] := Product[s[k] + t[n - k], {k, 0, n}] Table[u[n], {n, 0, 13}]
Comments