|
| |
|
|
A087395
|
|
Primes in which the frequency of every digit is the same and is at least 2.
|
|
0
| |
|
|
11, 100313, 107071, 110909, 114343, 115757, 116969, 117373, 117979, 118787, 119797, 121727, 127217, 127271, 131939, 133717, 133919, 134341, 136163, 136361, 137713, 140401, 141499, 142421, 143413, 145451, 149419, 149491, 155717, 157571
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
EXAMPLE
| 100313 is a member in which each digit 1, 3 and 0 occur with frequency 2.
|
|
|
MATHEMATICA
| fpQ[n_]:=Module[{dc=Union[Cases[DigitCount[n], Except[0]]]}, First[dc]>1 &&Length[dc]==1]; Select[Prime[Range[14500]], fpQ] (* From Harvey P. Dale, Apr 22 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A055322 A165934 A110780 * A199169 A145571 A049193
Adjacent sequences: A087392 A087393 A087394 * A087396 A087397 A087398
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Sep 10 2003
|
|
|
EXTENSIONS
| Corrected and extended by David Wasserman (wasserma(AT)spawar.navy.mil), May 31 2005
|
| |
|
|
