A074669 Six-digit distinct-digit primes.

102359, 102367, 102397, 102437, 102497, 102539, 102547, 102563, 102587, 102593, 102643, 102647, 102653, 102673, 102679, 102763, 102769, 102793, 102859, 102953, 102967, 102983, 103289, 103457, 103529, 103549, 103567, 103657, 103687, 103769, 103867, 103967, 104239

Offset

1,1

Comments

There are exactly 10239 six-digit primes with distinct digits.

Links

Nathaniel Johnston, Table of n, a(n) for n = 1..10239 (full sequence)

Example

a(1)=102359 because it is the first (smallest) 6-digit primes with all distinct digits.

Mathematica

Select[Range[100001, 999999, 2], Length[Union[IntegerDigits[ # ]]]==6 && PrimeQ[ # ]&]
Take[Select[Prime[Range[PrimePi[100000]+1, PrimePi[999999]]], Max[DigitCount[#]]==1&], 50] (* Harvey P. Dale, Jan 09 2011 *)
Select[Sort[FromDigits/@Flatten[Permutations/@Subsets[Range[0, 9], {6}], 1]], IntegerLength[#] == 6&&PrimeQ[#]&] (* Harvey P. Dale, Jul 28 2017 *)

Prog

(PARI) is(n)=isprime(n) && #digits(n)==6 && #Set(digits(n))==6 \\ Charles R Greathouse IV, Feb 11 2017

Crossrefs

The first differences are in A074670. 7-digit distinct-digit primes are in A074667, see also A074668. 8-digit distinct-digit primes are in A074665, see also A074666.

Sequence in context: A220076 A235694 A235158 * A241789 A010329 A184567

Adjacent sequences: A074666 A074667 A074668 * A074670 A074671 A074672

Keyword

fini,full,nonn,base

Author

Zak Seidov, Aug 30 2002

Status

approved