A318247 a(n) = [x^n] Product_{k>=1} (1 + n!*x^k).
1, 1, 2, 42, 600, 28920, 374285520, 128100273840, 131101518683520, 143354704247556480, 173401404266683545849388800, 2538767479410416957720411116800, 105287752487031026606448840363801600, 4510685217145833106538730603088118860800, 288804138719404983322786510403231912442931200
Offset: 0
Keywords
Links
- Vaclav Kotesovec, Table of n, a(n) for n = 0..65
Programs
-
Mathematica
nmax = 15; Table[SeriesCoefficient[Product[(1+n!*x^k), {k, 1, n}], {x, 0, n}], {n, 0, nmax}]