OFFSET
-1,3
LINKS
G. C. Greubel, Table of n, a(n) for n = -1..1500
D. Ford, J. McKay and S. P. Norton, More on replicable functions, Comm. Algebra 22, No. 13, 5175-5193 (1994).
FORMULA
Expansion of (T13A + 3)^(1/3), where T13A = A034319, in powers of q. - G. C. Greubel, Jun 24 2018
a(n) ~ exp(4*Pi*sqrt(n/39)) / (sqrt(2) * 39^(1/4) * n^(3/4)). - Vaclav Kotesovec, Jun 27 2018
EXAMPLE
T39B = 1/q + q^2 + 3*q^5 + 3*q^8 + 4*q^11 + 6*q^14 + 10*q^17 + 10*q^20 + ...
MATHEMATICA
eta[q_] := q^(1/24)*QPochhammer[q]; nmax = 100; T13A := 2 + (eta[q]/ eta[q^13])^2 + 13*(eta[q^13]/eta[q])^2; a:= CoefficientList[Series[ (q*(T13A + 3) + O[q]^nmax)^(1/3), {q, 0, 70}], q]; Table[a[[n]], {n, 1, 50}] (* G. C. Greubel, Jun 24 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 27 2000
EXTENSIONS
Terms a(8) onward added by G. C. Greubel, Jun 24 2018
STATUS
approved