A085320 First difference sequence of A003349, i.e., consecutive differences between those consecutive numbers which are sums of four 5th powers.

31, 31, 31, 31, 118, 31, 31, 31, 149, 31, 31, 180, 31, 211, 55, 31, 31, 31, 149, 31, 31, 180, 31, 211, 297, 31, 31, 180, 31, 211, 539, 31, 24, 31, 31, 31, 94, 55, 31, 31, 180, 31, 211, 242, 55, 31, 31, 180, 31, 211, 539, 31, 211, 781, 55, 31, 31, 180, 31, 211, 539, 31

Offset

1,1

Links

Table of n, a(n) for n=1..62.

Example

35 = 1 + 1 + 1 + 32, 66 = 32 + 32 + 1 + 1, a(1) = 66 - 33 = 31.
Certain differences occur rather consequently like 31, 55, 113, 180, 207, 211, 539, etc.;
Distance of closest observed neighbors equals 2 like those of 33858 and 33856.

Mathematica

{m=12, k=5, m^k}; t=Union[Flatten[Table[Table[Table[Table[w^k+q^k+t^k+u^k, {w, 1, m}], {q, 1, m}], {t, 1, m}], {u, 1, m}]]]; Length[t]; dt=Delete[ -RotateRight[t]+t, 1]; Sort[dt]

Crossrefs

Cf. A003349, A003327-A003399.

Sequence in context: A009734 A010870 A003892 * A140718 A040931 A022365

Adjacent sequences: A085317 A085318 A085319 * A085321 A085322 A085323

Keyword

nonn

Author

Labos Elemer, Jul 01 2003

Status

approved