A385094 Primes that are the sum of distinct positive cubes.

73, 197, 251, 281, 307, 349, 379, 433, 443, 503, 521, 541, 547, 577, 587, 631, 659, 673, 701, 709, 719, 757, 821, 827, 829, 853, 863, 881, 883, 919, 947, 953, 1009, 1091, 1097, 1153, 1163, 1171, 1217, 1223, 1231, 1249, 1277, 1289, 1297, 1307, 1361, 1367, 1423, 1433, 1439, 1483, 1493

Offset

1,1

Comments

12101 is the largest of 421 primes not in this sequence.

Links

Zhining Yang, Table of n, a(n) for n = 1..1030

Formula

For n > 1027, a(n) = prime(n + 421).

Example

757 is in the sequence because prime 757 = 1^3 + 3^3 + 9^3 = 1^3 + 2^3 + 4^3 + 5^3 + 6^3 + 7^3.

Mathematica

m = 15; a = {0}; Do[a = Select[Union[a, a + k^3], # < m^3 &], {k, m}];
a = Select[PrimeQ]@a

Crossrefs

Cf. A003997, A122723.

Sequence in context: A088199 A140010 A392469 * A122723 A089786 A142894

Adjacent sequences: A385091 A385092 A385093 * A385095 A385096 A385097

Keyword

nonn,easy

Author

Zhining Yang, Jun 17 2025

Status

approved