A255964 Five-digit distinct-digit zeroless primes.

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

Links

Zak Seidov, Table of n, a(n) for n = 1..1610

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: A193493 A091341 A077298 * A274247 A045080 A238051

Adjacent sequences: A255961 A255962 A255963 * A255965 A255966 A255967

Keyword

nonn,base,fini,full

Author

Zak Seidov, Mar 12 2015

Status

approved