OFFSET
1,1
COMMENTS
3^3+4^3+5^3+6^3=432, 9^3+10^3+11^3+12^3=4788,..
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10276
MATHEMATICA
mx=500; mz=mx^3+(mx+1)^3; lst={}; Do[p=q^3; Do[p+=n^3; If[PrimeQ[p-1]&&PrimeQ[p+1], If[p>mz, Break[]]; AppendTo[lst, p]], {n, q+1, mx+1}], {q, 1, mx}]; Union@lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Mar 27 2010
STATUS
approved