|
|
A260125
|
|
Primes that contain only the digits (2, 3, 0).
|
|
6
|
|
|
2, 3, 23, 223, 233, 2003, 2203, 2333, 3023, 3203, 3323, 20023, 20233, 20323, 20333, 22003, 22303, 23003, 23203, 23333, 30203, 30223, 30323, 32003, 32203, 32233, 32303, 32323, 33023, 33203, 33223, 200003, 200023, 200033, 200323, 203023, 203233, 203323
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[2 10^4]], Complement[IntegerDigits[#], {2, 3, 0}]=={} &]
Select[FromDigits/@Tuples[{0, 2, 3}, 6], PrimeQ] (* Harvey P. Dale, Mar 06 2020 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(300000) | Intseq(p) subset {2, 3, 0}];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|