A119662 Primes of the form k! + k^2 + 1.
2, 3, 7, 41, 757
Offset: 1
Keywords
Programs
-
Magma
[ a: n in [0..1150] | IsPrime(a) where a is Factorial(n)+n^2+1 ]; // Vincenzo Librandi, Dec 22 2010
-
Mathematica
lst={}; Do[s=n!+n^2;If[PrimeQ[p=s+1], AppendTo[lst, p]], {n, 0, 5!}];lst (* Vladimir Joseph Stephan Orlovsky, Sep 27 2008 *)
Comments