OFFSET
1,1
COMMENTS
Next term, if it exists, has more than 1043 digits.
The next term is about 3.854...*10^30795. The corresponding values of k are 1, 2, 3, 11, 43, 7901. No more terms with k < 10000. - Amiram Eldar, Feb 06 2019
EXAMPLE
For k=11, p=11^11+10!=285315299411 is prime and is in the sequence.
MATHEMATICA
Do[p=n^n+(n-1)!; If[PrimeQ[p], Print[p]], {n, 400}]
Select[Table[k^k+(k-1)!, {k, 50}], PrimeQ] (* Harvey P. Dale, Jan 18 2021 *)
PROG
(PARI) for(k=1, 100, x=k^k+(k-1)!; if(isprime(x), print1(x, ", "))) \\ Jinyuan Wang, Feb 06 2019
CROSSREFS
KEYWORD
hard,nonn
AUTHOR
Marco Ripà, Mar 12 2011
STATUS
approved