A260382 Primes that contain only the digits (3, 7, 9).

3, 7, 37, 73, 79, 97, 337, 373, 379, 397, 733, 739, 773, 797, 937, 977, 997, 3373, 3733, 3739, 3779, 3793, 3797, 7333, 7393, 7793, 7933, 7937, 7993, 9337, 9377, 9397, 9733, 9739, 9973, 33377, 33739, 33773, 33797, 33937, 33997, 37337, 37339, 37379, 37397

Offset

1,1

Comments

A020463 and A020471 are subsequences.

Links

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

James Maynard and Brady Haran, Primes without a 7, Numberphile video (2019)

Mathematica

Select[Prime[Range[5*10^3]], Complement[IntegerDigits[#], {3, 7, 9}]=={} &]

Prog

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

Crossrefs

Cf. similar sequences listed in A260378.

Cf. A000040, A020463, A020471.

Sequence in context: A049493 A260380 A363667 * A260381 A260378 A020463

Adjacent sequences: A260379 A260380 A260381 * A260383 A260384 A260385

Keyword

nonn,easy,base

Author

Vincenzo Librandi, Aug 01 2015

Status

approved