The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A137632 Sums of 2 cubes of distinct odd primes. 1
 152, 370, 468, 1358, 1456, 1674, 2224, 2322, 2540, 3528, 4940, 5038, 5256, 6244, 6886, 6984, 7110, 7202, 8190, 9056, 11772, 12194, 12292, 12510, 13498, 14364, 17080, 19026, 24416, 24514, 24732, 25720, 26586, 29302, 29818, 29916, 30134 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..37. EXAMPLE 3^3 + 5^3 = 152 = a(1). 3^3 + 7^3 = 370 = a(2). 5^3 + 7^3 = 468 = a(3). MAPLE A137632 := proc(amax) local a, p, q; a := {} ; p := 3 ; while p^3 < amax do q := nextprime(p) ; while p^3+q^3 < amax do a := a union {p^3+q^3} ; q := nextprime(q) ; od: p := nextprime(p) ; od: sort(convert(a, list)) ; end: A137632(80000) ; # R. J. Mathar, May 04 2008 MATHEMATICA f[upto_]:=Module[{max=Ceiling[Power[upto-27, (3)^-1]], prs}, prs=Prime[Range[2, max]]; Select[Union[Total/@(Subsets[prs, {2}]^3)], #<=upto&]]; f[31000] (* Harvey P. Dale, Apr 20 2011 *) CROSSREFS A subset of A120398 and A086119. Cf. A138853, A138854. Sequence in context: A252363 A248816 A038857 * A259740 A253359 A226365 Adjacent sequences: A137629 A137630 A137631 * A137633 A137634 A137635 KEYWORD nonn AUTHOR M. F. Hasler, Apr 13 2008 EXTENSIONS More terms from R. J. Mathar, Apr 13 2008, May 04 2008 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 15 02:31 EDT 2024. Contains 375930 sequences. (Running on oeis4.)