login
A154824
Primes p of the form : p+p^2+p^3-+2=primes and p+p^2+p^3-+8=primes.
0
3, 356647, 500719, 562759, 784513, 837307, 902017, 1003963, 1258903, 1456519, 1893427, 2157457, 2597953, 5771587, 6757843, 6842503, 7731133, 10035397, 11155957, 11929849, 12276643, 13395727, 14139283, 15609367, 16675003
OFFSET
1,1
COMMENTS
3+9+27=39-+2=primes, 3+9+27=39-+8=primes,...
MATHEMATICA
lst={}; Do[p=Prime[n]; If[PrimeQ[p+p^2+p^3-2]&&PrimeQ[p+p^2+p^3+2]&&PrimeQ[p+p^2+p^3-8]&&PrimeQ[p+p^2+p^3+8], AppendTo[lst, p]], {n, 3*9!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved