A217849 Numbers which are the sums of consecutive ninth powers.
0, 1, 512, 513, 19683, 20195, 20196, 262144, 281827, 282339, 282340, 1953125, 2215269, 2234952, 2235464, 2235465, 10077696, 12030821, 12292965, 12312648, 12313160, 12313161, 40353607, 50431303, 52384428, 52646572, 52666255, 52666767, 52666768, 134217728
Offset: 1
Keywords
Links
- T. D. Noe, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
nMax = 10^9; t = {0}; Do[k = n; s = 0; While[s = s + k^9; s <= nMax, AppendTo[t, s]; k++], {n, nMax^(1/9)}]; t = Union[t]