A143910 Primes p with p+2^2, p+4^4, p+6^6, ..., p+16^16 prime.

597433, 1218277, 78432313, 163484407, 229205803, 301551427, 384490507, 629522587, 692824057, 893222647, 906769117, 1002618037, 1113319447, 1177252693, 1218963517, 1271129953, 1296796477, 1600630333, 1735141783, 1923577987, 2044791673, 2212880077, 2582822587

Offset

1,1

Links

Table of n, a(n) for n=1..23.

Mathematica

lst={}; Do[p=Prime[n]; If[PrimeQ[p+2^2]&& PrimeQ[p+4^4]&& PrimeQ[p+6^6]&& PrimeQ[p+8^8]&& PrimeQ[p+10^10]&& PrimeQ[p+12^12]&& PrimeQ[p+14^14]&& PrimeQ[p+16^16], AppendTo[lst, n]], {n, 2*10^7}]; lst
With[{pp=Table[n^n, {n, 2, 16, 2}]}, Select[Prime[Range[125270000]], AllTrue[ #+pp, PrimeQ]&]] (* Harvey P. Dale, Aug 10 2021 *)

Crossrefs

Sequence in context: A187643 A283956 A151435 * A206598 A022257 A237536

Adjacent sequences: A143907 A143908 A143909 * A143911 A143912 A143913

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Sep 04 2008

Extensions

Offset corrected, terms from a(7) on from Charles R Greathouse IV, Feb 03 2011

Status

approved