A260379 Primes that contain only the digits (1, 3, 7).

3, 7, 11, 13, 17, 31, 37, 71, 73, 113, 131, 137, 173, 311, 313, 317, 331, 337, 373, 733, 773, 1117, 1171, 1373, 1733, 1777, 3137, 3313, 3331, 3371, 3373, 3733, 7177, 7331, 7333, 7717, 11113, 11117, 11131, 11171, 11173, 11177, 11311, 11317, 11717, 11731, 11777

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[2 10^3]], Complement[IntegerDigits[#], {1, 3, 7}]=={} &]

Prog

(Magma) [p: p in PrimesUpTo(2*10^4) | Set(Intseq(p)) subset [1, 3, 7]];

Crossrefs

Subsequence of A030096 and A155055. A020451, A020455, and A020463 are subsequences.

Cf. similar sequences listed in A260378.

Cf. A000040, A020451, A020455, A020463.

Sequence in context: A055211 A183176 A045417 * A045418 A257057 A310197

Adjacent sequences: A260376 A260377 A260378 * A260380 A260381 A260382

Keyword

nonn,easy,base,changed

Author

Vincenzo Librandi, Jul 24 2015

Status

approved