OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1500
EXAMPLE
((5+1)/2)^3 + ((5-1)/2) = 27 + 2 = 29;
((7+1)/2)^3 + ((7-1)/2) = 64 + 3 = 67.
MATHEMATICA
f[n_]:=((p+1)/2)^3+((p-1)/2); lst={}; Do[p=Prime[n]; If[PrimeQ[f[p]], AppendTo[lst, f[p]]], {n, 6!}]; lst
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 27 2009
EXTENSIONS
Checked by Charles R Greathouse IV, Aug 11 2009
STATUS
approved