|
|
A260227
|
|
Primes that contain only the digits (3, 5, 9).
|
|
2
|
|
|
3, 5, 53, 59, 353, 359, 593, 599, 953, 3359, 3533, 3539, 3559, 3593, 5333, 5393, 5399, 5939, 5953, 9533, 9539, 33353, 33359, 33533, 33599, 35339, 35353, 35393, 35533, 35593, 35933, 35993, 35999, 39359, 39953, 53353, 53359, 53593, 53939, 53959, 53993
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[2 10^4]], Complement[IntegerDigits[#], {3, 5, 9}]=={} &]
Select[Table[FromDigits/@Tuples[{3, 5, 9}, n], {n, 5}]//Flatten, PrimeQ] (* Harvey P. Dale, Sep 07 2018 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(2*10^5) | Set(Intseq(p)) subset [3, 5, 9]];
|
|
CROSSREFS
|
Cf. similar sequences listed in A260223.
|
|
KEYWORD
|
nonn,easy,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|