login
A260893
Primes that contain only the digits (1, 7, 9).
3
7, 11, 17, 19, 71, 79, 97, 179, 191, 197, 199, 719, 797, 911, 919, 971, 977, 991, 997, 1117, 1171, 1777, 1979, 1997, 1999, 7177, 7717, 7919, 9199, 9719, 9791, 11117, 11119, 11171, 11177, 11197, 11717, 11719, 11777, 11779, 11971, 17117, 17191, 17791, 17911
OFFSET
1,1
COMMENTS
A020455, A020457 and A020471 are subsequences.
Subsequence of A030096.
LINKS
MATHEMATICA
Select[Prime[Range[3 10^3]], Complement[IntegerDigits[#], {1, 7, 9}] == {}&]
PROG
(Magma) [p: p in PrimesUpTo(3*10^4) | Set(Intseq(p)) subset [1, 7, 9]];
CROSSREFS
Cf. similar sequences listed in A260889.
Sequence in context: A230223 A309587 A339954 * A352630 A360396 A299978
KEYWORD
nonn,easy,base
AUTHOR
Vincenzo Librandi, Aug 11 2015
STATUS
approved