OFFSET
-2,4
LINKS
Seiichi Manyama, Table of n, a(n) for n = -2..1000
K. Ono, A mock theta function for the Delta-function, Proceedings of the 2007 Integers Conference, Carrollton, Georgia, October 24—27, 2007.
FORMULA
a(n) ~ exp(4*Pi*sqrt(2*n)) / (2^(1/4)*n^(3/4)). - Vaclav Kotesovec, Jun 29 2017
EXAMPLE
G.f. = q^-2 + 42987520*q + 40491909396*q^2 + 8504046600192*q^3 + ... - Michael Somos, Aug 15 2018
MATHEMATICA
a[ n_] := With[{j = 1728 KleinInvariantJ[ Log[q]/(2 Pi I)]}, SeriesCoefficient[ Series[j^2 - 1488 j + 159768, {q, 0, n + 1}], {q, 0, n}]]; (* Michael Somos, Aug 15 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jun 17 2017
STATUS
approved