A323579 Primes formed by using the four terminal digits of multidigit primes and whose digits are distinct, i.e., consisting of only digits 1, 3, 7, 9.
3, 7, 13, 17, 19, 31, 37, 71, 73, 79, 97, 137, 139, 173, 179, 193, 197, 317, 379, 397, 719, 739, 937, 971, 1973, 3719, 3917, 7193, 9137, 9173, 9371
Offset: 1
Examples
1973 and 9371 are respectively the smallest and the largest primes formed with the four digits that can end multidigit primes.
Links
- Chris K. Caldwell and G. L. Honaker, Jr., 9371, Prime Curios!
Crossrefs
Cf. A029743 (with distinct digits), A124674 (with distinct prime digits), A155024 (with distinct nonprime digits but with 0), A155045 (with distinct odd digits), A323387 (with distinct square digits), A323391 (with distinct nonprime digits), A323578 (with distinct digits for which parity of digits alternates).
Programs
-
Mathematica
With[{w = Select[Range@ 10, GCD[#, 10] == 1 &]}, Select[FromDigits /@ Permutations[w, Length@ w], PrimeQ]] (* Michael De Vlieger, Feb 03 2019 *) Select[FromDigits/@Flatten[Permutations/@Subsets[{1,3,7,9}],1],PrimeQ]//Union (* Harvey P. Dale, Apr 20 2025 *)
Comments