|
%I #18 Aug 04 2020 14:58:17
%S 10,73,136,199,262,325,388,451,514,577,640,738,801,864,927,990,1053,
%T 1116,1179,1242,1305,1466,1529,1592,1655,1718,1781,1844,1907,1970,
%U 2194,2257,2320,2383,2446,2509,2572,2635,2922,2985,3048,3111,3174,3237,3300,3650,3713,3776
%N Numbers that are the sum of 10 positive 6th powers.
%H David A. Corneth, <a href="/A003366/b003366.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from T. D. Noe)
%e From _David A. Corneth_, Aug 03 2020: (Start)
%e 98143 is in the sequence as 98143 = 1^6 + 1^6 + 1^6 + 1^6 + 1^6 + 1^6 + 3^6 + 4^6 + 6^6 + 6^6.
%e 145526 is in the sequence as 145526 = 1^6 + 1^6 + 1^6 + 1^6 + 3^6 + 3^6 + 4^6 + 6^6 + 6^6 + 6^6.
%e 173624 is in the sequence as 173624 = 3^6 + 3^6 + 3^6 + 5^6 + 5^6 + 5^6 + 5^6 + 5^6 + 6^6 + 6^6. (End)
%t With[{nn=3},Select[Total/@Tuples[Range[nn]^6,10]//Union,#<=(nn+1)^6+9&]] (* _Harvey P. Dale_, Dec 17 2019 *)
%Y Cf. A001014 (sixth powers).
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_
|
