A181575 Prime numbers which are impossible numbers of trailing zeros in the decimal representation of the factorial of any prime number.
5, 11, 17, 23, 29, 59, 61, 67, 73, 79, 83, 101, 127, 131, 167, 173, 179, 193, 199, 223, 229, 241, 281, 283, 307, 311, 317, 331, 337, 349, 367, 373, 379, 397, 409, 419, 431, 439, 449, 457, 461, 467, 479, 487, 491, 503, 509, 523, 541, 547, 563, 577, 587, 599
Offset: 1
Crossrefs
Cf. A181573.
Programs
-
Mathematica
f[n_] := IntegerExponent[ Prime@ n!, 10]; Select[ Complement[ Range[0, 600], Array[f, 360]], PrimeQ] (* Robert G. Wilson v, Nov 05 2010 *)
Extensions
More terms from Robert G. Wilson v, Nov 05 2010
Comments