|
%I #17 Jun 10 2018 01:44:25
%S 1,0,98442,10746880,-4413263697,-1047821432832,376869391313174,
%T 150580578862513152,-35577391320709928685,-23497935558209789278208,
%U 2998297272257446799809386,3754973355232751413790773248,-112875007087323495790855645044
%N Coefficients of (q*(j(q)-744))^(1/2) where j(q) is the elliptic modular invariant.
%H Seiichi Manyama, <a href="/A305697/b305697.txt">Table of n, a(n) for n = 0..378</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/j-Function.html">j-Function</a>
%t CoefficientList[Series[((2^16 + x*QPochhammer[-1, x]^24)^3/(2*QPochhammer[-1, x])^24 - 744*x)^(1/2), {x, 0, 15}], x] (* _Vaclav Kotesovec_, Jun 09 2018 *)
%Y (q*(j(q)-744))^(k/4): A305699 (k=-4), A305698 (k=-2), A305696 (k=-1), A304020 (k=1), this sequence (k=2).
%Y Cf. A000521 (j), A014708 (j-744).
%K sign
%O 0,3
%A _Seiichi Manyama_, Jun 08 2018
|
