OFFSET
1,1
COMMENTS
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10000 (terms for n = 1..429 from Zak Seidov)
EXAMPLE
6^3 = 216 = 107 + 109.
MATHEMATICA
Surd[#, 3]&/@Select[Total/@Partition[Prime[Range[150*10^6]], 2, 1], IntegerQ[ Surd[#, 3]]&] (* Harvey P. Dale, Jun 05 2018 *)
PROG
(Python)
from sympy import nextprime, prevprime
A074925_list = [i for i in range(2, 10**4, 2) if prevprime(i**3//2) + nextprime(i**3//2) == i**3] # Chai Wah Wu, Feb 22 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 02 2002
EXTENSIONS
More terms from Zak Seidov, Jul 22 2009
STATUS
approved