%I #7 Apr 03 2016 10:43:26
%S 16,40,1416,10780
%N Values of n for which the Stirling number of the second kind, S(n,4), is prime.
%C Values have been checked up to n=100000.
%e S(16,4)=171798901 and S(40,4)=50369882873307917364901 are both prime numbers.
%t Do[ If[ PrimeQ[ StirlingS2[n, 4]], Print[n]], {n, 4, 11000, 4}] (* _Robert G. Wilson v_, Jan 14 2005 *)
%o (PARI) isok(n) = isprime(stirling(n, 4, 2)); \\ _Michel Marcus_, Apr 03 2016
%K nonn,more
%O 1,1
%A Joe DeMaio, Stephen Touset (jdemaio(AT)kennesaw.edu), Jan 11 2005
|