login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A005878 Theta series of cubic lattice with respect to deep hole.
(Formerly M4496)
6

%I M4496 #32 Dec 01 2017 03:01:55

%S 8,24,24,32,48,24,48,72,24,56,72,48,72,72,48,48,120,72,56,96,24,120,

%T 120,48,96,96,72,96,120,48,104,168,96,48,120,72,96,192,72,144,96,72,

%U 144,120,96,104,192,72,120,192,48,144,216,48,96,120,144,192,168,120,96,216,72

%N Theta series of cubic lattice with respect to deep hole.

%C Number of ways of writing 8*n+3 as the sum of three odd squares. - Herman Jamke (hermanjamke(AT)fastmail.fm), Feb 23 2008

%C Expansion of Jacobi theta constant theta_2^3. - Herman Jamke (hermanjamke(AT)fastmail.fm), Feb 23 2008

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

%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

%H G. C. Greubel, <a href="/A005878/b005878.txt">Table of n, a(n) for n = 0..1000</a> (terms 0..99 from Herman Jamke (hermanjamke(AT)fastmail.fm))

%H G. Nebe and N. J. A. Sloane, <a href="http://www.math.rwth-aachen.de/~Gabriele.Nebe/LATTICES/cubicP.html">Home page for this lattice</a>

%F G.f.: Form (Sum_{n=-inf..inf} q^((2n+1)^2))^3, then divide by q^3 and set q = x^(1/8).

%F a(n) = 8 * A008443(n).

%t QP = QPochhammer; CoefficientList[(2 QP[q^2]^2/QP[q])^3 + O[q]^63, q] (* _Jean-François Alcover_, Jul 04 2017 *)

%o (PARI) {a(n)=if(n<0, 0, 8*polcoeff( sum(k=0, (sqrtint(8*n+1)-1)\2, x^((k^2+k)/2), x*O(x^n))^3, n))} {a(n)=local(A); if(n<0, 0, A=x*O(x^n); 8*polcoeff( (eta(x^2+A)^2/eta(x+A))^3, n))} \\ Herman Jamke (hermanjamke(AT)fastmail.fm), Feb 23 2008

%Y Equals 8 times A008443. Cf. A085121.

%K nonn,easy

%O 0,1

%A _N. J. A. Sloane_

%E More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), Feb 23 2008

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 16:05 EDT 2024. Contains 371254 sequences. (Running on oeis4.)