A374658 a(n) = Product_{k=0..n} L(k)+3, where L=A000032 (Lucas numbers).
5, 20, 120, 840, 8400, 117600, 2469600, 79027200, 3951360000, 312157440000, 39331837440000, 7945031162880000, 2582135127936000000, 1353038807038464000000, 1144670830754540544000000, 1564765025641456923648000000, 3458130706667619801262080000000
Offset: 0
Keywords
Programs
-
Mathematica
w[n_] := Product[LucasL[k] + 3, {k, 0, n}] Table[w[n], {n, 0, 20}]
Comments