OFFSET
1,1
COMMENTS
By parity, there must be an odd number of odds in the sum. Hence this sequence is the union of primes which are the sum of seven odd cubes (such as 7 = 1^3 + 1^3 + 1^3 + 1^3 + 1^3 + 1^3 + 1^3); primes which are the sum of an two even and five odd cubes (such as 229 = 1^3 + 1^3 + 1^3 + 1^3 + 1^3 + 2^3 + 6^3); primes which are the sum of the cube of four even numbers and the cubes of three odd numbers (such as 61 = 1^3 + 1^3 + 2^3 + 2^3 + 2^3 + 2^3 + 3^3); and the primes which are the sum of the cube of an odd number and the cubes of six even numbers (such as 173 = 2^3 + 2^3 + 2^3 + 2^3 + 2^3 + 2^3 + 5^3). A subset of this sequence is the primes which are the sum of the cubes of seven distinct primes (i.e. of the form p^3 + q^3 + r^3 + s^3 + t^3 + u^3 + v^3 for p, q, r, s, t, u, v distinct odd primes) such as 112759 = 3^3 + 5^3 + 7^3 + 11^3 + 13^3 + 17^3 + 47^3. Another subsequence is the primes which are the sum of seven cubes in two different ways, or three different ways. No prime can be the sum of two cubes (by factorization of the sum of two cubes).
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 7 = 1^3 + 1^3 + 1^3 + 1^3 + 1^3 + 1^3 + 1^3.
a(4) = 61 = 1^3 + 1^3 + 2^3 + 2^3 + 2^3 + 2^3 + 3^3.
MATHEMATICA
nn=500; lim = Floor[(nn-6)^(1/3)]; Select[Union[Total /@ Tuples[Range[lim]^3, {7}]], # <= nn && PrimeQ[#] &] (* Harvey P. Dale, Mar 13 2011 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Sep 23 2006
EXTENSIONS
More terms from R. J. Mathar, Jun 13 2007
STATUS
approved