login
A140970
Primes of the form (n-1)! + n^(n-1).
0
2, 3, 11, 118369
OFFSET
1,1
MATHEMATICA
Select[Table[(n-1)!+n^(n-1), {n, 20}], PrimeQ] (* Harvey P. Dale, Oct 05 2016 *)
PROG
(PARI) j=[]; for(n=1, 100, if(isprime((n^n+n!)/n), j=concat(j, ((n-1)! + n^(n-1))))); j
CROSSREFS
Sequence in context: A096456 A262201 A072928 * A058523 A103782 A128438
KEYWORD
nonn,less,more
AUTHOR
STATUS
approved