OFFSET
1,1
COMMENTS
The values of A036679(k)+2 at indices k=1, 3, 9, 69, ... - R. J. Mathar, Jul 16 2009
No further terms up to k=1000. - Harvey P. Dale, Apr 26 2022
MATHEMATICA
f[n_]:=n^n-n!+2; lst={}; Do[p=f[n]; If[PrimeQ[p], AppendTo[lst, p]], {n, 4*5!}]; lst
Select[Table[k^k-k!+2, {k, 100}], PrimeQ] (* Harvey P. Dale, Apr 26 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 07 2009
STATUS
approved