OFFSET
0,3
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..447
D. H. Lehmer, On reciprocally weighted partitions, Acta Arithmetica XXI (1972), 379-388 (Theorem 7).
FORMULA
a(n) ~ 3^(5/3) * exp(-gamma/3) * n^(1/3) * n! / Gamma(1/3)^2, where gamma is the Euler-Mascheroni constant A001620 and Gamma() is the Gamma function [Lehmer, 1972]. - Vaclav Kotesovec, Jul 23 2019
MATHEMATICA
nmax = 25; CoefficientList[Series[1/Product[(1-x^(3*k-2)/(3*k-2)), {k, 1, Floor[nmax/3] + 1}], {x, 0, nmax}], x] * Range[0, nmax]!
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Jul 23 2019
STATUS
approved