A260893 Primes that contain only the digits (1, 7, 9).

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

Alois P. Heinz, Table of n, a(n) for n = 1..10000

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.

Cf. A000040, A020455, A020457, A020471, A030096.

Sequence in context: A230223 A309587 A339954 * A352630 A360396 A299978

Adjacent sequences: A260890 A260891 A260892 * A260894 A260895 A260896

Keyword

nonn,easy,base

Author

Vincenzo Librandi, Aug 11 2015

Status

approved