OFFSET
1,1
COMMENTS
The values of A036679(k)-9 at indices k=4, 8, 20, 34, ... - R. J. Mathar, Jul 16 2009
MATHEMATICA
Select[Table[n^n-n!-9, {n, 3, 50}], PrimeQ] (* Harvey P. Dale, Jul 30 2017 *)
PROG
(Magma) [a: n in [3..100] | IsPrime(a) where a is n^n-Factorial(n)-9]; // Vincenzo Librandi, Aug 02 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 07 2009
STATUS
approved