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 A003365 #23 Apr 24 2023 12:12:44 %S A003365 9,72,135,198,261,324,387,450,513,576,737,800,863,926,989,1052,1115, %T A003365 1178,1241,1465,1528,1591,1654,1717,1780,1843,1906,2193,2256,2319, %U A003365 2382,2445,2508,2571,2921,2984,3047,3110,3173,3236,3649,3712,3775,3838,3901,4104,4167,4230 %N A003365 Numbers that are the sum of 9 positive 6th powers. %H A003365 David A. Corneth, <a href="/A003365/b003365.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from T. D. Noe) %e A003365 From _David A. Corneth_, Aug 03 2020: (Start) %e A003365 124882 is in the sequence as 124882 = 2^6 + 2^6 + 2^6 + 2^6 + 2^6 + 5^6 + 5^6 + 6^6 + 6^6. %e A003365 188939 is in the sequence as 188939 = 2^6 + 2^6 + 3^6 + 3^6 + 3^6 + 6^6 + 6^6 + 6^6 + 6^6. %e A003365 257236 is in the sequence as 257236 = 3^6 + 3^6 + 4^6 + 4^6 + 4^6 + 4^6 + 4^6 + 7^6 + 7^6. (End) %t A003365 Reap[For[n = 1, n <= 3000, n++, If[AnyTrue[PowersRepresentations[n, 9, 6], First[#] > 0&], Print[n]; Sow[n]]]][[2, 1]] (* _Jean-François Alcover_, Jul 18 2017 *) %Y A003365 Cf. A001014 (sixth powers). %K A003365 nonn,easy %O A003365 1,1 %A A003365 _N. J. A. Sloane_