login
A255964
Five-digit distinct-digit zeroless primes.
1
12347, 12379, 12437, 12457, 12473, 12479, 12487, 12497, 12539, 12547, 12569, 12583, 12589, 12637, 12647, 12653, 12659, 12689, 12697, 12739, 12743, 12763, 12853, 12893, 12953, 12967, 12973, 12983, 13249, 13259, 13267, 13297, 13457
OFFSET
1,1
COMMENTS
The last term is a(1610)=98731.
Intersection of A038618 and A074671. - Michel Marcus, Mar 16 2015
MATHEMATICA
f[n_] := Block[{d = DigitCount@ n}, And[Plus @@ d == 5, Last@ d == 0, Max@ d == 1, PrimeQ@ n]]; Select[Range[10000, 99999], f] (* or *) Select[FromDigits /@ Permutations[Range[1, 9], {5}], PrimeQ] (* Michael De Vlieger, Mar 12 2015 *)
CROSSREFS
Cf. A038618 (zeroless primes), A074671 (5-digit distinct-digit primes).
Sequence in context: A375692 A091341 A077298 * A274247 A045080 A238051
KEYWORD
nonn,base,fini,full
AUTHOR
Zak Seidov, Mar 12 2015
STATUS
approved