A140970 Primes of the form (n-1)! + n^(n-1).

2, 3, 11, 118369

Offset

1,1

Links

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

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

Adjacent sequences: A140967 A140968 A140969 * A140971 A140972 A140973

Keyword

nonn,less,more

Author

Alexander R. Povolotsky, Aug 17 2008

Status

approved