|
| |
|
|
A124674
|
|
Primes with distinct prime digits.
|
|
2
| |
|
|
2, 3, 5, 7, 23, 37, 53, 73, 257, 523, 2357, 2753, 3257, 3527, 5237, 5273, 7253, 7523
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| Select[Range[10000], PrimeQ[ # ] && Length[IntegerDigits[ # ]] == Length[Union[IntegerDigits[ # ]]] && Complement[IntegerDigits[ # ], {2, 3, 5, 7}] == {} &]
|
|
|
CROSSREFS
| Cf. A019546 Primes whose digits are primes.
Sequence in context: A019546 A104179 A096148 * A177061 A020994 A085823
Adjacent sequences: A124671 A124672 A124673 * A124675 A124676 A124677
|
|
|
KEYWORD
| base,fini,full,nonn
|
|
|
AUTHOR
| Tanya Khovanova (tanyakh(AT)yahoo.com), Dec 24 2006
|
| |
|
|
