login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A004810 Numbers that are the sum of 10 positive 10th powers. 32
10, 1033, 2056, 3079, 4102, 5125, 6148, 7171, 8194, 9217, 10240, 59058, 60081, 61104, 62127, 63150, 64173, 65196, 66219, 67242, 68265, 118106, 119129, 120152, 121175, 122198, 123221, 124244, 125267, 126290, 177154, 178177, 179200, 180223, 181246, 182269, 183292, 184315 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

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

EXAMPLE

From David A. Corneth, Aug 03 2020: (Start)

72332028 is in the sequence as 72332028 = 1^10 + 1^10 + 1^10 + 2^10 + 2^10 + 2^10 + 4^10 + 4^10 + 5^10 + 6^10.

243962883 is in the sequence as 243962883 = 1^10 + 1^10 + 1^10 + 2^10 + 4^10 + 4^10 + 6^10 + 6^10 + 6^10 + 6^10.

312998872 is in the sequence as 312998872 = 1^10 + 2^10 + 3^10 + 3^10 + 3^10 + 4^10 + 5^10 + 5^10 + 5^10 + 7^10. (End)

MATHEMATICA

M = 1413602992; m = M^(1/10) // Ceiling; Reap[

For[a = 1, a <= m, a++, For[b = a, b <= m, b++, For[c = b, c <= m, c++,

For[d = c, d <= m, d++, For[e = d, e <= m, e++, For[f = e, f <= m, f++,

For[g = f, g <= m, g++, For[h = g, h <= m, h++, For[i = h, i <= m, i++,

For[j = i, j <= m, j++,

s = a^10 + b^10 + c^10 + d^10 + e^10 + f^10 + g^10 + h^10 + i^10 + j^10;

If[s <= M, Sow[s]]]]]]]]]]]]][[2, 1]] // Union (* Jean-Fran├žois Alcover, Dec 01 2020 *)

CROSSREFS

Cf. A008454.

Column k=10 of A336725.

Sequence in context: A166507 A103623 A145184 * A225604 A208560 A263311

Adjacent sequences:  A004807 A004808 A004809 * A004811 A004812 A004813

KEYWORD

nonn,easy

AUTHOR

N. J. A. Sloane

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 21 00:18 EDT 2021. Contains 348119 sequences. (Running on oeis4.)