Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A004008
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A004008 Expansion of theta series of E_7 lattice in powers of q^2.
(Formerly M5388)
+0
2
1, 126, 756, 2072, 4158, 7560, 11592, 16704, 24948, 31878, 39816, 55944, 66584, 76104, 99792, 116928, 133182, 160272, 177660, 205128, 249480, 265104, 281736, 350784, 382536, 390726, 470232, 505568, 532800, 615384, 640080, 701568, 799092 (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. 125. Equation (112)

LINKS

G. Nebe and N. J. A. Sloane, Home page for this lattice

FORMULA

Expansion of phi(q)^3*(phi(q)^4 +7*16*q*psi(q^2)^4) in powers of q where phi(),psi() are Ramanujan theta functions. - Michael Somos Oct 24 2006

EXAMPLE

1 + 126*q^2 + 756*q^4 + 2072*q^6 + 4158*q^8 + 7560*q^10 + 11592*q^12 + ...

PROGRAM

(PARI) {a(n)=local(A); if(n<0, 0, A=sum(k=1, sqrtint(n), 2*x^k^2, 1+x*O(x^n)); polcoeff( 8*A^7 -7*A^3*subst(A, x, -x)^4, n))} /* Michael Somos Oct 24 2006 */

(PARI) {a(n)= if(n<1, n==0, 2*qfrep([2, -1, 0, 0, 0, 0, 0; -1, 2, -1, 0, 0, 0, 0; 0, -1, 2, -1, 0, 0, 0; 0, 0, -1, 2, -1, 0, -1; 0, 0, 0, -1, 2, -1, 0; 0, 0, 0, 0, -1, 2, 0; 0, 0, 0, -1, 0, 0, 2], n, 1)[n])} /* Michael Somos Jun 11 2007 */

CROSSREFS

Sequence in context: A154039 A165023 A107658 this_sequence A126170 A151989 A104678

Adjacent sequences: A004005 A004006 A004007 this_sequence A004009 A004010 A004011

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com).

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 22 20:51 EST 2009. Contains 167312 sequences.


AT&T Labs Research