login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A116888 Primes p that remain prime through 4 iterations of the function f(p) = p^2 + 4. 3
306167, 48639197, 64695713, 68252687, 87788237, 87813293, 160486967, 255974437, 283032247, 324609913, 361705873, 417684523, 449364197, 451995587, 454052213, 466037563, 536504713, 574746467, 596095613 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
EXAMPLE
p = 306167, f(p) = 93738231893, f(f(p)) = 8786856118425842363453, f(f(f(p))) = 77208840445917661077402487029419236950083213 and the 88-digit number f(f(f(f(p)))) are all prime numbers.
MATHEMATICA
Select[Prime[Range[9! ]], PrimeQ[ #^2+4]&&PrimeQ[(#^2+4)^2+4]&&PrimeQ[((#^2+4)^2+4)^2+4]&&PrimeQ[(((#^2+4)^2+4)^2+4)^2+4]&] (* Vladimir Joseph Stephan Orlovsky, Feb 26 2010 *)
p4Q[p_]:=AllTrue[NestList[#^2+4&, p, 4], PrimeQ]; Select[Prime[Range[312*10^5]], p4Q] (* Harvey P. Dale, Nov 20 2023 *)
CROSSREFS
Sequence in context: A053849 A227780 A237950 * A270764 A236818 A234188
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 27 2006
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)