A246562 Primes p such that 4+p, 4+p^2, 4+p^3, 4+p^5, and 4+p^7 are all prime.

7, 469363, 2552713, 3378103, 6595597, 6629683, 39837517, 46024063, 46167307, 97371007, 97629403, 105528217, 136983307, 169483033, 202953613, 213792193, 216520987, 216738043, 221705647, 304033927, 317502193, 359133553

Offset

1,1

Comments

All terms are == {3, 7} mod 10. Subsequence of A246519.

Links

Zak Seidov, Table of n, a(n) for n = 1..60

Mathematica

Select[Prime[Range[193*10^5]], AllTrue[#^{1, 2, 3, 5, 7}+4, PrimeQ]&] (* Harvey P. Dale, Sep 07 2024 *)

Prog

(PARI)
forprime(p=1, 10^9, if(ispseudoprime(4+p) && ispseudoprime(4+p^2) && ispseudoprime(4+p^3) && ispseudoprime(4+p^5) && ispseudoprime(4+p^7), print1(p, ", "))) \\ Derek Orr, Aug 30 2014

Crossrefs

Cf. A007591, A073573, A125260, A172367, A246519.

Sequence in context: A003835 A138878 A050938 * A008849 A358812 A076914

Adjacent sequences: A246559 A246560 A246561 * A246563 A246564 A246565

Keyword

nonn

Author

Zak Seidov, Aug 29 2014

Status

approved