A374655 a(n) = (1/3)*A374654(n).
1, 2, 8, 40, 320, 3840, 72960, 2188800, 105062400, 8089804800, 1003135795200, 200627159040000, 64802572369920000, 33826942777098240000, 28549939703870914560000, 38970667695783798374400000, 86047234272290626810675200000, 307360720820622118967731814400000
Offset: 0
Keywords
Programs
-
Mathematica
w[n_] := Product[LucasL[k] + 1, {k, 0, n}] (1/3) Table[w[n], {n, 0, 20}]
Comments