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

Author

Robert G. Wilson v, Jul 29 2025

Keywords

• nonn

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.

Crossrefs

Cf. A000578, A003072, A023042, A274334.

Programs

Mathematica

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