A109176 Five-digit primes which use each of the decimal digits 0 through 4 exactly once.
10243, 12043, 20143, 20341, 20431, 23041, 24103, 30241, 32401, 40123, 40213, 40231, 41023, 41203, 42013, 43201
Offset: 1
Programs
-
Mathematica
Select[FromDigits/@Permutations[{0,1,2,3,4}],#>10^4&&PrimeQ[#]&] (* James C. McMahon, Mar 06 2024 *)
Comments