|
|
A015232
|
|
Theta series of lattice Kappa_10.
|
|
2
|
|
|
1, 0, 276, 888, 3564, 8136, 16908, 30456, 58380, 74256, 145800, 186048, 265866, 363528, 555384, 576000, 939924, 1063800, 1355820, 1659528, 2302704, 2206848, 3387744, 3557664, 4263468, 4961736, 6611736, 6043416, 8841960, 9005112, 10439424, 11761848, 15056124
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
REFERENCES
|
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 161.
|
|
LINKS
|
|
|
EXAMPLE
|
G.f. = 1 + 276*q^4 + 888*q^6 + ...
|
|
PROG
|
(Sage)
L = [ 1, 0, 276, 888, 3564, 8136, 16908, 30456, 58380, 74256, 145800, 186048, 265866, 363528, 555384, 576000]
e = DirichletGroup(18, QQ).0
M = ModularForms(e, 5)
bases = [_.q_expansion(40) for _ in M.integral_basis()]
f = sum(x*y for (x, y) in zip(bases, L)); list(f) # Andy Huchala, Jul 23 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|