OFFSET
0,2
COMMENTS
Sizes of clusters of atoms in diamond structure.
REFERENCES
N. J. A. Sloane, Theta-Series and Magic Numbers for Diamond and Certain Ionic Crystal Structures, J. Math. Phys., 28 (1987), pp. 1653-1657.
PROG
(PARI) lista(m) = {nm = sqrtint(m)+1; T2 = sum(i=0, nm, 2*x^((i+1/2)^2 - 1/4)); T23 = T2^3; T3 = 1+ sum(i=1, nm, 2*x^(i^2)); T4 = subst(T3, x, -x); T33 = T3^3; T334 = sum(i=0, m, polcoeff(T33, i)*x^(4*i)); T43 = T4^3; T434 = sum(i=0, m, polcoeff(T43, i)*x^(4*i)); P = sum(i=0, poldegree(T23), polcoeff(T23, i)*x^(numerator(i+3/4))); D = (P + T334 + T434)/2; s = 0; for (i=0, m, v = polcoeff(D, i); if (v != 0, s += v; print1(s, ", "); ); ); } \\ Michel Marcus, Feb 19 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 05 2012
EXTENSIONS
More terms from Michel Marcus, Feb 19 2013
STATUS
approved