A217844 Numbers which are the sums of consecutive fourth powers.

0, 1, 16, 17, 81, 97, 98, 256, 337, 353, 354, 625, 881, 962, 978, 979, 1296, 1921, 2177, 2258, 2274, 2275, 2401, 3697, 4096, 4322, 4578, 4659, 4675, 4676, 6497, 6561, 7793, 8418, 8674, 8755, 8771, 8772, 10000, 10657, 13058, 14354, 14641, 14979, 15235, 15316

Offset: 1

Author

T. D. Noe, Oct 23 2012

Keywords

• nonn

Links

• T. D. Noe, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A034705, A217843-A217850.

Programs

Mathematica

nMax = 20000; t = {0}; Do[k = n; s = 0; While[s = s + k^4; s <= nMax, AppendTo[t, s]; k++], {n, nMax^(1/4)}]; t = Union[t]