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

Comments

A020451, A020455 and A020463 are subsequences.

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

Cf. similar sequences listed in A260378.

Subsequence of A155055.

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

Author

Vincenzo Librandi, Jul 24 2015

Status

approved