A162603 Primes of the form k^k - k! + 1.
3, 233, 9996371201, 11111919647266817
Offset: 1
Keywords
Examples
2^2-2!+1 = 4-2+1 = 3, 4^4-4!+1 = 256-24+1 = 233, ...
Crossrefs
Primes of the form A036679(k)+1.
Programs
-
Mathematica
f[n_]:=n^n-n!+1; lst={};Do[p=f[n];If[PrimeQ[p],AppendTo[lst,p]],{n,2*5!}];lst Select[Table[n^n-n!+1,{n,30}],PrimeQ] (* Harvey P. Dale, Jun 03 2014 *)
Comments