|
|
A260891
|
|
Primes that contain only the digits (1, 6, 7).
|
|
2
|
|
|
7, 11, 17, 61, 67, 71, 167, 617, 661, 677, 761, 1117, 1171, 1667, 1777, 6661, 6761, 7177, 7717, 11117, 11161, 11171, 11177, 11617, 11677, 11717, 11777, 16111, 16661, 17117, 17167, 17761, 61667, 61717, 66161, 66617, 67777, 71161, 71167, 71171, 71671
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[2 10^4]], Complement[IntegerDigits[#], {1, 6, 7}] == {} &]
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(2*10^5) | Set(Intseq(p)) subset [1, 6, 7]];
|
|
CROSSREFS
|
Cf, similar sequences listed in A260889.
|
|
KEYWORD
|
nonn,easy,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|