OFFSET
0,4
FORMULA
a(n) ~ exp(Pi*sqrt(2*n/3)) / (2^(17/4) * 3^(1/4) * n^(5/4)).
MATHEMATICA
nmax = 50; CoefficientList[Series[Sum[PartitionsQ[k]^2*x^k, {k, 0, nmax}] / Sum[PartitionsP[k]*x^k, {k, 0, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Vaclav Kotesovec, May 31 2018
STATUS
approved