This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A015233 #13 Jul 24 2021 01:08:27
%S A015233 1,0,180,416,1620,3024,6404,9408,18876,20048,43224,45408,70462,82272,
%T A015233 138408,121600,213972,210816,298620,310176,472464,391376,675168,
%U A015233 604032,794524,808512,1208568,949568,1533048,1361328,1781632,1719744,2435580,1916336,3092616
%N A015233 Theta series of lattice Kappa_9.
%D A015233 J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 161.
%H A015233 Andy Huchala, <a href="/A015233/b015233.txt">Table of n, a(n) for n = 0..1500</a>
%H A015233 G. Nebe and N. J. A. Sloane, <a href="http://www.math.rwth-aachen.de/~Gabriele.Nebe/LATTICES/KAPPA9.html">Home page for this lattice</a>
%e A015233 G.f. = 1 + 180*q^4 + 416*q^6 + ...
%o A015233 (Magma)
%o A015233 L := (Lattice("Kappa", 9));
%o A015233 B := Basis(ThetaSeriesModularFormSpace(L), 100);
%o A015233 S := [1, 0, 180, 416, 1620, 3024, 6404, 9408, 18876, 20048, 43224, 45408, 70462, 82272, 138408, 121600, 213972, 210816, 298620, 310176, 472464, 391376, 675168, 604032, 794524, 808512, 1208568, 949568, 1533048, 1361328, 1781632, 1719744, 2435580, 1916336];
%o A015233 Coefficients(&+[B[i] * S[i] : i in [1..34]]); // _Andy Huchala_, Jul 23 2021
%K A015233 nonn
%O A015233 0,3
%A A015233 _N. J. A. Sloane_
%E A015233 a(16)-a(25) from _Sean A. Irvine_, Feb 28 2020
%E A015233 More terms from _Andy Huchala_, Jul 23 2021