login
A235159
Primes which have one or more occurrences of exactly seven different digits.
4
1023467, 1023487, 1023697, 1023769, 1023857, 1023947, 1024357, 1024379, 1024579, 1024589, 1024693, 1024697, 1024783, 1024853, 1024957, 1024963, 1024987, 1025347, 1025483, 1025693, 1025749, 1025789, 1025839, 1025873, 1025897, 1026359, 1026439, 1026457
OFFSET
1,1
COMMENTS
The first term having a repeated digit is 10023649.
LINKS
MATHEMATICA
Select[Prime[Range[PrimePi[102*10^4], PrimePi[103*10^4]]], Count[ DigitCount[ #], 0] ==3&] (* Harvey P. Dale, Mar 21 2018 *)
PROG
(PARI) s=[]; forprime(n=1000000, 1030000, if(#vecsort(eval(Vec(Str(n))), , 8)==7, s=concat(s, n))); s
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Colin Barker, Jan 04 2014
STATUS
approved