S000635


Numbers that are sums of consecutive sixth powers but not sixth powers.

65, 793, 794, 4825, 4889, 4890, 19721, 20450, 20514, 20515, 62281, 66377, 67106, 67170, 67171, 164305, 179930, 184026, 184755, 184819, 184820, 379793, 426449, 442074, 446170, 446899, 446963, 446964, 793585, 911234, 957890, 973515, 977611, 978340, 978404, 978405

1

S000635

T. D. Noe, Plot of 1000 terms

T. D. Noe, Table of 1000 terms

(Mma) nMax = 20; pwr = 6; t = Reap[Do[k = n; s = 0; While[s = s + k^pwr; s <= nMax^pwr, Sow[s]; k++], {n, nMax}]]; t = Union[t[[2, 1]]]; Complement[t, Range[0, nMax]^pwr]

Cf. A217846, S000627-S000636.

nonn,nice

T. D. Noe, May 14 2015

© Tony D Noe 2014-2015