OFFSET
0,2
COMMENTS
In general, for b > 0 and (psi(x) / phi(x))^b, a(n) ~ (-1)^n * b^(1/4) * exp(Pi*sqrt(b*(n/2))) / (2^(b + 7/4) * n^(3/4)). - Vaclav Kotesovec, Oct 06 2018
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..10000
Simon Plouffe, Numbers in the base e^Pi, arXiv:2509.15609 [math.NT], 2025. See p. 18/24, marked 211.
Eric Weisstein's World of Mathematics, Ramanujan Theta Functions
FORMULA
Convolution inverse of A029844.
Expansion of q^(-7/8) * (eta(q) * eta(q^4)^2 / eta(q^2)^3)^7 in powers of q.
a(n) ~ (-1)^n * 7^(1/4) * exp(Pi*sqrt((7*n)/2)) / (256*2^(3/4)*n^(3/4)). - Vaclav Kotesovec, Oct 06 2018
Empirical: Sum_{n>=0} a(n) / exp(n*Pi) = (1/32) * exp(7*Pi/8) * 2^(5/8) = A389044. - Simon Plouffe, Sep 22 2025
MATHEMATICA
nmax = 50; CoefficientList[Series[Product[((1-x^k) * (1-x^(4*k))^2 / (1-x^(2*k))^3)^7, {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Oct 06 2018 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Oct 04 2018
STATUS
approved
