A062538 Primes of form 4*n! + 1.

5, 97, 20161, 161281, 1451521, 24908083201, 83691159552001, 1219553378446855442006016000001, 923374789356965521888370970732110324333114258287231764529152000000000001

Offset

1,1

Links

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

Example

4*4! + 1 = 97, a prime.

Mathematica

lst={}; Do[p=4*n!+1; If[PrimeQ[p], AppendTo[lst, p]], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jan 28 2009 *)
Select[(4Range[60]!+1), PrimeQ] (* Harvey P. Dale, May 08 2024 *)

Prog

(PARI) for(n=1, 55, if(isprime(4*n!+1), print(4*n!+1)))

Crossrefs

Sequence in context: A117341 A295190 A202516 * A350874 A053980 A215299

Adjacent sequences: A062535 A062536 A062537 * A062539 A062540 A062541

Keyword

nonn,changed

Author

Jason Earls, Jul 10 2001

Status

approved