A109177 Eight-digit primes which use each of 0-to-7 decimal digits exactly once.
10235647, 10236547, 10243567, 10243657, 10245637, 10247563, 10254367, 10254763, 10256347, 10256473, 10257463, 10264357, 10264537, 10346257, 10356427, 10364527, 10425367, 10425637, 10425673, 10426357, 10426753
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..2668
Crossrefs
Cf. A109178.
Programs
-
Mathematica
Take[FromDigits/@Select[Permutations[Range[0,7]],First[#]!=0&&PrimeQ[ FromDigits[ #]]&],50] (* Harvey P. Dale, Aug 16 2011 *)
Comments