A004808 Numbers that are the sum of 8 positive 10th powers.

8, 1031, 2054, 3077, 4100, 5123, 6146, 7169, 8192, 59056, 60079, 61102, 62125, 63148, 64171, 65194, 66217, 118104, 119127, 120150, 121173, 122196, 123219, 124242, 177152, 178175, 179198, 180221, 181244, 182267, 236200, 237223, 238246, 239269, 240292, 295248, 296271, 297294

Offset

1,1

Links

David A. Corneth, Table of n, a(n) for n = 1..10000 (first 1000 terms from T. D. Noe)

Example

1031 = 2^10 + 7 * 1^10 is a term.
From David A. Corneth, Aug 04 2020: (Start)
283583902 is in the sequence as 283583902 = 1^10 + 1^10 + 1^10 + 1^10 + 2^10 + 3^10 + 4^10 + 7^10.
493229701 is in the sequence as 493229701 = 3^10 + 5^10 + 5^10 + 5^10 + 6^10 + 6^10 + 6^10 + 7^10.
1256366075 is in the sequence as 1256366075 = 3^10 + 3^10 + 3^10 + 4^10 + 6^10 + 6^10 + 6^10 + 8^10. (End)

Mathematica

k = 8; p = 10; amax = 10^6; bmax = amax^(1/p) // Ceiling; Clear[b]; b[0] = 1; Select[Table[Total[Array[b, k]^p], {b[1], b[0], bmax}, Evaluate[ Sequence @@ Table[{b[j], b[j-1], bmax}, {j, 1, k}]]] //Flatten // Union, # <= amax&] (* Jean-François Alcover, Jul 19 2017 *)

Crossrefs

Cf. A008454 (tenth powers).

Sequence in context: A360773 A122067 A076688 * A320981 A316395 A176372

Adjacent sequences: A004805 A004806 A004807 * A004809 A004810 A004811

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved