A022083 - OEIS

%I #9 Jul 16 2021 01:32:53

%S 1,0,60,0,1740,0,32480,0,438540,0,4563672,0,38099040,0,262336320,

%T 1073741824,1521151500,0,7553367900,32212254720,32592806520,0,

%U 123909200160,467077693440,420775407200,0,1294230433560,4391604060160,3655476494400,0,9600504649920

%N Theta series of D*_30 lattice.

%D J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 120.

%H Andy Huchala, <a href="/A022083/b022083.txt">Table of n, a(n) for n = 0..20000</a>

%e G.f. = 1 + 60*q^2 + 1740*q^4 + ...

%o (Sage)

%o L = [1, 0, 60, 0, 1740, 0, 32480, 0]

%o M = ModularForms(Gamma1(4),15)

%o bases = [_.q_expansion(30) for _ in M.integral_basis()]

%o f = sum(x*y for (x,y) in zip(bases,L)); list(f) # _Andy Huchala_, Jul 15 2021

%K nonn

%O 0,3

%A _N. J. A. Sloane_

%E More terms from _Andy Huchala_, Jul 15 2021