A385364 Numbers whose cube is the sum of four distinct nonnegative cubes.

13, 14, 18, 20, 23, 24, 26, 28, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 59, 60, 62, 63, 64, 65, 66, 67, 68, 69, 70, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95

Offset

1,1

Comments

Numbers v such that v^3 = w^3+x^3+y^3+z^3, w>x>y>z>=0, is soluble.

Inspired by A023042.

Links

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

Mathematica

fQ[n_] := Length[ Select[ PowersRepresentations[ n^3, 4, 3], Union@# == # && #[[1]] > 0 &]] > 0; Select[ Range@ 95, fQ]

Crossrefs

Cf. A000578, A003072, A023042, A274334.

Sequence in context: A135024 A173036 A241749 * A388076 A098045 A293817

Adjacent sequences: A385361 A385362 A385363 * A385365 A385366 A385367

Keyword

nonn

Author

Robert G. Wilson v, Jul 29 2025

Status

approved