|
| |
|
|
A008450
|
|
Theta series of A_10 lattice.
|
|
0
|
|
|
|
1, 110, 1980, 10230, 30140, 79992, 155100, 302280, 487080, 839630, 1188660, 1845360, 2494470, 3610200, 4548060, 6490374, 7786790, 10545480, 12579600, 16461720, 19071162, 24859560, 27742440, 35347950, 39926040, 49393014, 54115380, 67987150
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
REFERENCES
|
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 110.
|
|
|
LINKS
|
Table of n, a(n) for n=0..27.
|
|
|
MATHEMATICA
|
terms = 23; f[q_] = LatticeData["A10", "ThetaSeriesFunction"][-I Log[q]/Pi]; s = Normal[Series[f[q], {q, 0, 2 terms}]]; Partition[ CoefficientList[s, q] , 2][[All, 1]][[1 ;; terms]] // Round (* Jean-François Alcover, Jul 07 2017 *)
|
|
|
CROSSREFS
|
Sequence in context: A358256 A200877 A205348 * A163729 A251020 A245876
Adjacent sequences: A008447 A008448 A008449 * A008451 A008452 A008453
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
EXTENSIONS
|
More terms from Sean A. Irvine, Jun 12 2019
|
|
|
STATUS
|
approved
|
| |
|
|
