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 A128690 #19 May 20 2023 05:32:43
%S A128690 1,8,24,32,48,96,104,144,192,312,336,576,768,960,1152,1344,1872,1920,
%T A128690 2496,2976,3072,3744,4608,5760,6912,7680,8064,9672,10368,10752,11520,
%U A128690 14976,15360,17424,17784,18432,22464,23808,26208,29760,29952,32832,33696,34944,35712,37440,46080
%N A128690 Records in A000118.
%H A128690 David A. Corneth, <a href="/A128690/b128690.txt">Table of n, a(n) for n = 1..392</a>
%F A128690 a(n) = A000118(A128689(n)). - _Michel Marcus_, May 19 2023
%t A128690 f[n_] := SquaresR[4, n];
%t A128690 Module[{record = -1, n}, Reap[For[n = 0, n <= 2000, n++, If[f[n] > record, record = f[n]; Sow[record]]]][[2, 1]]] (* _Jean-François Alcover_, May 18 2023 *)
%Y A128690 Cf. A000118 (number of ways of writing n as a sum of 4 squares), A128689.
%K A128690 nonn
%O A128690 1,2
%A A128690 _Jonathan Vos Post_, Mar 21 2007
%E A128690 Data corrected by _Giovanni Resta_, Jun 18 2016
%E A128690 More terms from _Jean-François Alcover_, May 18 2023