A260381 Primes that contain only the digits (3, 7, 8).

3, 7, 37, 73, 83, 337, 373, 383, 733, 773, 787, 877, 883, 887, 3373, 3733, 3833, 3877, 7333, 7873, 7877, 7883, 8377, 8387, 8737, 8783, 8837, 8887, 33377, 33773, 37337, 37783, 38333, 38377, 38737, 38783, 38833, 38873, 73387, 73783, 73877, 73883, 77377, 77383

Offset

1,1

Comments

A020463, A020464 and A020470 are subsequences.

Links

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

Mathematica

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

Prog

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

Crossrefs

Cf. similar sequences listed in A260378.

Cf. A000040, A020463, A020464, A020470.

Sequence in context: A260380 A363667 A260382 * A260378 A020463 A356668

Adjacent sequences: A260378 A260379 A260380 * A260382 A260383 A260384

Keyword

nonn,easy,base

Author

Vincenzo Librandi, Aug 01 2015

Status

approved