|
|
A108385
|
|
Primes p such that p's set of distinct digits is {3,7,9}.
|
|
6
|
|
|
379, 397, 739, 937, 3739, 3779, 3793, 3797, 7393, 7793, 7933, 7937, 7993, 9337, 9377, 9397, 9733, 9739, 9973, 33739, 33797, 33937, 33997, 37339, 37379, 37397, 37799, 37993, 37997, 39373, 39397, 39733, 39779, 39799, 39937, 39979, 73379, 73939
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[Select[FromDigits/@Select[Tuples[{3, 7, 9}, n], SubsetQ[#, {3, 7, 9}]&], PrimeQ], {n, 3, 5}]//Flatten (* Harvey P. Dale, Sep 15 2016 *)
|
|
CROSSREFS
|
Cf. A108382 ({1, 3, 7}), A108383 ({1, 3, 9}), A108384 ({1, 7, 9}), A108386 ({1, 3, 7, 9}), A030096 (Primes whose digits are all odd).
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|