A154821 Primes p such that p+p^2+p^3-+2 are also prime.

3, 7, 13, 139, 283, 1063, 1759, 1999, 2719, 2917, 3109, 3583, 4057, 4297, 4723, 5059, 5623, 5749, 6079, 6823, 8707, 9199, 9949, 12697, 15193, 15319, 15607, 16249, 16267, 16993, 17827, 18679, 18793, 20359, 20887, 21727, 22147, 23677, 24019, 24169

Offset

1,1

Comments

3+9+27=39-+2=primes,...

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Mathematica

lst={}; Do[p=Prime[n]; If[PrimeQ[p+p^2+p^3-2]&&PrimeQ[p+p^2+p^3+2], AppendTo[lst, p]], {n, 8!}]; lst
Select[Prime[Range[3000]], AllTrue[#+#^2+#^3+{2, -2}, PrimeQ]&] (* Harvey P. Dale, Nov 30 2022 *)

Crossrefs

Sequence in context: A082718 A221211 A322301 * A353008 A084741 A135623

Adjacent sequences: A154818 A154819 A154820 * A154822 A154823 A154824

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 15 2009

Extensions

Definition clarified by Harvey P. Dale, Nov 30 2022

Status

approved