A374868 Obverse convolution (2n+1)**A000032; see Comments.
3, 10, 112, 1620, 39424, 1404000, 75841920, 6112753920, 742328893440, 136268470800000, 38081363493888000, 16296693648238080000, 10743612584546575319040, 10968661020433308192000000, 17425075496868344523423744000, 43253347261338355732569538560000
Offset: 0
Keywords
Programs
-
Mathematica
s[n_] := 2 n + 1; t[n_] := LucasL[n]; u[n_] := Product[s[k] + t[n - k], {k, 0, n}] Table[u[n], {n, 0, 20}]
Comments