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 A015236 #17 Jul 19 2021 01:57:02
%S A015236 1,0,92,64,436,320,1248,640,2476,1024,5080,1984,6170,2944,11704,3840,
%T A015236 13860,6144,19964,7744,24064,8768,36944,12800,33888,15360,54808,16768,
%U A015236 57176,22464,71416,25984,79628,27648,107128,35840,93844,41984,143888,42112,137720
%N A015236 Theta series of lattice Kappa_7.
%D A015236 J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 161.
%H A015236 Andy Huchala, <a href="/A015236/b015236.txt">Table of n, a(n) for n = 0..1880</a>
%H A015236 G. Nebe and N. J. A. Sloane, <a href="http://www.math.rwth-aachen.de/~Gabriele.Nebe/LATTICES/KAPPA7.html">Home page for this lattice</a>
%e A015236 G.f. = 1 + 92*q^4 + 64*q^6 + ...
%o A015236 (Magma)
%o A015236 L := (Lattice("Kappa", 7));
%o A015236 B := Basis(ThetaSeriesModularFormSpace(L), 30);
%o A015236 S := [1, 0, 92, 64, 436, 320, 1248, 640, 2476, 1024, 5080, 1984, 6170, 2944, 11704, 3840, 13860, 6144, 19964, 7744, 24064, 8768, 36944, 12800, 33888, 15360];
%o A015236 Coefficients(&+[B[i] * S[i] : i in [1..26]]); // _Andy Huchala_, Jul 18 2021
%K A015236 nonn
%O A015236 0,3
%A A015236 _N. J. A. Sloane_
%E A015236 More terms from _Sean A. Irvine_, Feb 25 2020