login
A163421
Primes of the form ((p-1)/2)^3+((p+1)/2), p are prime numbers.
10
3, 11, 31, 131, 223, 521, 739, 3391, 5851, 9283, 24419, 27031, 59359, 68963, 85229, 110641, 148931, 157519, 175673, 328579, 405299, 571871, 857471, 1561013, 1728121, 2248223, 2460511, 3112283, 3581731, 3724031, 4741801, 5735519
OFFSET
1,1
COMMENTS
Subsequence of A095692.
((3-1)/2)^3+((3+1)/2)=1+2=3, ((5-1)/2)^3+((5+1)/2)=8+3=11, ((7-1)/2)^3+((7+1)/2)=27+4=31,..
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
EXTENSIONS
Comment from Charles R Greathouse IV Aug 11 2009
STATUS
approved