|
Search: id:A004007
|
|
|
| A004007 |
|
Theta series of E_6 lattice. (Formerly M5349)
|
|
+0 3
|
|
| 1, 72, 270, 720, 936, 2160, 2214, 3600, 4590, 6552, 5184, 10800, 9360, 12240, 13500, 17712, 14760, 25920, 19710, 26064, 28080, 36000, 25920, 47520, 37638, 43272, 45900, 59040, 46800, 75600, 51840, 69264, 73710, 88560, 62208, 108000, 85176
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
REFERENCES
|
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 123.
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n=0..1000
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.
G. Nebe and N. J. A. Sloane, Home page for this lattice
|
|
FORMULA
|
Expansion of eta(q)^9/eta(q^3)^3 + 81*q*eta(q^3)^9/eta(q)^3 in powers of q.
Expansion of a(q)^3 +2*c(q)^3 in powers of q where a(),c() are cubic AGM analog functions. - Michael Somos Oct 24 2006
|
|
PROGRAM
|
(PARI) {a(n)=local(A); if(n<0, 0, A=x*O(x^n); polcoeff( eta(x+A)^9/eta(x^3+A)^3 +81*x*eta(x^3+A)^9/eta(x+A)^3, n))} /* Michael Somos Oct 24 2006 */
|
|
CROSSREFS
|
Cf. A005129 (dual lattice).
Sequence in context: A019507 A158488 A165139 this_sequence A157909 A107314 A090788
Adjacent sequences: A004004 A004005 A004006 this_sequence A004008 A004009 A004010
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
Search completed in 0.002 seconds
|