A294351 Product of first n terms of the binomial transform of the number of partitions into distinct parts (A000009).
1, 2, 8, 72, 1512, 74088, 8446032, 2238198480, 1376492065200, 1957371716714400, 6404520257089516800, 47989070286371749382400, 820133211194093196945216000, 31862175254890520701321641600000, 2805942463821933705561890367504000000
Offset: 0
Keywords
Programs
-
Mathematica
Table[Product[Sum[Binomial[m, k]*PartitionsQ[k], {k, 0, m}], {m, 0, n}], {n, 0, 15}]