|
%I #15 Mar 03 2014 15:35:25
%S 2,5,3011,45943
%N Primes of the form n^n-n!+n+1.
%C The next terms are too large to be displayed:
%C a(5)= 1158^1158-1158!+1158+1 (n=1158), which has 3548 digits.
%C a(6)= 14115^14115-14115!+14115+1 (n=14115), which has 58573 digits.
%C No other term has been found for n<30000.
%t Do[p=n^n-n!+n+1; If[PrimeQ[p], Print[p]], {n, 200}]
%K hard,nonn
%O 1,1
%A _Marco Ripà_, Mar 11 2011
%E a(5) and a(6) found by _Matevz Markovic_, Mar 03 2014
| 