A374876 Obverse convolution (n!)**A000032; see Comments.
3, 6, 32, 480, 36400, 15811200, 48402042480, 1206043046666640, 276580685164781030400, 652981562430940302718878720, 17542316699101442389453162362832320, 5863769800904933880463358889014242882022400, 26512736336116399269871416473897490370043694674400000
Offset: 0
Keywords
Programs
-
Mathematica
s[n_] := n!; t[n_] := LucasL[n]; u[n_] := Product[s[k] + t[n - k], {k, 0, n}] Table[u[n], {n, 0, 13}]
Comments