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 A046048 #28 Feb 16 2025 08:32:38 %S A046048 47,62,77,127,142,157,207,222,237,287,302,317,367,382,397,447,462,477, %T A046048 527,542,557,607,622,687,702,752,767,782,847,862,927,942,992,1007, %U A046048 1022,1087,1102,1167,1182,1232,1247,1327,1407,1487,1567,1647,1727,1807,2032 %N A046048 Numbers that are the sum of 17 but no fewer nonzero fourth powers. %C A046048 a(65) = 13792 is the last term of this sequence; see A099591 for further references. %H A046048 T. D. Noe, <a href="/A046048/b046048.txt">Table of n, a(n) for n= 1..65</a> (full sequence) %H A046048 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/BiquadraticNumber.html">Biquadratic Number</a>. %e A046048 62 is the sum of 17 4th powers and no fewer, so 62 is a term. %e A046048 63 is the sum of 18 4th powers and no fewer, so 63 is not a term, although it is a term of A099591. %t A046048 lim = 2100; f[n_] := f[n] = (k = 0; While[k++; k <= 17 && PowersRepresentations[n, k, 4] == {}]; k); Select[Range[lim], f[#] == 17 &] (* _Jean-François Alcover_, Sep 08 2011 *) %Y A046048 Cf. A000583, A002377, A046047, A099591. %K A046048 nonn,fini,full,nice %O A046048 1,1 %A A046048 _Eric W. Weisstein_ %E A046048 More terms from Arlin Anderson (starship1(AT)gmail.com)