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 A004823 #22 Jul 03 2025 12:07:55 %S A004823 12,2059,4106,6153,8200,10247,12294,14341,16388,18435,20482,22529, %T A004823 24576,177158,179205,181252,183299,185346,187393,189440,191487,193534, %U A004823 195581,197628,199675,354304,356351,358398,360445,362492,364539,366586,368633,370680,372727,374774 %N A004823 Numbers that are the sum of 12 positive 11th powers. %H A004823 David A. Corneth, <a href="/A004823/b004823.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from T. D. Noe) %e A004823 From _David A. Corneth_, Aug 04 2020: (Start) %e A004823 208428902 is in the sequence as 208428902 = 1^11 + 2^11 + 3^11 + 3^11 + 3^11 + 4^11 + 4^11 + 4^11 + 5^11 + 5^11 + 5^11 + 5^11. %e A004823 562491247 is in the sequence as 562491247 = 2^11 + 2^11 + 2^11 + 2^11 + 2^11 + 3^11 + 4^11 + 5^11 + 5^11 + 5^11 + 5^11 + 6^11. %e A004823 620052034 is in the sequence as 620052034 = 3^11 + 3^11 + 3^11 + 4^11 + 4^11 + 4^11 + 5^11 + 5^11 + 5^11 + 5^11 + 5^11 + 6^11. (End) %t A004823 Select[Union[Total[#^11]&/@Tuples[Range[3],{12}]],#<+400000&] (* _Harvey P. Dale_, Apr 29 2011 *) %o A004823 (PARI) A004823_upto(N, n=12, p=11)=my(P=[x^p|x<-[1..sqrtnint(N-n+1, p)]], S=P); while(n--, S=Set(concat([[x+y|y<-S,x+y<=N]|x<-P])));S \\ _M. F. Hasler_, Jul 03 2025 %Y A004823 Cf. A008455 (eleventh powers), A003335 - A004812 (same for 3rd - 10th powers). %K A004823 nonn,easy %O A004823 1,1 %A A004823 _N. J. A. Sloane_