login
A106212
Fourth root of theta series of lattice {D_12}^{+} (cf. A004533).
2
1, 0, 66, 512, -4548, -95232, 235896, 19184640, 71390982, -3574929408, -38686277880, 549355393536, 12560156358776, -44726582455296, -3304393480144896, -11697847949288448, 730893806097007116, 7947401735635359744, -128019618062747473590, -2899743155552604891648
OFFSET
0,3
LINKS
N. Heninger, E. M. Rains and N. J. A. Sloane, On the Integrality of n-th Roots of Generating Functions, J. Combinatorial Theory, Series A, 113 (2006), 1732-1745.
MATHEMATICA
terms = 20; s = ((EllipticTheta[2, 0, q]^12 + EllipticTheta[3, 0, q]^12 + EllipticTheta[4, 0, q]^12)/2)^(1/4) + O[q]^terms; CoefficientList[s, q] (* Jean-François Alcover, Jul 08 2017 *)
CROSSREFS
Sequence in context: A223444 A084027 A063249 * A155022 A202639 A175260
KEYWORD
sign
AUTHOR
STATUS
approved