|
|
A235157
|
|
Primes which have one or more occurrences of exactly five different digits.
|
|
4
|
|
|
10243, 10247, 10253, 10259, 10267, 10273, 10289, 10357, 10369, 10427, 10429, 10453, 10457, 10459, 10463, 10487, 10529, 10567, 10589, 10597, 10627, 10639, 10657, 10687, 10723, 10729, 10739, 10753, 10789, 10837, 10847, 10853, 10859, 10867, 10937, 10957
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The first term having a repeated digit is 100237.
There are 2,529 5-digit primes in the sequence. Harvey P. Dale, Feb 06 2015
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[1255, 1355]], Max[DigitCount[#]]==1&] (* The program is only accurate for 5-digit primes, of which there are 2529 satisfying the definition *) (* Harvey P. Dale, Feb 06 2015 *)
|
|
PROG
|
(PARI) s=[]; forprime(n=10000, 13000, if(#vecsort(eval(Vec(Str(n))), , 8)==5, s=concat(s, n))); s
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|