A304020 Coefficients of (q*(j(q)-744))^(1/4) where j(q) is the elliptic modular invariant.

1, 0, 49221, 5373440, -3417985269, -788396806656, 342234419865236, 132462307415526912, -36238724753334630039, -22802599804762047656960, 3430044089325166785294348, 3917150794938668128412249088, -180732068045239143713224620097

Offset

0,3

Links

Seiichi Manyama, Table of n, a(n) for n = 0..378

Eric Weisstein's World of Mathematics, j-Function

Formula

G.f.: Product_{k>0} (1 - x^k)^(-A302407(k)/4).

Mathematica

CoefficientList[Series[((2^16 + x*QPochhammer[-1, x]^24)^3/(2*QPochhammer[-1, x])^24 - 744*x)^(1/4), {x, 0, 15}], x] (* Vaclav Kotesovec, Jun 09 2018 *)

Crossrefs

(q*(j(q)-744))^(k/4): A305699 (k=-4), A305698 (k=-2), A305696 (k=-1), this sequence (k=1), A305697 (k=2).

Cf. A000521 (j), A014708 (j-744), A106203, A106205, A302407.

Sequence in context: A205625 A205360 A045085 * A305696 A184663 A184660

Adjacent sequences: A304017 A304018 A304019 * A304021 A304022 A304023

Keyword

sign

Author

Seiichi Manyama, Jun 08 2018

Status

approved